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.
---
 lib/spawn.ml | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

(limited to 'lib/spawn.ml')

diff --git a/lib/spawn.ml b/lib/spawn.ml
index 0cf163e737..de31d87d0e 100644
--- a/lib/spawn.ml
+++ b/lib/spawn.ml
@@ -28,8 +28,6 @@ module type Control = sig
 
 end
 
-module type Empty = sig end
-
 module type MainLoopModel = sig
   type async_chan
   type condition
@@ -216,7 +214,7 @@ let rec wait p =
 
 end
 
-module Sync(T : Empty) = struct
+module Sync () = struct
 
 type process = {
   cin  : in_channel;
-- 
cgit v1.2.3