From 78692ad28ded4f94d5cf7e54240fe0b71d1be282 Mon Sep 17 00:00:00 2001
From: Arnaud Spiwack
Date: Wed, 30 Jul 2014 12:12:21 +0200
Subject: Add [numgoal] to Ltac.

---
 printing/pptactic.ml | 1 +
 1 file changed, 1 insertion(+)

(limited to 'printing')

diff --git a/printing/pptactic.ml b/printing/pptactic.ml
index e812086d95..2aadde7c16 100644
--- a/printing/pptactic.ml
+++ b/printing/pptactic.ml
@@ -941,6 +941,7 @@ and pr_tacarg = function
   | UConstr c -> str"uconstr:" ++ pr_constr c
   | TacFreshId l -> str "fresh" ++ pr_fresh_ids l
   | TacPretype c -> str "type_term" ++ pr_constr c
+  | TacNumgoals -> str "numgoals"
   | TacExternal (_,com,req,la) ->
       str "external" ++ spc() ++ qs com ++ spc() ++ qs req ++
       spc() ++ prlist_with_sep spc pr_tacarg la
-- 
cgit v1.2.3