[project @ 2001-03-01 16:07:46 by simonmar]

don't get $! from Util

diff --git a/ghc/compiler/coreSyn/Subst.lhs b/ghc/compiler/coreSyn/Subst.lhs
index 1866956..41891f6 100644 (file)
--- a/ghc/compiler/coreSyn/Subst.lhs
+++ b/ghc/compiler/coreSyn/Subst.lhs
@@ -62,7 +62,7 @@ import Var            ( Var, Id, TyVar, isTyVar )
 import Outputable
 import PprCore         ()              -- Instances
 import UniqFM          ( ufmToList )   -- Yuk (add a new op to VarEnv)
-import Util            ( mapAccumL, foldl2, seqList, ($!) )
+import Util            ( mapAccumL, foldl2, seqList )
 import FastTypes
 \end{code}