X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2FnativeGen%2FRegSpillClean.hs;h=8cfeb1818ff669b9212596b405bbc49e1a0f1022;hb=6a05ec5ef5373f61b7f9f5bdc344483417fa801b;hp=1157f8305eaff1b724751bd9a186297f8f40592e;hpb=e568686681eabf44fc2d9f4533ee65294191267a;p=ghc-hetmet.git

diff --git a/compiler/nativeGen/RegSpillClean.hs b/compiler/nativeGen/RegSpillClean.hs
index 1157f83..8cfeb18 100644
--- a/compiler/nativeGen/RegSpillClean.hs
+++ b/compiler/nativeGen/RegSpillClean.hs
@@ -1,3 +1,4 @@
+{-# OPTIONS -fno-warn-missing-signatures #-}
 -- | Clean out unneeded spill/reload instrs
 --
 -- * Handling of join points
@@ -22,7 +23,6 @@
 --	This also works if the reloads in B1/B2 were spills instead, because
 --	spilling %r1 to a slot makes that slot have the same value as %r1.
 --
-{- OPTIONS -fno-warn-missing-signatures #-}
 
 module RegSpillClean (
 	cleanSpills