[project @ 1996-01-11 14:06:51 by partain]
[ghc-hetmet.git] / ghc / compiler / absCSyn / Costs.hi
1 {-# GHC_PRAGMA INTERFACE VERSION 5 #-}
2 interface Costs where
3 import AbsCSyn(AbstractC, CAddrMode)
4 data CostRes   = Cost (Int, Int, Int, Int, Int)
5 data Side   = Lhs | Rhs
6 addrModeCosts :: CAddrMode -> Side -> CostRes
7 costs :: AbstractC -> CostRes
8 nullCosts :: CostRes
9 instance Eq CostRes
10 instance Num CostRes
11 instance Text CostRes
12