[project @ 1996-01-11 14:06:51 by partain]
[ghc-hetmet.git] / ghc / compiler / simplStg / LambdaLift.hi
index 1ea1a64..3366824 100644 (file)
@@ -4,5 +4,4 @@ import Id(Id)
 import SplitUniq(SplitUniqSupply)
 import StgSyn(StgBinding)
 liftProgram :: SplitUniqSupply -> [StgBinding Id Id] -> [StgBinding Id Id]
-       {-# GHC_PRAGMA _A_ 2 _U_ 21 _N_ _S_ "LS" _N_ _N_ #-}