diff options
| author | Pierre-Marie Pédrot | 2020-11-16 23:11:26 +0100 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2020-11-24 17:58:20 +0100 |
| commit | 98dab0b2a6df19b3c179bc5fd1e211d76827a754 (patch) | |
| tree | 16a89e29878e3d1b89f79adc561e148c1a3330cb | |
| parent | 90cb2b0daf54cbd72c5ac8e1ffe2007c8901ddba (diff) | |
Add an explicit signature to the MakeCache functor in Micromega.
| -rw-r--r-- | plugins/micromega/coq_micromega.ml | 6 |
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 |
