aboutsummaryrefslogtreecommitdiff
path: root/ltac
diff options
context:
space:
mode:
authorPierre-Marie Pédrot2016-11-20 01:08:53 +0100
committerPierre-Marie Pédrot2017-02-14 17:30:24 +0100
commitc72bf7330bb32970616be4dddc7571f3b91c1562 (patch)
treeff731fd0358e2bbb5f9b60ae0815b5130d894f08 /ltac
parent67507df457be05ee5b651a423031a8cd584934ef (diff)
Eqdecide API using EConstr.
Diffstat (limited to 'ltac')
-rw-r--r--ltac/g_eqdecide.ml42
1 files changed, 1 insertions, 1 deletions
diff --git a/ltac/g_eqdecide.ml4 b/ltac/g_eqdecide.ml4
index 905653281c..6a49ea830b 100644
--- a/ltac/g_eqdecide.ml4
+++ b/ltac/g_eqdecide.ml4
@@ -23,5 +23,5 @@ TACTIC EXTEND decide_equality
END
TACTIC EXTEND compare
-| [ "compare" constr(c1) constr(c2) ] -> [ compare c1 c2 ]
+| [ "compare" constr(c1) constr(c2) ] -> [ compare (EConstr.of_constr c1) (EConstr.of_constr c2) ]
END