diff options
| author | Gaëtan Gilbert | 2017-11-01 15:01:37 +0100 |
|---|---|---|
| committer | Gaëtan Gilbert | 2017-11-01 15:11:22 +0100 |
| commit | c8533911300df8d4897a3109ea30d43be7f430eb (patch) | |
| tree | 024ea3154461be06aa18ffb8270620d5bdcaa448 /engine | |
| parent | ad973248998da8d7d10ed00f4bcd6f383ba9a171 (diff) | |
Fix FIXME: use OCaml 4.02 generative functors when available.
4.02.3 has been the minimal OCaml version for a while now.
Diffstat (limited to 'engine')
| -rw-r--r-- | engine/evd.ml | 3 | ||||
| -rw-r--r-- | engine/geninterp.ml | 4 |
2 files changed, 3 insertions, 4 deletions
diff --git a/engine/evd.ml b/engine/evd.ml index 324f883e8e..a668826a7f 100644 --- a/engine/evd.ml +++ b/engine/evd.ml @@ -124,8 +124,7 @@ end (* The type of mappings for existential variables *) -module Dummy = struct end -module Store = Store.Make(Dummy) +module Store = Store.Make () type evar = Term.existential_key diff --git a/engine/geninterp.ml b/engine/geninterp.ml index e79e258fbc..6c629468ba 100644 --- a/engine/geninterp.ml +++ b/engine/geninterp.ml @@ -9,11 +9,11 @@ open Names open Genarg -module TacStore = Store.Make(struct end) +module TacStore = Store.Make () (** Dynamic toplevel values *) -module ValT = Dyn.Make(struct end) +module ValT = Dyn.Make () module Val = struct |