aboutsummaryrefslogtreecommitdiffhomepage
path: root/ide/session.ml
diff options
context:
space:
mode:
Diffstat (limited to 'ide/session.ml')
-rw-r--r--ide/session.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/ide/session.ml b/ide/session.ml
index 8eeb3c6f9..4e95fefca 100644
--- a/ide/session.ml
+++ b/ide/session.ml
@@ -155,8 +155,8 @@ let create file coqtop_args =
let finder = new Wg_Find.finder (script :> GText.view) in
let fops = new FileOps.fileops (buffer :> GText.buffer) file reset in
let _ = fops#update_stats in
- let cops = new CoqOps.coqops script proof messages (fun () -> fops#filename)
- in
+ let cops =
+ new CoqOps.coqops script proof messages coqtop (fun () -> fops#filename) in
let _ = Coq.set_reset_handler coqtop cops#handle_reset_initial in
let _ = Coq.init_coqtop coqtop cops#initialize in
{