added term argument to absurd

diff --git a/helm/ocaml/cic_transformations/tacticAst.ml b/helm/ocaml/cic_transformations/tacticAst.ml
index d063234d2bcd33a3728b662fdb5f00229a3abbd4..05e8458f8d04d28eee1d4581f26a9fd57ab11e6d 100644 (file)
--- 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 *)