remove empty dir
[ghc-hetmet.git] / ghc / compiler / deSugar / Match.lhs-boot
index 424838e..5f99f5c 100644 (file)
@@ -2,7 +2,7 @@
 module Match where
 import Var     ( Id )
 import TcType  ( TcType )
-import DsMonad ( DsM, DsMatchContext, EquationInfo, MatchResult )
+import DsMonad ( DsM, EquationInfo, MatchResult )
 import CoreSyn ( CoreExpr )
 import HsSyn   ( LPat, HsMatchContext, MatchGroup )
 import Name    ( Name )
@@ -27,7 +27,7 @@ matchSimply
 
 matchSinglePat
        :: CoreExpr
-       -> DsMatchContext
+       -> HsMatchContext Name
        -> LPat Id
         -> TcType
        -> MatchResult