aboutsummaryrefslogtreecommitdiff
path: root/translate
diff options
context:
space:
mode:
authorsacerdot2005-05-20 16:14:52 +0000
committersacerdot2005-05-20 16:14:52 +0000
commitd361ee5b960e1a54d451dc81557f19e504baa42a (patch)
tree417cf2b9bce2dcaf293cc9ab11ad5ebede7d2dc9 /translate
parentd0a324eef4d35a87e300a2b660b26fdbe2043d92 (diff)
New command: "Print Ltac qualid" to print user defined tactics.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@7053 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'translate')
-rw-r--r--translate/ppvernacnew.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/translate/ppvernacnew.ml b/translate/ppvernacnew.ml
index 86f20bb6f6..af1f66c739 100644
--- a/translate/ppvernacnew.ml
+++ b/translate/ppvernacnew.ml
@@ -1025,6 +1025,7 @@ let rec pr_vernac = function
| PrintMLModules -> str"Print ML Modules"
| PrintGraph -> str"Print Graph"
| PrintClasses -> str"Print Classes"
+ | PrintLtac qid -> str"Print Ltac" ++ spc() ++ pr_reference qid
| PrintCoercions -> str"Print Coercions"
| PrintCoercionPaths (s,t) -> str"Print Coercion Paths" ++ spc() ++ pr_class_rawexpr s ++ spc() ++ pr_class_rawexpr t
| PrintCanonicalConversions -> str"Print Canonical Structures"