projects
/
ghc-hetmet.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Add PA dfuns to VectMonad state
[ghc-hetmet.git]
/
compiler
/
deSugar
/
Match.lhs-boot
1
\begin{code}
2
module Match where
3
import Var ( Id )
4
import TcType ( Type )
5
import DsMonad ( DsM, EquationInfo, MatchResult )
6
import CoreSyn ( CoreExpr )
7
import HsSyn ( LPat, HsMatchContext, MatchGroup )
8
import Name ( Name )
9
10
match :: [Id]
11
-> Type
12
-> [EquationInfo]
13
-> DsM MatchResult
14
15
matchWrapper
16
:: HsMatchContext Name
17
-> MatchGroup Id
18
-> DsM ([Id], CoreExpr)
19
20
matchSimply
21
:: CoreExpr
22
-> HsMatchContext Name
23
-> LPat Id
24
-> CoreExpr
25
-> CoreExpr
26
-> DsM CoreExpr
27
28
matchSinglePat
29
:: CoreExpr
30
-> HsMatchContext Name
31
-> LPat Id
32
-> Type
33
-> MatchResult
34
-> DsM MatchResult
35
\end{code}