[project @ 2000-03-27 13:24:12 by simonpj]
[ghc-hetmet.git] / ghc / compiler / simplCore / CSE.lhs
index 651165d..91cb81c 100644 (file)
@@ -12,7 +12,7 @@ module CSE (
 
 import CmdLineOpts     ( opt_D_dump_cse, opt_D_verbose_core2core )
 import Id              ( Id, idType )
-import CoreUtils       ( hashExpr, cheapEqExpr, exprIsBig )
+import CoreUtils       ( hashExpr, cheapEqExpr, exprIsBig, mkAltExpr )
 import DataCon         ( isUnboxedTupleCon )
 import Type            ( splitTyConApp_maybe )
 import CoreSyn