[project @ 1998-08-14 11:18:25 by sof]

import list update

diff --git a/ghc/compiler/stranal/SaAbsInt.lhs b/ghc/compiler/stranal/SaAbsInt.lhs
index 3a9ccc9..30ab8f0 100644 (file)
--- a/ghc/compiler/stranal/SaAbsInt.lhs
+++ b/ghc/compiler/stranal/SaAbsInt.lhs
@@ -37,8 +37,7 @@ import Type           ( splitAlgTyConApp_maybe,
 import TysWiredIn      ( intTyCon, integerTyCon, doubleTyCon,
                          floatTyCon, wordTyCon, addrTyCon
                        )
-import Util            ( isIn, isn'tIn, nOfThem, zipWithEqual )
-import GlaExts         ( trace )
+import Util            ( isIn, isn'tIn, nOfThem, zipWithEqual, trace )
 import Outputable      
 
 returnsRealWorld x = False -- ToDo: panic "SaAbsInt.returnsRealWorld (ToDo)"