diff options
| author | coqbot-app[bot] | 2021-02-11 23:32:01 +0000 |
|---|---|---|
| committer | GitHub | 2021-02-11 23:32:01 +0000 |
| commit | c0e0e637c61e075f43b73d1ddd8eaa9d79b27561 (patch) | |
| tree | ce95c0dffc03c16e41590a2d435d5e949e3c9654 /coqpp | |
| parent | b1532790555b122b5bb3091405595b4b5586483e (diff) | |
| parent | 0a88e8ffeec97768096a32ad1cdd886103aaf30a (diff) | |
Merge PR #13844: [vernac] pass the loc of the whole command to the interp function
Reviewed-by: ejgallego
Diffstat (limited to 'coqpp')
| -rw-r--r-- | coqpp/coqpp_main.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/coqpp/coqpp_main.ml b/coqpp/coqpp_main.ml index 8affe58824..2de103a2ff 100644 --- a/coqpp/coqpp_main.ml +++ b/coqpp/coqpp_main.ml @@ -360,7 +360,7 @@ let print_body_fun state fmt r = print_binders r.vernac_toks print_atts_left r.vernac_atts (print_body_state state) r let print_body state fmt r = - fprintf fmt "@[(%afun %a~atts@ -> coqpp_body %a%a)@]" + fprintf fmt "@[(%afun %a?loc ~atts@ -> coqpp_body %a%a)@]" (print_body_fun state) r print_binders r.vernac_toks print_binders r.vernac_toks print_atts_right r.vernac_atts |