Add optional eager black-holing, with new flag -feager-blackholing

[ghc-hetmet.git] / utils / genapply / GenApply.hs

diff --git a/utils/genapply/GenApply.hs b/utils/genapply/GenApply.hs
index fe792a1..9d0febb 100644 (file)
--- a/utils/genapply/GenApply.hs
+++ b/utils/genapply/GenApply.hs
@@ -1,9 +1,9 @@
 {-# OPTIONS -cpp -fglasgow-exts #-}
-{-# OPTIONS_GHC -w #-}
+{-# OPTIONS -w #-}
 -- The above warning supression flag is a temporary kludge.
 -- While working on this module you are encouraged to remove it and fix
 -- any warnings in the module. See
---     http://hackage.haskell.org/trac/ghc/wiki/WorkingConventions#Warnings
+--     http://hackage.haskell.org/trac/ghc/wiki/Commentary/CodingStyle#Warnings
 -- for details
 module Main(main) where
 
@@ -566,8 +566,6 @@ genApply regstatus args =
        text "     AP_STACK,",
        text "     CAF_BLACKHOLE,",
        text "     BLACKHOLE,",
-       text "     SE_BLACKHOLE,",
-       text "     SE_CAF_BLACKHOLE,",
         text "     THUNK,",
         text "     THUNK_1_0,",
         text "     THUNK_0_1,",