[project @ 1996-01-11 14:06:51 by partain]
[ghc-hetmet.git] / ghc / compiler / simplStg / SimplStg.hi
index 08f6c91..e70e2fe 100644 (file)
@@ -8,5 +8,4 @@ import Pretty(PprStyle)
 import SplitUniq(SplitUniqSupply)
 import StgSyn(StgBinding)
 stg2stg :: [StgToDo] -> (GlobalSwitch -> SwitchResult) -> _PackedString -> PprStyle -> SplitUniqSupply -> [StgBinding Id Id] -> _State _RealWorld -> (([StgBinding Id Id], ([CostCentre], [CostCentre])), _State _RealWorld)
-       {-# GHC_PRAGMA _A_ 7 _U_ 1222122 _N_ _S_ "SSLLU(ALL)LL" _N_ _N_ #-}