diff options
Diffstat (limited to 'printing/pptactic.ml')
| -rw-r--r-- | printing/pptactic.ml | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/printing/pptactic.ml b/printing/pptactic.ml index c317d4f3f9..8bdea1356b 100644 --- a/printing/pptactic.ml +++ b/printing/pptactic.ml @@ -906,6 +906,9 @@ let rec pr_tac inherited tac = | TacProgress t -> hov 1 (str "progress" ++ spc () ++ pr_tac (ltactical,E) t), ltactical + | TacShowHyps t -> + hov 1 (str "infoH" ++ spc () ++ spc () ++ pr_tac (ltactical,E) t), + ltactical | TacInfo t -> hov 1 (str "info" ++ spc () ++ pr_tac (ltactical,E) t), linfo |