X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2FsimplCore%2FFloatOut.lhs;h=41797746e187d3b8d63276336f9da5f17d89dd60;hb=27061b5b4008a831eba4784358b040bb1250dcef;hp=e6e8b7a015fd11b27bf2f58ed746a525748642ca;hpb=194eb4bbf6a96d08fee652e244dfc31685abf10e;p=ghc-hetmet.git

diff --git a/compiler/simplCore/FloatOut.lhs b/compiler/simplCore/FloatOut.lhs
index e6e8b7a..4179774 100644
--- a/compiler/simplCore/FloatOut.lhs
+++ b/compiler/simplCore/FloatOut.lhs
@@ -31,6 +31,7 @@ import SetLevels	( Level(..), LevelledExpr, LevelledBind,
 import UniqSupply       ( UniqSupply )
 import List		( partition )
 import Outputable
+import FastString
 \end{code}
 
 	-----------------