aboutsummaryrefslogtreecommitdiff
path: root/toplevel
diff options
context:
space:
mode:
authorEnrico Tassi2014-07-11 11:08:06 +0200
committerEnrico Tassi2014-07-11 11:08:06 +0200
commit677a9b8e62893416ac195e316473a4bd421a1d79 (patch)
tree3728eb41a5e8eceeeb6043f8a9d9a85524fa4f55 /toplevel
parent58270be4668ab87e5f2d0d06c820bd457ae1aa01 (diff)
STM: let toploop plugins specify the flags for STM workers
Diffstat (limited to 'toplevel')
-rw-r--r--toplevel/coqtop.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/toplevel/coqtop.ml b/toplevel/coqtop.ml
index 73e1fb9d15..2b763b390e 100644
--- a/toplevel/coqtop.ml
+++ b/toplevel/coqtop.ml
@@ -353,8 +353,8 @@ let parse_args arglist =
Flags.async_proofs_mode := get_async_proofs_mode opt next (next())
|"-async-proofs-j" ->
Flags.async_proofs_n_workers := (get_int opt (next ()))
- |"-async-proofs-worker-flags" ->
- Flags.async_proofs_worker_flags := Some (next ());
+ |"-async-proofs-private-flags" ->
+ Flags.async_proofs_private_flags := Some (next ());
|"-compat" -> Flags.compat_version := get_compat_version (next ())
|"-compile" -> add_compile false (next ())
|"-compile-verbose" -> add_compile true (next ())