diff options
author | 2004-03-01 14:53:49 +0000 | |
---|---|---|
committer | 2004-03-01 14:53:49 +0000 | |
commit | ece6204d9ccb8e37f5050ba4ee5c3d43669bf6ef (patch) | |
tree | 327c17ed98f7dab0889cc4d86b47f66ff4e587d0 /parsing/g_tacticnew.ml4 | |
parent | f2936eda4ab74f830a4866983d6efd99fc6683ca (diff) |
Généralisation du type ltac Identifier en IntroPattern; prise en compte des IntroPattern au parsing, à l'interprétation, à la traduction
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@5405 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'parsing/g_tacticnew.ml4')
-rw-r--r-- | parsing/g_tacticnew.ml4 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/parsing/g_tacticnew.ml4 b/parsing/g_tacticnew.ml4 index 4cdf0bc35..721697c9a 100644 --- a/parsing/g_tacticnew.ml4 +++ b/parsing/g_tacticnew.ml4 @@ -130,7 +130,7 @@ let join_to_constr loc c2 = (fst loc), snd (Topconstr.constr_loc c2) if not !Options.v7 then GEXTEND Gram GLOBAL: simple_tactic constr_with_bindings quantified_hypothesis - bindings red_expr int_or_var castedopenconstr; + bindings red_expr int_or_var castedopenconstr simple_intropattern; int_or_var: [ [ n = integer -> Genarg.ArgArg n |