diff options
| author |  Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2017-10-31 16:45:47 +0100 |
|---|---|---|
| committer | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2017-11-02 11:19:08 +0100 |
| commit | 714a72985d3123bf2ef3e8c67cdcefc23990ab53 (patch) | |
| tree | 7e2db5fb1eb1bbe11275c02cf72f1843c38c089a /interp/stdarg.ml | |
| parent | c616bd4d9819e4cd3c868716cb92663b3c69e069 (diff) | |
Do not identify a pre_ident as a string Ltac value.
It should be printed without quotes and it already has its
interpretation function.
Diffstat (limited to 'interp/stdarg.ml')
| -rw-r--r-- | interp/stdarg.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/interp/stdarg.ml b/interp/stdarg.ml index 45dec5112..65c55a584 100644 --- a/interp/stdarg.ml +++ b/interp/stdarg.ml @@ -28,7 +28,7 @@ let wit_string : string uniform_genarg_type = make0 "string" let wit_pre_ident : string uniform_genarg_type = - make0 ~dyn:(val_tag (topwit wit_string)) "preident" + make0 "preident" let loc_of_or_by_notation f = function | AN c -> f c |