summaryrefslogtreecommitdiff
path: root/compiler/simplCore/FloatOut.lhs
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/simplCore/FloatOut.lhs')
-rw-r--r--compiler/simplCore/FloatOut.lhs7
1 files changed, 7 insertions, 0 deletions
diff --git a/compiler/simplCore/FloatOut.lhs b/compiler/simplCore/FloatOut.lhs
index 3a51c4f659..1b2555d018 100644
--- a/compiler/simplCore/FloatOut.lhs
+++ b/compiler/simplCore/FloatOut.lhs
@@ -6,6 +6,13 @@
``Long-distance'' floating of bindings towards the top level.
\begin{code}
+{-# OPTIONS -fno-warn-tabs #-}
+-- The above warning supression flag is a temporary kludge.
+-- While working on this module you are encouraged to remove it and
+-- detab the module (please do the detabbing in a separate patch). See
+-- http://hackage.haskell.org/trac/ghc/wiki/Commentary/CodingStyle#TabsvsSpaces
+-- for details
+
module FloatOut ( floatOutwards ) where
import CoreSyn