projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
[project @ 2000-10-24 08:40:09 by simonpj]
[ghc-hetmet.git]
/
ghc
/
compiler
/
deSugar
/
DsForeign.lhs
diff --git
a/ghc/compiler/deSugar/DsForeign.lhs
b/ghc/compiler/deSugar/DsForeign.lhs
index
12df319
..
a5dbf53
100644
(file)
--- a/
ghc/compiler/deSugar/DsForeign.lhs
+++ b/
ghc/compiler/deSugar/DsForeign.lhs
@@
-32,18
+32,13
@@
import Name ( mkGlobalName, nameModule, nameOccName, getOccString,
import Type ( unUsgTy, repType,
splitTyConApp_maybe, splitFunTys, splitForAllTys,
Type, mkFunTys, mkForAllTys, mkTyConApp,
import Type ( unUsgTy, repType,
splitTyConApp_maybe, splitFunTys, splitForAllTys,
Type, mkFunTys, mkForAllTys, mkTyConApp,
- mkTyVarTy, mkFunTy, splitAppTy, applyTy, funResultTy
- )
-import PrimOp ( PrimOp(..), CCall(..),
- CCallTarget(..), dynamicTarget )
-import TysWiredIn ( unitTy, addrTy, stablePtrTyCon,
- addrDataCon
+ mkFunTy, splitAppTy, applyTy, funResultTy
)
)
+import PrimOp ( CCall(..), CCallTarget(..), dynamicTarget )
+import TysWiredIn ( unitTy, addrTy, stablePtrTyCon )
import TysPrim ( addrPrimTy )
import TysPrim ( addrPrimTy )
-import PrelNames ( Uniquable(..), hasKey,
- ioTyConKey, deRefStablePtrName, returnIOIdKey,
- bindIOName,
- returnIOName, makeStablePtrName
+import PrelNames ( hasKey, ioTyConKey, deRefStablePtrName,
+ bindIOName, returnIOName, makeStablePtrName
)
import Outputable
)
import Outputable