1 {-# GHC_PRAGMA INTERFACE VERSION 5 #-}
2 interface CgUpdate where
3 import AbsCSyn(CAddrMode)
4 import CgMonad(CgInfoDownwards, CgState)
5 pushUpdateFrame :: CAddrMode -> CAddrMode -> (CgInfoDownwards -> CgState -> CgState) -> CgInfoDownwards -> CgState -> CgState
6 {-# GHC_PRAGMA _A_ 5 _U_ 22222 _N_ _S_ "LLSU(U(LL)LU(LLS))U(LLU(LU(LLLL)L))" _N_ _N_ #-}