Rakarake/churf
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

added PEnum

Browse source
This commit is contained in:
sebastianselander 2023-03-24 17:39:10 +01:00
parent d6d0fb7146
commit 41fc863658
5 changed files with 43 additions and 20 deletions
Download patch file Download diff file Expand all files Collapse all files

16
Grammar.cf
View file

@ -66,26 +66,28 @@ LChar. Lit ::= Char ;
Branch. Branch ::= Pattern "=>" Exp ;
PVar. Pattern ::= LIdent ;
PLit. Pattern ::= Lit ;
PInj. Pattern ::= UIdent [Pattern] ;
PCatch. Pattern ::= "_" ;
PVar. Pattern1 ::= LIdent ;
PLit. Pattern1 ::= Lit ;
PCatch. Pattern1 ::= "_" ;
PEnum. Pattern1 ::= UIdent ;
PInj. Pattern ::= UIdent [Pattern1] ;
-------------------------------------------------------------------------------
-- * AUX
-------------------------------------------------------------------------------
separator Def ";" ;
terminator Def ";" ;
separator nonempty Constructor "" ;
separator Type " " ;
separator Pattern " " ;
separator Branch "," ;
separator nonempty Pattern1 " " ;
terminator Branch ";" ;
separator Ident " ";
separator LIdent " ";
separator TVar " " ;
coercions Exp 4 ;
coercions Type 2 ;
coercions Pattern 1 ;
token UIdent (upper (letter | digit | '_')*) ;
token LIdent (lower (letter | digit | '_')*) ;