aboutsummaryrefslogtreecommitdiffhomepage
path: root/plugins/fourier
diff options
context:
space:
mode:
authorGravatar Emilio Jesus Gallego Arias <e+git@x80.org>2016-02-23 01:35:00 +0100
committerGravatar Emilio Jesus Gallego Arias <e+git@x80.org>2017-05-27 20:27:21 +0200
commit6841c6db48d57911d3886057e1ca47a5aa161ca7 (patch)
tree771c992268c4ceb50349d7ac23829f174e4039ea /plugins/fourier
parent2eb27e56ea4764fa2f2acec6f951eef2642ff1be (diff)
[coqlib] Deprecate redundant Coqlib functions.
We remove redundant functions `coq_constant`, `gen_reference`, and `gen_constant`. This is a first step towards a lazy binding of libraries references. We have also chosen to untangle `constr` from `Coqlib`, as how to instantiate the reference (in particular wrt universes) is a client-side issue. (The client may want to provide an `evar_map` ?) c.f. #186
Diffstat (limited to 'plugins/fourier')
-rw-r--r--plugins/fourier/fourierR.ml3
1 files changed, 2 insertions, 1 deletions
diff --git a/plugins/fourier/fourierR.ml b/plugins/fourier/fourierR.ml
index 25d8f8c83..d35e4ec6f 100644
--- a/plugins/fourier/fourierR.ml
+++ b/plugins/fourier/fourierR.ml
@@ -285,7 +285,8 @@ let fourier_lineq lineq1 =
let get = Lazy.force
let cget = get
let eget c = EConstr.of_constr (Lazy.force c)
-let constant = Coqlib.gen_constant "Fourier"
+let constant path s = Universes.constr_of_global @@
+ Coqlib.coq_reference "Fourier" path s
(* Standard library *)
open Coqlib