Fixes.
This commit is contained in:
parent
6c818567fa
commit
ce31bc2572
@ -1,6 +1,6 @@
|
|||||||
option(X) :=
|
option(item) :=
|
||||||
(**)
|
(**)
|
||||||
| X
|
| item
|
||||||
|
|
||||||
series(item,sep,term) ::=
|
series(item,sep,term) ::=
|
||||||
item after_item(item,sep,term)
|
item after_item(item,sep,term)
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
option(X) :=
|
option(item) :=
|
||||||
(**)
|
(**)
|
||||||
| X
|
| item
|
||||||
|
|
||||||
series(item,sep,term) ::=
|
series(item,sep,term) ::=
|
||||||
item after_item(item,sep,term)
|
item after_item(item,sep,term)
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
option(X) :=
|
option(item) :=
|
||||||
(**)
|
(**)
|
||||||
| X
|
| item
|
||||||
|
|
||||||
series(item,sep,term) ::=
|
series(item,sep,term) ::=
|
||||||
item after_item(item,sep,term)
|
item after_item(item,sep,term)
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
option(X) :=
|
option(item) :=
|
||||||
(**)
|
(**)
|
||||||
| X
|
| item
|
||||||
|
|
||||||
series(item,sep,term) ::=
|
series(item,sep,term) ::=
|
||||||
item after_item(item,sep,term)
|
item after_item(item,sep,term)
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
option(X) :=
|
option(item) :=
|
||||||
(**)
|
(**)
|
||||||
| X
|
| item
|
||||||
|
|
||||||
series(item,sep,term) ::=
|
series(item,sep,term) ::=
|
||||||
item after_item(item,sep,term)
|
item after_item(item,sep,term)
|
||||||
@ -195,9 +195,9 @@ single_instr ::=
|
|||||||
injection(Kind,element) ::=
|
injection(Kind,element) ::=
|
||||||
Kind series(element,SEMI,End)
|
Kind series(element,SEMI,End)
|
||||||
| Kind End
|
| Kind End
|
||||||
| Kind LBRACKET bracketed
|
| Kind LBRACKET bracketed(element)
|
||||||
|
|
||||||
bracketed ::=
|
bracketed(element) ::=
|
||||||
series(element,SEMI,RBRACKET)
|
series(element,SEMI,RBRACKET)
|
||||||
| RBRACKET
|
| RBRACKET
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
option(X) :=
|
option(item) :=
|
||||||
(**)
|
(**)
|
||||||
| X
|
| item
|
||||||
|
|
||||||
series(item,sep,term) ::=
|
series(item,sep,term) ::=
|
||||||
item after_item(item,sep,term)
|
item after_item(item,sep,term)
|
||||||
@ -15,31 +15,31 @@ item_or_closing(item,sep,term) ::=
|
|||||||
|
|
||||||
(* Compound constructs *)
|
(* Compound constructs *)
|
||||||
|
|
||||||
par(X) ::= LPAR X RPAR
|
par(item) ::= LPAR item RPAR
|
||||||
|
|
||||||
brackets(X) ::= LBRACKET X RBRACKET
|
brackets(item) ::= LBRACKET item RBRACKET
|
||||||
|
|
||||||
(* Sequences *)
|
(* Sequences *)
|
||||||
|
|
||||||
(* Possibly empty sequence of items *)
|
(* Possibly empty sequence of items *)
|
||||||
|
|
||||||
seq(X) ::=
|
seq(item) ::=
|
||||||
option(nseq(X))
|
option(nseq(item))
|
||||||
|
|
||||||
(* Non-empty sequence of items *)
|
(* Non-empty sequence of items *)
|
||||||
|
|
||||||
nseq(X) ::= X seq(X)
|
nseq(item) ::= item seq(item)
|
||||||
|
|
||||||
(* Non-empty separated sequence of items *)
|
(* Non-empty separated sequence of items *)
|
||||||
|
|
||||||
nsepseq(X,Sep) ::=
|
nsepseq(item,Sep) ::=
|
||||||
X
|
item
|
||||||
| X Sep nsepseq(X,Sep)
|
| item Sep nsepseq(item,Sep)
|
||||||
|
|
||||||
(* Possibly empty separated sequence of items *)
|
(* Possibly empty separated sequence of items *)
|
||||||
|
|
||||||
sepseq(X,Sep) ::=
|
sepseq(item,Sep) ::=
|
||||||
option(nsepseq(X,Sep))
|
option(nsepseq(item,Sep))
|
||||||
|
|
||||||
(* Main *)
|
(* Main *)
|
||||||
|
|
||||||
@ -182,9 +182,9 @@ single_instr ::=
|
|||||||
injection(Kind,element) ::=
|
injection(Kind,element) ::=
|
||||||
Kind series(element,SEMI,End)
|
Kind series(element,SEMI,End)
|
||||||
| Kind End
|
| Kind End
|
||||||
| Kind LBRACKET bracketed
|
| Kind LBRACKET bracketed(element)
|
||||||
|
|
||||||
bracketed ::=
|
bracketed(element) ::=
|
||||||
series(element,SEMI,RBRACKET)
|
series(element,SEMI,RBRACKET)
|
||||||
| RBRACKET
|
| RBRACKET
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
option(X) :=
|
option(item) :=
|
||||||
(**)
|
(**)
|
||||||
| X
|
| item
|
||||||
|
|
||||||
series(item,sep,term) ::=
|
series(item,sep,term) ::=
|
||||||
item after_item(item,sep,term)
|
item after_item(item,sep,term)
|
||||||
@ -187,9 +187,9 @@ single_instr ::=
|
|||||||
injection(Kind,element) ::=
|
injection(Kind,element) ::=
|
||||||
Kind series(element,SEMI,End)
|
Kind series(element,SEMI,End)
|
||||||
| Kind End
|
| Kind End
|
||||||
| Kind LBRACKET bracketed
|
| Kind LBRACKET bracketed(element)
|
||||||
|
|
||||||
bracketed ::=
|
bracketed(element) ::=
|
||||||
series(element,SEMI,RBRACKET)
|
series(element,SEMI,RBRACKET)
|
||||||
| RBRACKET
|
| RBRACKET
|
||||||
|
|
||||||
|
@ -5,9 +5,9 @@ right_assoc(item,op) ::=
|
|||||||
left_assoc(item,op) ::=
|
left_assoc(item,op) ::=
|
||||||
right_assoc(item,op)
|
right_assoc(item,op)
|
||||||
|
|
||||||
option(X) :=
|
option(item) :=
|
||||||
(**)
|
(**)
|
||||||
| X
|
| item
|
||||||
|
|
||||||
series(item,sep,term) ::=
|
series(item,sep,term) ::=
|
||||||
item after_item(item,sep,term)
|
item after_item(item,sep,term)
|
||||||
@ -193,9 +193,9 @@ single_instr ::=
|
|||||||
injection(Kind,element) ::=
|
injection(Kind,element) ::=
|
||||||
Kind series(element,SEMI,End)
|
Kind series(element,SEMI,End)
|
||||||
| Kind End
|
| Kind End
|
||||||
| Kind LBRACKET bracketed
|
| Kind LBRACKET bracketed(element)
|
||||||
|
|
||||||
bracketed ::=
|
bracketed(element) ::=
|
||||||
series(element,SEMI,RBRACKET)
|
series(element,SEMI,RBRACKET)
|
||||||
| RBRACKET
|
| RBRACKET
|
||||||
|
|
||||||
|
@ -5,9 +5,9 @@ right_assoc(item,op) ::=
|
|||||||
left_assoc(item,op) ::=
|
left_assoc(item,op) ::=
|
||||||
right_assoc(item,op)
|
right_assoc(item,op)
|
||||||
|
|
||||||
option(X) :=
|
option(item) :=
|
||||||
(**)
|
(**)
|
||||||
| X
|
| item
|
||||||
|
|
||||||
series(item,sep,term) ::=
|
series(item,sep,term) ::=
|
||||||
item after_item(item,sep,term)
|
item after_item(item,sep,term)
|
||||||
@ -193,9 +193,9 @@ single_instr ::=
|
|||||||
injection(Kind,element) ::=
|
injection(Kind,element) ::=
|
||||||
Kind series(element,SEMI,End)
|
Kind series(element,SEMI,End)
|
||||||
| Kind End
|
| Kind End
|
||||||
| Kind LBRACKET bracketed
|
| Kind LBRACKET bracketed(element)
|
||||||
|
|
||||||
bracketed ::=
|
bracketed(element) ::=
|
||||||
series(element,SEMI,RBRACKET)
|
series(element,SEMI,RBRACKET)
|
||||||
| RBRACKET
|
| RBRACKET
|
||||||
|
|
||||||
|
@ -5,9 +5,9 @@ right_assoc(item,op) ::=
|
|||||||
left_assoc(item,op) ::=
|
left_assoc(item,op) ::=
|
||||||
right_assoc(item,op)
|
right_assoc(item,op)
|
||||||
|
|
||||||
option(X) :=
|
option(item) :=
|
||||||
(**)
|
(**)
|
||||||
| X
|
| item
|
||||||
|
|
||||||
series(item,sep,term) ::=
|
series(item,sep,term) ::=
|
||||||
item after_item(item,sep,term)
|
item after_item(item,sep,term)
|
||||||
@ -191,9 +191,9 @@ single_instr ::=
|
|||||||
injection(Kind,element) ::=
|
injection(Kind,element) ::=
|
||||||
Kind series(element,SEMI,End)
|
Kind series(element,SEMI,End)
|
||||||
| Kind End
|
| Kind End
|
||||||
| Kind LBRACKET bracketed
|
| Kind LBRACKET bracketed(element)
|
||||||
|
|
||||||
bracketed ::=
|
bracketed(element) ::=
|
||||||
series(element,SEMI,RBRACKET)
|
series(element,SEMI,RBRACKET)
|
||||||
| RBRACKET
|
| RBRACKET
|
||||||
|
|
||||||
|
@ -5,9 +5,9 @@ right_assoc(item,op) ::=
|
|||||||
left_assoc(item,op) ::=
|
left_assoc(item,op) ::=
|
||||||
right_assoc(item,op)
|
right_assoc(item,op)
|
||||||
|
|
||||||
option(X) :=
|
option(item) :=
|
||||||
(**)
|
(**)
|
||||||
| X
|
| item
|
||||||
|
|
||||||
series(item,sep,term) ::=
|
series(item,sep,term) ::=
|
||||||
item after_item(item,sep,term)
|
item after_item(item,sep,term)
|
||||||
@ -195,9 +195,9 @@ path ::=
|
|||||||
injection(Kind,element) ::=
|
injection(Kind,element) ::=
|
||||||
Kind series(element,SEMI,End)
|
Kind series(element,SEMI,End)
|
||||||
| Kind End
|
| Kind End
|
||||||
| Kind LBRACKET bracketed
|
| Kind LBRACKET bracketed(element)
|
||||||
|
|
||||||
bracketed ::=
|
bracketed(element) ::=
|
||||||
series(element,SEMI,RBRACKET)
|
series(element,SEMI,RBRACKET)
|
||||||
| RBRACKET
|
| RBRACKET
|
||||||
|
|
||||||
|
@ -5,9 +5,9 @@ right_assoc(item,op) ::=
|
|||||||
left_assoc(item,op) ::=
|
left_assoc(item,op) ::=
|
||||||
right_assoc(item,op)
|
right_assoc(item,op)
|
||||||
|
|
||||||
option(X) :=
|
option(item) :=
|
||||||
(**)
|
(**)
|
||||||
| X
|
| item
|
||||||
|
|
||||||
series(item,sep,term) ::=
|
series(item,sep,term) ::=
|
||||||
item after_item(item,sep,term)
|
item after_item(item,sep,term)
|
||||||
@ -195,9 +195,9 @@ path ::=
|
|||||||
injection(Kind,element) ::=
|
injection(Kind,element) ::=
|
||||||
Kind series(element,SEMI,End)
|
Kind series(element,SEMI,End)
|
||||||
| Kind End
|
| Kind End
|
||||||
| Kind LBRACKET bracketed
|
| Kind LBRACKET bracketed(element)
|
||||||
|
|
||||||
bracketed ::=
|
bracketed(element) ::=
|
||||||
series(element,SEMI,RBRACKET)
|
series(element,SEMI,RBRACKET)
|
||||||
| RBRACKET
|
| RBRACKET
|
||||||
|
|
||||||
@ -344,5 +344,8 @@ core_pattern ::=
|
|||||||
| par(cons_pattern)
|
| par(cons_pattern)
|
||||||
| par(nsepseq(core_pattern,COMMA))
|
| par(nsepseq(core_pattern,COMMA))
|
||||||
|
|
||||||
|
tuple_pattern ::=
|
||||||
|
par(nsepseq(core_pattern,COMMA))
|
||||||
|
|
||||||
cons_pattern ::=
|
cons_pattern ::=
|
||||||
core_pattern CONS pattern
|
core_pattern CONS pattern
|
||||||
|
@ -5,9 +5,9 @@ right_assoc(item,op) ::=
|
|||||||
left_assoc(item,op) ::=
|
left_assoc(item,op) ::=
|
||||||
right_assoc(item,op)
|
right_assoc(item,op)
|
||||||
|
|
||||||
option(X) :=
|
option(item) :=
|
||||||
(**)
|
(**)
|
||||||
| X
|
| item
|
||||||
|
|
||||||
series(item,sep,term) ::=
|
series(item,sep,term) ::=
|
||||||
item after_item(item,sep,term)
|
item after_item(item,sep,term)
|
||||||
@ -195,9 +195,9 @@ path ::=
|
|||||||
injection(Kind,element) ::=
|
injection(Kind,element) ::=
|
||||||
Kind series(element,SEMI,End)
|
Kind series(element,SEMI,End)
|
||||||
| Kind End
|
| Kind End
|
||||||
| Kind LBRACKET bracketed
|
| Kind LBRACKET bracketed(element)
|
||||||
|
|
||||||
bracketed ::=
|
bracketed(element) ::=
|
||||||
series(element,SEMI,RBRACKET)
|
series(element,SEMI,RBRACKET)
|
||||||
| RBRACKET
|
| RBRACKET
|
||||||
|
|
||||||
@ -345,5 +345,8 @@ core_pattern ::=
|
|||||||
| par(cons_pattern)
|
| par(cons_pattern)
|
||||||
| par(nsepseq(core_pattern,COMMA))
|
| par(nsepseq(core_pattern,COMMA))
|
||||||
|
|
||||||
|
tuple_pattern ::=
|
||||||
|
par(nsepseq(core_pattern,COMMA))
|
||||||
|
|
||||||
cons_pattern ::=
|
cons_pattern ::=
|
||||||
core_pattern CONS pattern
|
core_pattern CONS pattern
|
||||||
|
@ -5,9 +5,9 @@ right_assoc(item,op) ::=
|
|||||||
left_assoc(item,op) ::=
|
left_assoc(item,op) ::=
|
||||||
right_assoc(item,op)
|
right_assoc(item,op)
|
||||||
|
|
||||||
option(X) :=
|
option(item) :=
|
||||||
(**)
|
(**)
|
||||||
| X
|
| item
|
||||||
|
|
||||||
series(item,sep,term) ::=
|
series(item,sep,term) ::=
|
||||||
item after_item(item,sep,term)
|
item after_item(item,sep,term)
|
||||||
@ -195,9 +195,9 @@ path ::=
|
|||||||
injection(Kind,element) ::=
|
injection(Kind,element) ::=
|
||||||
Kind series(element,SEMI,End)
|
Kind series(element,SEMI,End)
|
||||||
| Kind End
|
| Kind End
|
||||||
| Kind LBRACKET bracketed
|
| Kind LBRACKET bracketed(element)
|
||||||
|
|
||||||
bracketed ::=
|
bracketed(element) ::=
|
||||||
series(element,SEMI,RBRACKET)
|
series(element,SEMI,RBRACKET)
|
||||||
| RBRACKET
|
| RBRACKET
|
||||||
|
|
||||||
@ -347,5 +347,8 @@ core_pattern ::=
|
|||||||
| par(cons_pattern)
|
| par(cons_pattern)
|
||||||
| par(nsepseq(core_pattern,COMMA))
|
| par(nsepseq(core_pattern,COMMA))
|
||||||
|
|
||||||
|
tuple_pattern ::=
|
||||||
|
par(nsepseq(core_pattern,COMMA))
|
||||||
|
|
||||||
cons_pattern ::=
|
cons_pattern ::=
|
||||||
core_pattern CONS pattern
|
core_pattern CONS pattern
|
||||||
|
@ -5,9 +5,9 @@ right_assoc(item,op) ::=
|
|||||||
left_assoc(item,op) ::=
|
left_assoc(item,op) ::=
|
||||||
right_assoc(item,op)
|
right_assoc(item,op)
|
||||||
|
|
||||||
option(X) :=
|
option(item) :=
|
||||||
(**)
|
(**)
|
||||||
| X
|
| item
|
||||||
|
|
||||||
series(item,sep,term) ::=
|
series(item,sep,term) ::=
|
||||||
item after_item(item,sep,term)
|
item after_item(item,sep,term)
|
||||||
@ -195,9 +195,9 @@ path ::=
|
|||||||
injection(Kind,element) ::=
|
injection(Kind,element) ::=
|
||||||
Kind series(element,SEMI,End)
|
Kind series(element,SEMI,End)
|
||||||
| Kind End
|
| Kind End
|
||||||
| Kind LBRACKET bracketed
|
| Kind LBRACKET bracketed(element)
|
||||||
|
|
||||||
bracketed ::=
|
bracketed(element) ::=
|
||||||
series(element,SEMI,RBRACKET)
|
series(element,SEMI,RBRACKET)
|
||||||
| RBRACKET
|
| RBRACKET
|
||||||
|
|
||||||
@ -350,5 +350,8 @@ core_pattern ::=
|
|||||||
| par(cons_pattern)
|
| par(cons_pattern)
|
||||||
| par(nsepseq(core_pattern,COMMA))
|
| par(nsepseq(core_pattern,COMMA))
|
||||||
|
|
||||||
|
tuple_pattern ::=
|
||||||
|
par(nsepseq(core_pattern,COMMA))
|
||||||
|
|
||||||
cons_pattern ::=
|
cons_pattern ::=
|
||||||
core_pattern CONS pattern
|
core_pattern CONS pattern
|
||||||
|
@ -5,9 +5,9 @@ right_assoc(item,op) ::=
|
|||||||
left_assoc(item,op) ::=
|
left_assoc(item,op) ::=
|
||||||
right_assoc(item,op)
|
right_assoc(item,op)
|
||||||
|
|
||||||
option(X) :=
|
option(item) :=
|
||||||
(**)
|
(**)
|
||||||
| X
|
| item
|
||||||
|
|
||||||
series(item,sep,term) ::=
|
series(item,sep,term) ::=
|
||||||
item after_item(item,sep,term)
|
item after_item(item,sep,term)
|
||||||
@ -195,9 +195,9 @@ path ::=
|
|||||||
injection(Kind,element) ::=
|
injection(Kind,element) ::=
|
||||||
Kind series(element,SEMI,End)
|
Kind series(element,SEMI,End)
|
||||||
| Kind End
|
| Kind End
|
||||||
| Kind LBRACKET bracketed
|
| Kind LBRACKET bracketed(element)
|
||||||
|
|
||||||
bracketed ::=
|
bracketed(element) ::=
|
||||||
series(element,SEMI,RBRACKET)
|
series(element,SEMI,RBRACKET)
|
||||||
| RBRACKET
|
| RBRACKET
|
||||||
|
|
||||||
@ -350,5 +350,8 @@ core_pattern ::=
|
|||||||
| LPAR cons_pattern RPAR
|
| LPAR cons_pattern RPAR
|
||||||
| LPAR nsepseq(core_pattern,COMMA) RPAR
|
| LPAR nsepseq(core_pattern,COMMA) RPAR
|
||||||
|
|
||||||
|
tuple_pattern ::=
|
||||||
|
par(nsepseq(core_pattern,COMMA))
|
||||||
|
|
||||||
cons_pattern ::=
|
cons_pattern ::=
|
||||||
core_pattern CONS pattern
|
core_pattern CONS pattern
|
||||||
|
@ -5,9 +5,9 @@ right_assoc(item,op) ::=
|
|||||||
left_assoc(item,op) ::=
|
left_assoc(item,op) ::=
|
||||||
right_assoc(item,op)
|
right_assoc(item,op)
|
||||||
|
|
||||||
option(X) :=
|
option(item) :=
|
||||||
(**)
|
(**)
|
||||||
| X
|
| item
|
||||||
|
|
||||||
series(item,sep,term) ::=
|
series(item,sep,term) ::=
|
||||||
item after_item(item,sep,term)
|
item after_item(item,sep,term)
|
||||||
@ -195,9 +195,9 @@ path ::=
|
|||||||
injection(Kind,element) ::=
|
injection(Kind,element) ::=
|
||||||
Kind series(element,SEMI,End)
|
Kind series(element,SEMI,End)
|
||||||
| Kind End
|
| Kind End
|
||||||
| Kind LBRACKET bracketed
|
| Kind LBRACKET bracketed(element)
|
||||||
|
|
||||||
bracketed ::=
|
bracketed(element) ::=
|
||||||
series(element,SEMI,RBRACKET)
|
series(element,SEMI,RBRACKET)
|
||||||
| RBRACKET
|
| RBRACKET
|
||||||
|
|
||||||
@ -353,5 +353,8 @@ paren_pattern ::=
|
|||||||
cons_pattern
|
cons_pattern
|
||||||
| nsepseq(core_pattern,COMMA)
|
| nsepseq(core_pattern,COMMA)
|
||||||
|
|
||||||
|
tuple_pattern ::=
|
||||||
|
par(nsepseq(core_pattern,COMMA))
|
||||||
|
|
||||||
cons_pattern ::=
|
cons_pattern ::=
|
||||||
core_pattern CONS pattern
|
core_pattern CONS pattern
|
||||||
|
@ -5,9 +5,9 @@ right_assoc(item,op) ::=
|
|||||||
left_assoc(item,op) ::=
|
left_assoc(item,op) ::=
|
||||||
right_assoc(item,op)
|
right_assoc(item,op)
|
||||||
|
|
||||||
option(X) :=
|
option(item) :=
|
||||||
(**)
|
(**)
|
||||||
| X
|
| item
|
||||||
|
|
||||||
series(item,sep,term) ::=
|
series(item,sep,term) ::=
|
||||||
item after_item(item,sep,term)
|
item after_item(item,sep,term)
|
||||||
@ -195,9 +195,9 @@ path ::=
|
|||||||
injection(Kind,element) ::=
|
injection(Kind,element) ::=
|
||||||
Kind series(element,SEMI,End)
|
Kind series(element,SEMI,End)
|
||||||
| Kind End
|
| Kind End
|
||||||
| Kind LBRACKET bracketed
|
| Kind LBRACKET bracketed(element)
|
||||||
|
|
||||||
bracketed ::=
|
bracketed(element) ::=
|
||||||
series(element,SEMI,RBRACKET)
|
series(element,SEMI,RBRACKET)
|
||||||
| RBRACKET
|
| RBRACKET
|
||||||
|
|
||||||
@ -353,3 +353,6 @@ paren_pattern ::=
|
|||||||
core_pattern CONS pattern
|
core_pattern CONS pattern
|
||||||
| core_pattern
|
| core_pattern
|
||||||
| core_pattern COMMA nsepseq(core_pattern,COMMA)
|
| core_pattern COMMA nsepseq(core_pattern,COMMA)
|
||||||
|
|
||||||
|
tuple_pattern ::=
|
||||||
|
par(nsepseq(core_pattern,COMMA))
|
||||||
|
@ -5,9 +5,9 @@ right_assoc(item,op) ::=
|
|||||||
left_assoc(item,op) ::=
|
left_assoc(item,op) ::=
|
||||||
right_assoc(item,op)
|
right_assoc(item,op)
|
||||||
|
|
||||||
option(X) :=
|
option(item) :=
|
||||||
(**)
|
(**)
|
||||||
| X
|
| item
|
||||||
|
|
||||||
series(item,sep,term) ::=
|
series(item,sep,term) ::=
|
||||||
item after_item(item,sep,term)
|
item after_item(item,sep,term)
|
||||||
@ -186,9 +186,9 @@ path ::=
|
|||||||
injection(Kind,element) ::=
|
injection(Kind,element) ::=
|
||||||
Kind series(element,SEMI,End)
|
Kind series(element,SEMI,End)
|
||||||
| Kind End
|
| Kind End
|
||||||
| Kind LBRACKET bracketed
|
| Kind LBRACKET bracketed(element)
|
||||||
|
|
||||||
bracketed ::=
|
bracketed(element) ::=
|
||||||
series(element,SEMI,RBRACKET)
|
series(element,SEMI,RBRACKET)
|
||||||
| RBRACKET
|
| RBRACKET
|
||||||
|
|
||||||
@ -283,7 +283,7 @@ core_expr ::=
|
|||||||
| C_None
|
| C_None
|
||||||
| C_Some arguments
|
| C_Some arguments
|
||||||
| Constr option(arguments)
|
| Constr option(arguments)
|
||||||
| LPAR paren_expr RPAR
|
| par(paren_expr)
|
||||||
| injection(List,expr)
|
| injection(List,expr)
|
||||||
| Nil
|
| Nil
|
||||||
| structure
|
| structure
|
||||||
@ -332,9 +332,12 @@ core_pattern ::=
|
|||||||
| Constr option(tuple_pattern)
|
| Constr option(tuple_pattern)
|
||||||
| injection(List,core_pattern)
|
| injection(List,core_pattern)
|
||||||
| Nil
|
| Nil
|
||||||
| LPAR paren_pattern RPAR
|
| par(paren_pattern)
|
||||||
|
|
||||||
paren_pattern ::=
|
paren_pattern ::=
|
||||||
core_pattern CONS pattern
|
core_pattern CONS pattern
|
||||||
| core_pattern
|
| core_pattern
|
||||||
| core_pattern COMMA nsepseq(core_pattern,COMMA)
|
| core_pattern COMMA nsepseq(core_pattern,COMMA)
|
||||||
|
|
||||||
|
tuple_pattern ::=
|
||||||
|
par(nsepseq(core_pattern,COMMA))
|
||||||
|
Loading…
Reference in New Issue
Block a user