From: Stefano Zacchiroli <zack@upsilon.cc>
Date: Wed, 13 Oct 2004 08:04:55 +0000 (+0000)
Subject: added term argument to absurd
X-Git-Tag: V_0_0_10~83
X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=commitdiff_plain;h=18c2bcedaa5d59c03fbbb0207220edf9e795ced0;p=helm.git

added term argument to absurd
---

diff --git a/helm/ocaml/cic_transformations/tacticAst.ml b/helm/ocaml/cic_transformations/tacticAst.ml
index d063234d2..05e8458f8 100644
--- a/helm/ocaml/cic_transformations/tacticAst.ml
+++ b/helm/ocaml/cic_transformations/tacticAst.ml
@@ -33,7 +33,7 @@ type 'term pattern = Pattern of 'term
 type ('term, 'ident) tactic =
   | LocatedTactic of CicAst.location * ('term, 'ident) tactic
 
-  | Absurd
+  | Absurd of 'term
   | Apply of 'term
   | Assumption
   | Change of 'term * 'term * 'ident option (* what, with what, where *)