blob: 66ecc8aba6d90c6d8de6ab001a09ec5d8f1d30cc (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
|
\begin{code}
module Match where
import Var ( Id )
import TcType ( Type )
import DsMonad ( DsM, EquationInfo, MatchResult )
import CoreSyn ( CoreExpr )
import HsSyn ( LPat, HsMatchContext, MatchGroup, LHsExpr )
import Name ( Name )
match :: [Id]
-> Type
-> [EquationInfo]
-> DsM MatchResult
matchWrapper
:: HsMatchContext Name
-> MatchGroup Id (LHsExpr Id)
-> DsM ([Id], CoreExpr)
matchSimply
:: CoreExpr
-> HsMatchContext Name
-> LPat Id
-> CoreExpr
-> CoreExpr
-> DsM CoreExpr
matchSinglePat
:: CoreExpr
-> HsMatchContext Name
-> LPat Id
-> Type
-> MatchResult
-> DsM MatchResult
\end{code}
|