aboutsummaryrefslogtreecommitdiff
path: root/stm/vio_checking.ml
diff options
context:
space:
mode:
authorGaëtan Gilbert2017-11-01 15:01:37 +0100
committerGaëtan Gilbert2017-11-01 15:11:22 +0100
commitc8533911300df8d4897a3109ea30d43be7f430eb (patch)
tree024ea3154461be06aa18ffb8270620d5bdcaa448 /stm/vio_checking.ml
parentad973248998da8d7d10ed00f4bcd6f383ba9a171 (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 'stm/vio_checking.ml')
-rw-r--r--stm/vio_checking.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/stm/vio_checking.ml b/stm/vio_checking.ml
index 9507e90ba7..da6a095ab7 100644
--- a/stm/vio_checking.ml
+++ b/stm/vio_checking.ml
@@ -14,7 +14,7 @@ let check_vio (ts,f) =
Stm.set_compilation_hints long_f_dot_v;
List.fold_left (fun acc ids -> Stm.check_task f tasks ids && acc) true ts
-module Worker = Spawn.Sync(struct end)
+module Worker = Spawn.Sync ()
module IntOT = struct
type t = int