lots of portability changes (#1405)

[ghc-hetmet.git] / compiler / cmm / OptimizationFuel.hs

diff --git a/compiler/cmm/OptimizationFuel.hs b/compiler/cmm/OptimizationFuel.hs
index 49f8b05..6e05cdc 100644 (file)
--- a/compiler/cmm/OptimizationFuel.hs
+++ b/compiler/cmm/OptimizationFuel.hs
@@ -11,7 +11,7 @@ module OptimizationFuel
     )
 where
 
-import GHC.Exts (State#)
+--import GHC.Exts (State#)
 import Panic
 
 import Data.IORef
@@ -49,7 +49,7 @@ diffFuel _ _ = 0
 #endif
 
 -- stop warnings about things that aren't used
-_unused :: State# () -> FS.FastString
+_unused :: {-State#-} () -> FS.FastString
 _unused = undefined panic