aboutsummaryrefslogtreecommitdiffhomepage
path: root/stm/workerLoop.ml
diff options
context:
space:
mode:
authorGravatar Maxime Dénès <mail@maximedenes.fr>2018-02-13 11:17:29 +0100
committerGravatar Maxime Dénès <mail@maximedenes.fr>2018-02-13 11:17:29 +0100
commit4f65dfb13d8bb395abf4aa405cae9ed529302a06 (patch)
tree3faa2bdcd321394097b1d8c04372a409b0835879 /stm/workerLoop.ml
parent19d4ba5fa2ff8827f86d00df95a88e3f5cbdfd10 (diff)
parente5fbfbb162f95b30426fbe06f278c6d031abfd8a (diff)
Merge PR #6693: [toplevel] Refactor command line argument handling.
Diffstat (limited to 'stm/workerLoop.ml')
-rw-r--r--stm/workerLoop.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/stm/workerLoop.ml b/stm/workerLoop.ml
index 704119186..d606f19bf 100644
--- a/stm/workerLoop.ml
+++ b/stm/workerLoop.ml
@@ -15,8 +15,8 @@ let rec parse = function
| x :: rest -> x :: parse rest
| [] -> []
-let loop init args =
- let args = parse args in
+let loop init _coq_args extra_args =
+ let args = parse extra_args in
Flags.quiet := true;
init ();
CoqworkmgrApi.init !async_proofs_worker_priority;