[project @ 2001-07-19 09:26:08 by simonpj]

[ghc-hetmet.git] / ghc / compiler / hsSyn / HsCore.lhs

diff --git a/ghc/compiler/hsSyn/HsCore.lhs b/ghc/compiler/hsSyn/HsCore.lhs
index dd1d718..83dbd8b 100644 (file)
--- a/ghc/compiler/hsSyn/HsCore.lhs
+++ b/ghc/compiler/hsSyn/HsCore.lhs
@@ -26,7 +26,7 @@ module HsCore (
 -- friends:
 import HsTypes         ( HsType, pprParendHsType, pprHsTyVarBndr, toHsType,
                          HsTupCon(..), EqHsEnv, hsTupParens,
-                         emptyEqHsEnv, extendEqHsEnv, eqListBy, 
+                         emptyEqHsEnv, extendEqHsEnv,
                          eq_hsType, eq_hsVars
                        )
 
@@ -48,6 +48,7 @@ import Type           ( Kind, eqKind )
 import BasicTypes      ( Arity )
 import FiniteMap       ( lookupFM )
 import CostCentre
+import Util            ( eqListBy )
 import Outputable
 \end{code}