diff options
| author | herbelin | 2003-05-26 15:20:47 +0000 |
|---|---|---|
| committer | herbelin | 2003-05-26 15:20:47 +0000 |
| commit | 81a81fb04a6584f673c864a554187c61b36424d9 (patch) | |
| tree | afa68123ace8686f3af943949b1ad92a62aabee7 | |
| parent | e0152ebf31e3a7da7407d81a0588c769ffffa913 (diff) | |
Bug
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@4081 85f007b7-540e-0410-9357-904b9bb8a0f7
| -rw-r--r-- | parsing/g_ltacnew.ml4 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/parsing/g_ltacnew.ml4 b/parsing/g_ltacnew.ml4 index 712eefe92b..2414afe238 100644 --- a/parsing/g_ltacnew.ml4 +++ b/parsing/g_ltacnew.ml4 @@ -120,7 +120,7 @@ GEXTEND Gram | IDENT "check"; c = Constr.lconstr -> TacArg(ConstrMayEval (ConstrTypeOf c)) | IDENT "freshid"; s = OPT STRING -> - TacFreshId s + TacArg (TacFreshId s) | "'"; c = Constr.constr -> TacArg(ConstrMayEval(ConstrTerm c)) | r = reference; la = LIST1 tactic_arg -> TacArg(TacCall (loc,r,la)) |