2017-02-23 21:06:49 +03:00
|
|
|
(Program
|
|
|
|
(Module
|
|
|
|
(Identifier))
|
2017-10-31 20:33:37 +03:00
|
|
|
(Function
|
|
|
|
(Empty)
|
|
|
|
(Identifier)
|
2017-11-10 04:01:19 +03:00
|
|
|
([])
|
2017-10-31 20:33:37 +03:00
|
|
|
{ (Match
|
|
|
|
{-(Empty)-}
|
|
|
|
{-([])-})
|
|
|
|
->(
|
|
|
|
{+(Match
|
2017-11-15 21:57:12 +03:00
|
|
|
{+([])+}
|
2017-10-31 20:33:37 +03:00
|
|
|
{+(Pattern
|
|
|
|
{+(Identifier)+}
|
|
|
|
{+(Call
|
|
|
|
{+(Identifier)+}
|
2017-11-15 21:57:12 +03:00
|
|
|
{+(Empty)+})+})+})+}
|
2017-10-31 20:33:37 +03:00
|
|
|
{+(Match
|
2017-11-15 21:57:12 +03:00
|
|
|
{+(
|
|
|
|
{+(Identifier)+})+}
|
2017-10-31 20:33:37 +03:00
|
|
|
{+(
|
|
|
|
{+(Pattern
|
|
|
|
{+(
|
|
|
|
{+(Integer)+}
|
|
|
|
{+(Integer)+})+}
|
|
|
|
{+(
|
|
|
|
{+(Call
|
|
|
|
{+(Identifier)+}
|
|
|
|
{+(Empty)+})+}
|
|
|
|
{+(Call
|
|
|
|
{+(Identifier)+}
|
|
|
|
{+(Empty)+})+}
|
|
|
|
{+(Pattern
|
|
|
|
{+(Identifier)+}
|
|
|
|
{+(Empty)+})+})+})+}
|
|
|
|
{+(DefaultPattern
|
|
|
|
{+(
|
|
|
|
{+(Call
|
|
|
|
{+(Identifier)+}
|
|
|
|
{+(Empty)+})+}
|
|
|
|
{+(Break
|
|
|
|
{+(Empty)+})+})+})+})+})+}) }))
|