aboutsummaryrefslogtreecommitdiff
path: root/plugins/firstorder/instances.ml
diff options
context:
space:
mode:
authorMaxime Dénès2017-11-13 17:13:44 +0100
committerMaxime Dénès2017-11-13 17:13:44 +0100
commit8d176db01baf9fb4a5e07decb9500ef4a8717e93 (patch)
tree675b02e411ff2c56a9aff39f4956a055eac254a7 /plugins/firstorder/instances.ml
parent29a7307ea7cd36408661ba633a235793f11dca84 (diff)
parent03e21974a3e971a294533bffb81877dc1bd270b6 (diff)
Merge PR #6098: [api] Move structures deprecated in the API to the core.
Diffstat (limited to 'plugins/firstorder/instances.ml')
-rw-r--r--plugins/firstorder/instances.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/firstorder/instances.ml b/plugins/firstorder/instances.ml
index c2606dbe8e..3409471a7a 100644
--- a/plugins/firstorder/instances.ml
+++ b/plugins/firstorder/instances.ml
@@ -24,7 +24,7 @@ open Misctypes
open Context.Rel.Declaration
let compare_instance inst1 inst2=
- let cmp c1 c2 = OrderedConstr.compare (EConstr.Unsafe.to_constr c1) (EConstr.Unsafe.to_constr c2) in
+ let cmp c1 c2 = Constr.compare (EConstr.Unsafe.to_constr c1) (EConstr.Unsafe.to_constr c2) in
match inst1,inst2 with
Phantom(d1),Phantom(d2)->
(cmp d1 d2)