diff options
| -rw-r--r-- | printing/pptactic.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/printing/pptactic.ml b/printing/pptactic.ml index d1039c1277..7e903d2d3d 100644 --- a/printing/pptactic.ml +++ b/printing/pptactic.ml @@ -1278,7 +1278,7 @@ module Make | TacNumgoals -> keyword "numgoals" | (TacCall _|Tacexp _ | TacGeneric _) as a -> - keyword "ltac:" ++ surround (pr_tac ltop (TacArg (Loc.ghost,a))) + keyword "ltac:" ++ pr_tac (latom,E) (TacArg (Loc.ghost,a)) in pr_tac |