de10f7c4245e3eb2d44ecb7f9bbb1e9dcfb8697a
[ghc-hetmet.git] / ghc / compiler / simplStg / SatStgRhs.hi
1 {-# GHC_PRAGMA INTERFACE VERSION 5 #-}
2 interface SatStgRhs where
3 import Id(Id)
4 import SplitUniq(SplitUniqSupply)
5 import StgSyn(StgBinding)
6 satStgRhs :: [StgBinding Id Id] -> SplitUniqSupply -> [StgBinding Id Id]
7         {-# GHC_PRAGMA _A_ 2 _U_ 11 _N_ _S_ "S" _N_ _N_ #-}
8