summaryrefslogtreecommitdiff
path: root/parsing/extend.ml
diff options
context:
space:
mode:
Diffstat (limited to 'parsing/extend.ml')
-rw-r--r--parsing/extend.ml6
1 files changed, 4 insertions, 2 deletions
diff --git a/parsing/extend.ml b/parsing/extend.ml
index 5e79cbd5..92ca4dd1 100644
--- a/parsing/extend.ml
+++ b/parsing/extend.ml
@@ -6,7 +6,7 @@
(* * GNU Lesser General Public License Version 2.1 *)
(************************************************************************)
-(*i $Id$ i*)
+(*i $Id: extend.ml 13329 2010-07-26 11:05:39Z herbelin $ i*)
open Util
@@ -45,16 +45,18 @@ type production_level =
type ('lev,'pos) constr_entry_key_gen =
| ETName | ETReference | ETBigint
+ | ETBinder of bool
| ETConstr of ('lev * 'pos)
| ETPattern
| ETOther of string * string
| ETConstrList of ('lev * 'pos) * Token.pattern list
+ | ETBinderList of bool * Token.pattern list
(* Entries level (left-hand-side of grammar rules) *)
type constr_entry_key =
(int,unit) constr_entry_key_gen
-(* Entries used in productions (in right-hand-side of grammar rules) *)
+(* Entries used in productions (in right-hand side of grammar rules) *)
type constr_prod_entry_key =
(production_level,production_position) constr_entry_key_gen