[project @ 1996-03-19 08:58:34 by partain]
[ghc-hetmet.git] / ghc / compiler / deSugar / DsGRHSs.hi
diff --git a/ghc/compiler/deSugar/DsGRHSs.hi b/ghc/compiler/deSugar/DsGRHSs.hi
deleted file mode 100644 (file)
index ec2f749..0000000
+++ /dev/null
@@ -1,18 +0,0 @@
-{-# GHC_PRAGMA INTERFACE VERSION 5 #-}
-interface DsGRHSs where
-import Bag(Bag)
-import CmdLineOpts(GlobalSwitch, SwitchResult)
-import CoreSyn(CoreExpr)
-import DsMonad(DsMatchContext, DsMatchKind)
-import DsUtils(MatchResult)
-import HsMatches(GRHS, GRHSsAndBinds)
-import HsPat(TypecheckedPat)
-import Id(Id)
-import PreludePS(_PackedString)
-import SplitUniq(SplitUniqSupply)
-import SrcLoc(SrcLoc)
-import UniType(UniType)
-import UniqFM(UniqFM)
-dsGRHSs :: UniType -> DsMatchKind -> [TypecheckedPat] -> [GRHS Id TypecheckedPat] -> SplitUniqSupply -> SrcLoc -> (GlobalSwitch -> SwitchResult) -> (_PackedString, _PackedString) -> UniqFM (CoreExpr Id Id) -> Bag DsMatchContext -> (MatchResult, Bag DsMatchContext)
-dsGuarded :: GRHSsAndBinds Id TypecheckedPat -> SrcLoc -> SplitUniqSupply -> SrcLoc -> (GlobalSwitch -> SwitchResult) -> (_PackedString, _PackedString) -> UniqFM (CoreExpr Id Id) -> Bag DsMatchContext -> (CoreExpr Id Id, Bag DsMatchContext)
-