564e214a46a37e572f93a232bb0f7ee906ba91f3
[ghc-hetmet.git] / ghc / compiler / deSugar / Desugar.hi
1 {-# GHC_PRAGMA INTERFACE VERSION 5 #-}
2 interface Desugar where
3 import Bag(Bag)
4 import CmdLineOpts(GlobalSwitch, SwitchResult)
5 import CoreSyn(CoreBinding, CoreExpr)
6 import DsMonad(DsMatchContext, DsMatchKind)
7 import HsBinds(Bind, Binds, Sig)
8 import HsExpr(ArithSeqInfo, Expr, Qual)
9 import HsLit(Literal)
10 import HsMatches(Match)
11 import HsPat(TypecheckedPat)
12 import HsTypes(PolyType)
13 import Id(Id)
14 import Inst(Inst)
15 import PreludePS(_PackedString)
16 import SplitUniq(SplitUniqSupply)
17 import SrcLoc(SrcLoc)
18 import TyVar(TyVar)
19 import UniType(UniType)
20 data Bag a 
21 data GlobalSwitch 
22 data SwitchResult 
23 data CoreBinding a b 
24 data DsMatchContext 
25 data DsMatchKind 
26 data Binds a b 
27 data Expr a b 
28 data TypecheckedPat 
29 data Id 
30 data SplitUniqSupply 
31 deSugar :: SplitUniqSupply -> (GlobalSwitch -> SwitchResult) -> _PackedString -> (Binds Id TypecheckedPat, Binds Id TypecheckedPat, Binds Id TypecheckedPat, [(Inst, Expr Id TypecheckedPat)]) -> ([CoreBinding Id Id], Bag DsMatchContext)
32