aboutsummaryrefslogtreecommitdiff
path: root/ltac
diff options
context:
space:
mode:
Diffstat (limited to 'ltac')
-rw-r--r--ltac/extratactics.ml42
1 files changed, 1 insertions, 1 deletions
diff --git a/ltac/extratactics.ml4 b/ltac/extratactics.ml4
index bcfa13c79e..f87aa407d8 100644
--- a/ltac/extratactics.ml4
+++ b/ltac/extratactics.ml4
@@ -185,7 +185,7 @@ END
open Contradiction
TACTIC EXTEND absurd
- [ "absurd" constr(c) ] -> [ absurd c ]
+ [ "absurd" constr(c) ] -> [ absurd (EConstr.of_constr c) ]
END
let onSomeWithHoles tac = function