import SplitUniq(SplitUniqSupply)
import StgSyn(StgBinding)
satStgRhs :: [StgBinding Id Id] -> SplitUniqSupply -> [StgBinding Id Id]
import SplitUniq(SplitUniqSupply)
import StgSyn(StgBinding)
satStgRhs :: [StgBinding Id Id] -> SplitUniqSupply -> [StgBinding Id Id]