aboutsummaryrefslogtreecommitdiffhomepage
path: root/stm/queryworkertop.ml
diff options
context:
space:
mode:
authorGravatar Emilio Jesus Gallego Arias <e+git@x80.org>2018-02-13 18:26:00 +0100
committerGravatar Emilio Jesus Gallego Arias <e+git@x80.org>2018-02-15 11:37:51 +0100
commited18f926e4695acc730218925ca156abe56ba5fc (patch)
tree390d1fef8613afbfe4c5e2de3209e06f48f59122 /stm/queryworkertop.ml
parent4bc9529ece085441121678a07e4b269c7633471c (diff)
[toplevel] Make toplevel state into a record.
We organize the toplevel execution as a record and pass it around. This will be used by future PRs as to for example decouple goal printing from the classifier.
Diffstat (limited to 'stm/queryworkertop.ml')
-rw-r--r--stm/queryworkertop.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/stm/queryworkertop.ml b/stm/queryworkertop.ml
index 928a6bfb0..7862f2f44 100644
--- a/stm/queryworkertop.ml
+++ b/stm/queryworkertop.ml
@@ -10,5 +10,5 @@ module W = AsyncTaskQueue.MakeWorker(Stm.QueryTask) ()
let () = Coqtop.toploop_init := WorkerLoop.loop W.init_stdout
-let () = Coqtop.toploop_run := (fun _ _ -> W.main_loop ())
+let () = Coqtop.toploop_run := (fun _ ~state:_ -> W.main_loop ())