diff options
| author | herbelin | 2003-01-20 17:58:08 +0000 |
|---|---|---|
| committer | herbelin | 2003-01-20 17:58:08 +0000 |
| commit | c7ca56b69d8813bac3d44b0df0f671d150c7e1aa (patch) | |
| tree | 532278def9fd981026927eb5442dee0d7087fa3f | |
| parent | aa614e5692651ae621a0333ce947efd346a8e5d5 (diff) | |
Mauvaise interprétatin de IdentArgType
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@3550 85f007b7-540e-0410-9357-904b9bb8a0f7
| -rw-r--r-- | tactics/tacinterp.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tactics/tacinterp.ml b/tactics/tacinterp.ml index d45273f408..787ef77014 100644 --- a/tactics/tacinterp.ml +++ b/tactics/tacinterp.ml @@ -1375,7 +1375,7 @@ and genarg_interp ist goal x = | PreIdentArgType -> in_gen wit_pre_ident (out_gen rawwit_pre_ident x) | IdentArgType -> - in_gen wit_ident (out_gen rawwit_ident x) + in_gen wit_ident (eval_ident ist (out_gen rawwit_ident x)) | RefArgType -> in_gen wit_ref (pf_reference_interp ist goal (out_gen rawwit_ref x)) | SortArgType -> |