From b600c51753c5b60e62bdfcf1e6409afa1ce69d7a Mon Sep 17 00:00:00 2001
From: Pierre-Marie Pédrot
Date: Wed, 6 Aug 2014 01:10:26 +0200
Subject: Removing "intros untils" from the AST.

---
 printing/pptactic.ml | 2 --
 1 file changed, 2 deletions(-)

(limited to 'printing')

diff --git a/printing/pptactic.ml b/printing/pptactic.ml
index 4c6afba114..1535bab9a7 100644
--- a/printing/pptactic.ml
+++ b/printing/pptactic.ml
@@ -665,8 +665,6 @@ and pr_atom1 = function
   | TacIntroPattern (_::_ as p) ->
       hov 1 (str "intros" ++ spc () ++
              prlist_with_sep spc Miscprint.pr_intro_pattern p)
-  | TacIntrosUntil h ->
-      hv 1 (str "intros until" ++ pr_arg pr_quantified_hypothesis h)
   | TacIntroMove (None,MoveLast) as t -> pr_atom0 t
   | TacIntroMove (Some id,MoveLast) -> str "intro " ++ pr_id id
   | TacIntroMove (ido,hto) ->
-- 
cgit v1.2.3