1 {-# GHC_PRAGMA INTERFACE VERSION 5 #-}
2 interface SatStgRhs where
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_ #-}