aboutsummaryrefslogtreecommitdiff
path: root/parsing/extend.ml
diff options
context:
space:
mode:
authorHugo Herbelin2020-02-10 17:27:21 +0100
committerHugo Herbelin2020-02-15 22:23:08 +0100
commit45ced1c1af3dbe7f81c8b928aeb76ebadfe709ea (patch)
tree8159a3c46ba0d7335b9d2b9e51a7981c3cd4457a /parsing/extend.ml
parent7985e4f9422216566d7d4675f8c562da9b989d0f (diff)
Reorganize type "production_level" along a more intuitive structure.
NextLevel = at next level NumLevel n = at level n DefaultLevel = <no mention of level>
Diffstat (limited to 'parsing/extend.ml')
-rw-r--r--parsing/extend.ml3
1 files changed, 2 insertions, 1 deletions
diff --git a/parsing/extend.ml b/parsing/extend.ml
index dcdaa25c33..848861238a 100644
--- a/parsing/extend.ml
+++ b/parsing/extend.ml
@@ -21,6 +21,7 @@ type production_position =
type production_level =
| NextLevel
| NumLevel of int
+ | DefaultLevel (** Interpreted differently at the border or inside a rule *)
(** User-level types used to tell how to parse or interpret of the non-terminal *)
@@ -40,7 +41,7 @@ type constr_entry_key =
(** Entries used in productions, vernac side (e.g. "x bigint" or "x ident") *)
type simple_constr_prod_entry_key =
- production_level option constr_entry_key_gen
+ production_level constr_entry_key_gen
(** Entries used in productions (in right-hand-side of grammar rules), to parse non-terminals *)