From 07a9afbdf9561402897728963d40de80b9912bea Mon Sep 17 00:00:00 2001
From: Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr>
Date: Thu, 7 Aug 2014 00:19:22 +0200
Subject: Removing the "constructor" tactic from the AST.

---
 grammar/q_coqast.ml4 | 2 --
 1 file changed, 2 deletions(-)

(limited to 'grammar')

diff --git a/grammar/q_coqast.ml4 b/grammar/q_coqast.ml4
index 1614301ec..32001e629 100644
--- a/grammar/q_coqast.ml4
+++ b/grammar/q_coqast.ml4
@@ -390,8 +390,6 @@ let rec mlexpr_of_atomic_tactic = function
   | Tacexpr.TacSplit (ev,l) ->
       <:expr< Tacexpr.TacSplit
         ($mlexpr_of_bool ev$, $mlexpr_of_list mlexpr_of_binding_kind l$)>>
-  | Tacexpr.TacAnyConstructor (ev,t) ->
-      <:expr< Tacexpr.TacAnyConstructor $mlexpr_of_bool ev$ $mlexpr_of_option mlexpr_of_tactic t$>>
   | Tacexpr.TacConstructor (ev,n,l) ->
       let n = mlexpr_of_or_var mlexpr_of_int n in
       <:expr< Tacexpr.TacConstructor $mlexpr_of_bool ev$ $n$ $mlexpr_of_binding_kind l$>>
-- 
cgit v1.2.3