X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Ftypecheck%2FSpec.hi;fp=ghc%2Fcompiler%2Ftypecheck%2FSpec.hi;h=0000000000000000000000000000000000000000;hb=6c381e873e222417d9a67aeec77b9555eca7b7a8;hp=121b12f42a857c5cd86740f20c15cc1f28cb77eb;hpb=8147a9f0bcc48ef0db1e91f8b985a4f5c3fed560;p=ghc-hetmet.git diff --git a/ghc/compiler/typecheck/Spec.hi b/ghc/compiler/typecheck/Spec.hi deleted file mode 100644 index 121b12f..0000000 --- a/ghc/compiler/typecheck/Spec.hi +++ /dev/null @@ -1,18 +0,0 @@ -{-# GHC_PRAGMA INTERFACE VERSION 5 #-} -interface Spec where -import Bag(Bag) -import CmdLineOpts(GlobalSwitch) -import HsExpr(Expr) -import HsPat(TypecheckedPat) -import Id(Id) -import Inst(Inst, InstOrigin) -import LIE(LIE) -import Pretty(PprStyle, PrettyRep) -import SplitUniq(SplitUniqSupply) -import SrcLoc(SrcLoc) -import Subst(Subst) -import TyVar(TyVar) -import UniType(UniType) -specId :: Id -> (GlobalSwitch -> Bool) -> [UniType] -> Subst -> SplitUniqSupply -> Bag (PprStyle -> Int -> Bool -> PrettyRep) -> SrcLoc -> ((Expr Id TypecheckedPat, LIE, UniType), Subst, Bag (PprStyle -> Int -> Bool -> PrettyRep)) -specTy :: InstOrigin -> UniType -> (GlobalSwitch -> Bool) -> [UniType] -> Subst -> SplitUniqSupply -> Bag (PprStyle -> Int -> Bool -> PrettyRep) -> SrcLoc -> (([TyVar], [Inst], UniType), Subst, Bag (PprStyle -> Int -> Bool -> PrettyRep)) -