File: VisagePatterns.ag

package info (click to toggle)
uuagc 0.9.56-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 5,764 kB
  • sloc: haskell: 84,340; makefile: 11
file content (19 lines) | stat: -rw-r--r-- 686 bytes parent folder | download | duplicates (5) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
imports
{
import UU.Scanner.Position(Pos)
import CommonTypes
}

TYPE VisagePatterns   = [VisagePattern]

DATA VisagePattern    | VConstr     name  : {ConstructorIdent}
                                    pats  : VisagePatterns
                      | VProduct    pos   : {Pos}
                                    pats  : VisagePatterns
                      | VVar        field : {Identifier}             
                                    attr  : {Identifier}
                      | VAlias      field : {Identifier}
                                    attr  : {Identifier}
                                    pat   : VisagePattern
                      | VUnderscore pos   : {Pos}