uplime/lamb
uplime
/
lamb
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

parser2: add variable patterns, fix integer

This commit is contained in:
darkf 2013-11-01 20:39:34 -07:00
parent 4b4b32b9dd
commit 66328dd1b2
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
parser2.hs
View File

@ -33,8 +33,9 @@ patternlist :: Pattern
pattern :: Pattern
= pattern "::" pattern { ConsP $1 $2 }
/ "[" patternlist "]"
/ integer { IntP $1 }
/ identifier { VarP $1 }
/ stringlit { StrP $1 }
/ integer { IntP $1 }
funpattern :: Pattern
= pattern ("," pattern)+ { TupleP ($1 : $2) }
@ -92,7 +93,7 @@ identifier ::: String
= [a-zA-Z_] [a-zA-Z0-9_'?!]* { $1 : $2 }
integer ::: Integer
= [1-9] [0-9]* { read ($1 : $2) }
= [0-9] [0-9]* { read ($1 : $2) }
|]
main :: IO ()