Fix parse errors causing crashes instead of nice errors

This commit is contained in:
Ulf Norell
2019-12-06 17:09:48 +01:00
parent 6ca63e4b40
commit bf5e2e2443
5 changed files with 42 additions and 7 deletions
+4 -3
View File
@@ -100,9 +100,8 @@
| {list, ann(), [expr()]}
| {list_comp, ann(), expr(), [comprehension_exp()]}
| {typed, ann(), expr(), type()}
| {record, ann(), [field(expr())]}
| {record, ann(), expr(), [field(expr())]} %% record update
| {map, ann(), expr(), [field(expr())]} %% map update
| {record_or_map(), ann(), [field(expr())]}
| {record_or_map(), ann(), expr(), [field(expr())]} %% record/map update
| {map, ann(), [{expr(), expr()}]}
| {map_get, ann(), expr(), expr()}
| {map_get, ann(), expr(), expr(), expr()}
@@ -111,6 +110,8 @@
| id() | qid() | con() | qcon()
| constant().
-type record_or_map() :: record | map | record_or_map_error.
-type comprehension_exp() :: [ {comprehension_bind, id(), expr()}
| {comprehension_if, ann(), expr()}
| letbind() ].