diff options
author | 2013-11-27 17:51:49 +0100 | |
---|---|---|
committer | 2013-11-27 17:51:49 +0100 | |
commit | 2923b9262e3859f2ad0169778d63d79843d7ddf7 (patch) | |
tree | 01ba2bb8f25b984903e5b714d88b48d1e0914296 /toplevel | |
parent | 03f268c1c4a872ec37a0995174c305c172339f53 (diff) |
Old message Interp returns the state id so that one can BackTo it
Diffstat (limited to 'toplevel')
-rw-r--r-- | toplevel/ide_slave.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/toplevel/ide_slave.ml b/toplevel/ide_slave.ml index 7a548e046..be384e174 100644 --- a/toplevel/ide_slave.ml +++ b/toplevel/ide_slave.ml @@ -323,7 +323,7 @@ let interp ((_raw, verbose), s) = | Some ast -> ast) () in Stm.interp verbose (vernac_parse s); - CSig.Inl (read_stdout ()) + Stm.get_current_state (), CSig.Inl (read_stdout ()) (** When receiving the Quit call, we don't directly do an [exit 0], but rather set this reference, in order to send a final answer |