diff options
Diffstat (limited to 'compiler/GHC/Unit/Module.hs')
| -rw-r--r-- | compiler/GHC/Unit/Module.hs | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/compiler/GHC/Unit/Module.hs b/compiler/GHC/Unit/Module.hs index 14751d7003..6ec97c027a 100644 --- a/compiler/GHC/Unit/Module.hs +++ b/compiler/GHC/Unit/Module.hs @@ -43,7 +43,6 @@ module GHC.Unit.Module , moduleIsDefinite , HasModule(..) , ContainsModule(..) - , instModuleToModule , unitIdEq , installedModuleEq ) where @@ -57,9 +56,6 @@ import GHC.Unit.Module.Location import GHC.Unit.Module.Env import GHC.Utils.Misc -import {-# SOURCE #-} GHC.Unit.State (PackageState) - - -- | A 'Module' is definite if it has no free holes. moduleIsDefinite :: Module -> Bool moduleIsDefinite = isEmptyUniqDSet . moduleFreeHoles @@ -87,12 +83,6 @@ class HasModule m where getModule :: m Module --- | Injects an 'InstantiatedModule' to 'Module' (see also --- 'instUnitToUnit'. -instModuleToModule :: PackageState -> InstantiatedModule -> Module -instModuleToModule pkgstate (Module iuid mod_name) = - mkModule (instUnitToUnit pkgstate iuid) mod_name - -- | Test if a 'Module' corresponds to a given 'InstalledModule', -- modulo instantiation. installedModuleEq :: InstalledModule -> Module -> Bool |