Commit c5aa34a1 authored by simonmar's avatar simonmar
Browse files

[project @ 2000-10-16 15:14:32 by simonmar]

new: mkHomeModule for Modules in ThisPackage.
parent ace49b8b
......@@ -34,10 +34,10 @@ module Module
, moduleUserString -- :: Module -> UserString
, moduleName -- :: Module -> ModuleName
, mkVanillaModule -- :: ModuleName -> Module
-- , mkThisModule -- :: ModuleName -> Module
, mkVanillaModule -- :: ModuleName -> Module
, mkPrelModule -- :: UserString -> Module
, mkModule -- :: ModuleName -> ModuleKind -> Module
, mkModule -- :: ModuleName -> PackageName -> Module
, mkHomeModule -- :: ModuleName -> Module
-- , mkSrcModule
......@@ -223,6 +223,8 @@ mkModule mod_nm pack_name
pack_info | pack_name == opt_InPackage = ThisPackage
| otherwise = AnotherPackage pack_name
mkHomeModule :: ModuleName -> Module
mkHomeModule mod_nm = Module mod_nm ThisPackage
-- Used temporarily when we first come across Foo.x in an interface
-- file, but before we've opened Foo.hi.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment