[project @ 1996-03-21 12:46:33 by partain]

[ghc-hetmet.git] / ghc / compiler / simplStg / StgSATMonad.lhs

diff --git a/ghc/compiler/simplStg/StgSATMonad.lhs b/ghc/compiler/simplStg/StgSATMonad.lhs
index 1da8207..5996c18 100644 (file)
--- a/ghc/compiler/simplStg/StgSATMonad.lhs
+++ b/ghc/compiler/simplStg/StgSATMonad.lhs
@@ -14,8 +14,8 @@ module StgSATMonad (
        getArgLists, saTransform
     ) where
 
-import Type            ( mkTyVarTy, mkSigmaTy, TyVarTemplate,
-                         extractTyVarsFromTy, splitSigmaTy, splitTyArgs,
+import Type            ( mkSigmaTy, TyVarTemplate,
+                         splitSigmaTy, splitTyArgs,
                          glueTyArgs, instantiateTy, TauType(..),
                          Class, ThetaType(..), SigmaType(..),
                          InstTyEnv(..)