Fix utils/Util for debug build

[ghc-hetmet.git] / compiler / utils / Util.lhs

diff --git a/compiler/utils/Util.lhs b/compiler/utils/Util.lhs
index 06a1c5f..90e7042 100644 (file)
--- a/compiler/utils/Util.lhs
+++ b/compiler/utils/Util.lhs
@@ -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 )