[project @ 2000-10-16 10:14:10 by sewardj]

wibble

diff --git a/ghc/compiler/basicTypes/Module.lhs b/ghc/compiler/basicTypes/Module.lhs
index 9266c58..6e9a7d5 100644 (file)
--- a/ghc/compiler/basicTypes/Module.lhs
+++ b/ghc/compiler/basicTypes/Module.lhs
@@ -21,7 +21,7 @@ in a different DLL, by setting the DLL flag.
 \begin{code}
 module Module 
     (
-      Module, moduleName, mod_kind
+      Module, moduleName, moduleKind
                            -- abstract, instance of Eq, Ord, Outputable
     , ModuleName
     , ModuleKind(..)
@@ -256,9 +256,6 @@ mkPrelModule name = Module name preludePackage
 moduleString :: Module -> EncodedString
 moduleString (Module (ModuleName fs) _) = _UNPK_ fs
 
-moduleName :: Module -> ModuleName
-moduleName (Module mod _) = mod
-
 moduleUserString :: Module -> UserString
 moduleUserString (Module mod _) = moduleNameUserString mod