{-# GHC_PRAGMA INTERFACE VERSION 5 #-} interface Costs where import AbsCSyn(AbstractC, CAddrMode) data CostRes = Cost (Int, Int, Int, Int, Int) data Side = Lhs | Rhs addrModeCosts :: CAddrMode -> Side -> CostRes costs :: AbstractC -> CostRes nullCosts :: CostRes instance Eq CostRes instance Num CostRes instance Text CostRes