projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
[project @ 1996-04-05 08:26:04 by partain]
[ghc-hetmet.git]
/
ghc
/
compiler
/
prelude
/
TysPrim.lhs
diff --git
a/ghc/compiler/prelude/TysPrim.lhs
b/ghc/compiler/prelude/TysPrim.lhs
index
c16c6b8
..
092a9f4
100644
(file)
--- a/
ghc/compiler/prelude/TysPrim.lhs
+++ b/
ghc/compiler/prelude/TysPrim.lhs
@@
-17,8
+17,7
@@
import Kind ( mkUnboxedTypeKind, mkBoxedTypeKind )
import NameTypes ( mkPreludeCoreName, FullName )
import PrelMods ( pRELUDE_BUILTIN )
import PrimRep ( PrimRep(..) ) -- getPrimRepInfo uses PrimRep repn
import NameTypes ( mkPreludeCoreName, FullName )
import PrelMods ( pRELUDE_BUILTIN )
import PrimRep ( PrimRep(..) ) -- getPrimRepInfo uses PrimRep repn
-import TyCon ( mkPrimTyCon, mkDataTyCon,
- ConsVisible(..), NewOrData(..) )
+import TyCon ( mkPrimTyCon, mkDataTyCon, NewOrData(..) )
import TyVar ( GenTyVar(..), alphaTyVars )
import Type ( applyTyCon, mkTyVarTys )
import Usage ( usageOmega )
import TyVar ( GenTyVar(..), alphaTyVars )
import Type ( applyTyCon, mkTyVarTys )
import Usage ( usageOmega )
@@
-119,7
+118,6
@@
realWorldTyCon
[{-no context-}]
[{-no data cons!-}] -- we tell you *nothing* about this guy
[{-no derivings-}]
[{-no context-}]
[{-no data cons!-}] -- we tell you *nothing* about this guy
[{-no derivings-}]
- ConsInvisible
DataType
where
full_name = mkPreludeCoreName pRELUDE_BUILTIN SLIT("_RealWorld")
DataType
where
full_name = mkPreludeCoreName pRELUDE_BUILTIN SLIT("_RealWorld")