[project @ 1996-02-06 14:32:22 by dnt]
[ghc-hetmet.git] / ghc / compiler / nativeGen / AsmCodeGen.hi
1 {-# GHC_PRAGMA INTERFACE VERSION 5 #-}
2 interface AsmCodeGen where
3 import AbsCSyn(AbstractC)
4 import CmdLineOpts(GlobalSwitch, SwitchResult)
5 import SplitUniq(SUniqSM(..), SplitUniqSupply)
6 import Stdio(_FILE)
7 data AbstractC 
8 data GlobalSwitch 
9 data SwitchResult 
10 type SUniqSM a = SplitUniqSupply -> a
11 data SplitUniqSupply 
12 dumpRealAsm :: (GlobalSwitch -> SwitchResult) -> AbstractC -> SplitUniqSupply -> [Char]
13 writeRealAsm :: (GlobalSwitch -> SwitchResult) -> _FILE -> AbstractC -> SplitUniqSupply -> _State _RealWorld -> ((), _State _RealWorld)
14