[project @ 1996-01-08 20:28:12 by partain]
[ghc-hetmet.git] / ghc / compiler / simplStg / LambdaLift.hi
1 {-# GHC_PRAGMA INTERFACE VERSION 5 #-}
2 interface LambdaLift where
3 import Id(Id)
4 import SplitUniq(SplitUniqSupply)
5 import StgSyn(StgBinding)
6 liftProgram :: SplitUniqSupply -> [StgBinding Id Id] -> [StgBinding Id Id]
7         {-# GHC_PRAGMA _A_ 2 _U_ 21 _N_ _S_ "LS" _N_ _N_ #-}
8