[project @ 1996-06-26 10:26:00 by partain]

[ghc-hetmet.git] / ghc / compiler / deforest / DefExpr.lhs

diff --git a/ghc/compiler/deforest/DefExpr.lhs b/ghc/compiler/deforest/DefExpr.lhs
index bae8836..ffeceba 100644 (file)
--- a/ghc/compiler/deforest/DefExpr.lhs
+++ b/ghc/compiler/deforest/DefExpr.lhs
@@ -16,8 +16,8 @@
 > import TreelessForm
 > import Cyclic
 
-> import Type          ( applyTypeEnvToTy, isPrimType,
->                        SigmaType(..), Type
+> import Type          ( applyTypeEnvToTy,
+>                        SYN_IE(SigmaType), Type
 >                      )
 > import CmdLineOpts   ( SwitchResult, switchIsOn )
 > import CoreUnfold    ( UnfoldingDetails(..) )
@@ -27,7 +27,6 @@
 >                      )
 > import Inst          -- Inst(..)
 > import IdInfo
-> import Maybes                ( Maybe(..) )
 > import Outputable
 > import UniqSupply
 > import Util