Move all the CoreToDo stuff into CoreMonad

[ghc-hetmet.git] / compiler / simplCore / FloatOut.lhs

diff --git a/compiler/simplCore/FloatOut.lhs b/compiler/simplCore/FloatOut.lhs
index f5f8946..ba74afc 100644 (file)
--- a/compiler/simplCore/FloatOut.lhs
+++ b/compiler/simplCore/FloatOut.lhs
@@ -11,8 +11,9 @@ module FloatOut ( floatOutwards ) where
 import CoreSyn
 import CoreUtils
 import CoreArity       ( etaExpand )
+import CoreMonad       ( FloatOutSwitches(..) )
 
-import DynFlags        ( DynFlags, DynFlag(..), FloatOutSwitches(..) )
+import DynFlags                ( DynFlags, DynFlag(..) )
 import ErrUtils                ( dumpIfSet_dyn )
 import CostCentre      ( dupifyCC, CostCentre )
 import Id              ( Id, idType, idArity, isBottomingId )