Implement INLINABLE pragma
[ghc-hetmet.git] / compiler / vectorise / Vectorise / Utils / Closure.hs
index d8be668..6b8688c 100644 (file)
@@ -8,11 +8,12 @@ module Vectorise.Utils.Closure (
        buildEnv
 )
 where
-import VectUtils
-import Vectorise.Utils.Hoisting
 import Vectorise.Builtins
 import Vectorise.Vect
 import Vectorise.Monad
+import Vectorise.Utils.Base
+import Vectorise.Utils.PADict
+import Vectorise.Utils.Hoisting
 
 import CoreSyn
 import Type
@@ -23,7 +24,7 @@ import TyCon
 import DataCon
 import MkId
 import TysWiredIn
-import BasicTypes
+import BasicTypes( Boxity(..) )
 import FastString