Fix utils/Util for debug build
authormainland@eecs.harvard.edu <unknown>
Mon, 14 Jan 2008 19:05:30 +0000 (19:05 +0000)
committermainland@eecs.harvard.edu <unknown>
Mon, 14 Jan 2008 19:05:30 +0000 (19:05 +0000)
compiler/utils/Util.lhs

index 06a1c5f..90e7042 100644 (file)
@@ -89,6 +89,7 @@ import Data.List        hiding (group)
 import qualified Data.List as List ( elem )
 #ifdef DEBUG
 import qualified Data.List as List ( notElem )
+import FastTypes
 #endif
 
 import Control.Monad    ( unless )