aboutsummaryrefslogtreecommitdiff
path: root/plugins/firstorder
diff options
context:
space:
mode:
authorMaxime Dénès2017-05-28 18:14:12 +0200
committerMaxime Dénès2017-05-28 18:14:12 +0200
commit132d40ae3168065ed9ca11aa12fc6c96111a1e67 (patch)
tree3fe503493fce624caf8fd50d8580127bb8da0606 /plugins/firstorder
parent422b892e71641f23dc71499733997546ecffa46b (diff)
parent6841c6db48d57911d3886057e1ca47a5aa161ca7 (diff)
Merge PR#675: [coqlib] Deprecate redundant Coqlib functions.
Diffstat (limited to 'plugins/firstorder')
-rw-r--r--plugins/firstorder/rules.ml3
1 files changed, 2 insertions, 1 deletions
diff --git a/plugins/firstorder/rules.ml b/plugins/firstorder/rules.ml
index 86a6770070..8c6b5b91de 100644
--- a/plugins/firstorder/rules.ml
+++ b/plugins/firstorder/rules.ml
@@ -231,7 +231,8 @@ let ll_forall_tac prod backtrack id continue seq=
(* special for compatibility with old Intuition *)
-let constant str = Coqlib.gen_constant "User" ["Init";"Logic"] str
+let constant str = Universes.constr_of_global
+ @@ Coqlib.coq_reference "User" ["Init";"Logic"] str
let defined_connectives=lazy
[AllOccurrences,EvalConstRef (fst (Term.destConst (constant "not")));