diff options
| author | herbelin | 2010-07-22 21:06:18 +0000 |
|---|---|---|
| committer | herbelin | 2010-07-22 21:06:18 +0000 |
| commit | fc06cb87286e2b114c7f92500511d5914b8f7f48 (patch) | |
| tree | 71b120c836f660f7fa4a47447854b8859a2caf27 /interp/constrintern.mli | |
| parent | 1f798216ede7e3813d75732fbebc1f8fbf6622c5 (diff) | |
Extension of the recursive notations mechanism
- Added support for recursive notations with binders
- Added support for arbitrary large iterators in recursive notations
- More checks on the use of variables and improved error messages
- Do side-effects in metasyntax only when sure that everything is ok
- Documentation
Note: it seems there were a small bug in match_alist (instances obtained
from matching the first copy of iterator were not propagated).
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@13316 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'interp/constrintern.mli')
| -rw-r--r-- | interp/constrintern.mli | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/interp/constrintern.mli b/interp/constrintern.mli index e1f1c50b46..642fc25afe 100644 --- a/interp/constrintern.mli +++ b/interp/constrintern.mli @@ -171,10 +171,14 @@ val construct_reference : named_context -> identifier -> constr val global_reference : identifier -> constr val global_reference_in_absolute_module : dir_path -> identifier -> constr -(** Interprets into a abbreviatable constr *) - +(** Interprets a term as the left-hand side of a notation; the boolean + list is a set and this set is [true] for a variable occurring in + term position, [false] for a variable occurring in binding + position; [true;false] if in both kinds of position *) val interp_aconstr : ?impls:internalization_env -> - identifier list * identifier list -> constr_expr -> interpretation + (identifier * notation_var_internalization_type) list -> + (identifier * identifier) list -> constr_expr -> + (identifier * (subscopes * notation_var_internalization_type)) list * aconstr (** Globalization leak for Grammar *) val for_grammar : ('a -> 'b) -> 'a -> 'b |