From c8533911300df8d4897a3109ea30d43be7f430eb Mon Sep 17 00:00:00 2001
From: Gaëtan Gilbert
Date: Wed, 1 Nov 2017 15:01:37 +0100
Subject: Fix FIXME: use OCaml 4.02 generative functors when available.

4.02.3 has been the minimal OCaml version for a while now.
---
 engine/evd.ml       | 3 +--
 engine/geninterp.ml | 4 ++--
 2 files changed, 3 insertions(+), 4 deletions(-)

(limited to 'engine')

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
-- 
cgit v1.2.3