X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Fparser%2FParser.y.pp;h=d7971b4c52f844ab0cf781eddb35ad43e386aa62;hp=e4285ba9d653e13d695725bf95cee32b4eb84756;hb=d7b3ad9be373e02ea8b679d978f6ca898436892d;hpb=3b3fee836284d09422562e1df88febcfb3200eb9

diff --git a/compiler/parser/Parser.y.pp b/compiler/parser/Parser.y.pp
index e4285ba..d7971b4 100644
--- a/compiler/parser/Parser.y.pp
+++ b/compiler/parser/Parser.y.pp
@@ -8,6 +8,14 @@
 -- ---------------------------------------------------------------------------
 
 {
+{-# OPTIONS_GHC -O0 -fno-ignore-interface-pragmas #-}
+{-
+Careful optimisation of the parser: we don't want to throw everything
+at it, because that takes too long and doesn't buy much, but we do want
+to inline certain key external functions, so we instruct GHC not to
+throw away inlinings as it would normally do in -O0 mode.
+-}
+
 {-# OPTIONS -w #-}
 -- The above warning supression flag is a temporary kludge.
 -- While working on this module you are encouraged to remove it and fix