aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPierre-Marie Pédrot2020-11-16 23:11:26 +0100
committerPierre-Marie Pédrot2020-11-24 17:58:20 +0100
commit98dab0b2a6df19b3c179bc5fd1e211d76827a754 (patch)
tree16a89e29878e3d1b89f79adc561e148c1a3330cb
parent90cb2b0daf54cbd72c5ac8e1ffe2007c8901ddba (diff)
Add an explicit signature to the MakeCache functor in Micromega.
-rw-r--r--plugins/micromega/coq_micromega.ml6
1 files changed, 5 insertions, 1 deletions
diff --git a/plugins/micromega/coq_micromega.ml b/plugins/micromega/coq_micromega.ml
index 542b99075d..d3a851ded1 100644
--- a/plugins/micromega/coq_micromega.ml
+++ b/plugins/micromega/coq_micromega.ml
@@ -2064,7 +2064,11 @@ module MakeCache (T : sig
val hash_coeff : int -> coeff -> int
val eq_prover_option : prover_option -> prover_option -> bool
val eq_coeff : coeff -> coeff -> bool
-end) =
+end) :
+sig
+ type key = T.prover_option * (T.coeff Mc.pol * Mc.op1) list
+ val memo_opt : (unit -> bool) -> string -> (key -> 'a) -> key -> 'a
+end =
struct
module E = struct
type t = T.prover_option * (T.coeff Mc.pol * Mc.op1) list