msyds/rlp
1
0
Fork 0
Code Issues 4 Pull Requests Actions Packages Projects Releases 2 Wiki Activity

let layout

Browse Source
This commit is contained in:
crumbtoo
2024-01-28 19:41:36 -07:00
parent ab979cb934
commit fbea3d6f3d
2 changed files with 2 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
Makefile_happysrcs
View File

@@ -1,5 +1,5 @@
HAPPY = happy HAPPY = happy
HAPPY_OPTS = -a -g -c HAPPY_OPTS = -a -g -c -i/tmp/t.info
ALEX = alex ALEX = alex
ALEX_OPTS = -g ALEX_OPTS = -g

3
src/Rlp/Parse.y
View File

@@ -160,8 +160,7 @@ LetExpr :: { RlpExpr' RlpcPs }
layout1(p) : '{' layout_list1(';',p) '}' { $2 } layout1(p) : '{' layout_list1(';',p) '}' { $2 }
| VL layout_list1(VS,p) VR { $2 } | VL layout_list1(VS,p) VR { $2 }
layout_list1(sep,p) : p sep { [$1] } layout_list1(sep,p) : p { [$1] }
| p { [$1] }
| layout_list1(sep,p) sep p { $1 `snoc` $3 } | layout_list1(sep,p) sep p { $1 `snoc` $3 }
Binding :: { Binding' RlpcPs } Binding :: { Binding' RlpcPs }