diff options
author | Enrico Tassi <Enrico.Tassi@inria.fr> | 2014-03-12 17:39:42 +0100 |
---|---|---|
committer | Enrico Tassi <Enrico.Tassi@inria.fr> | 2014-03-12 17:39:42 +0100 |
commit | a67c3fe2a5445bf2be94e654aac6ea328cbcd74e (patch) | |
tree | f549e2726eca0966bde5c085ddc09a4921788a4d /ide/coq.ml | |
parent | a622c4c951f559fa05d45a45b4b25ace00793281 (diff) |
Stm: smarter delegation policy
Stm used to delegate every proof when it was possible, but this may
be a bad idea. Small proofs may take less time than the overhead
delegation implies (marshalling, etc...).
Now it delegates only proofs that take >= 1 second.
By default a proof takes 1 second (that may be wrong).
If the file was compiled before, it reuses the data stored in the .aux
file and assumes the timings are still valid.
After a proof is checked, Coq knows how long it takes for real, so it
wont predict it wrong again (when the user goes up and down in the
file for example).
CoqIDE now sends to Coq, as part of the init message, the file name
so that Coq can load the .aux file.
Diffstat (limited to 'ide/coq.ml')
-rw-r--r-- | ide/coq.ml | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/ide/coq.ml b/ide/coq.ml index 280f1df68..3dd2ce006 100644 --- a/ide/coq.ml +++ b/ide/coq.ml @@ -511,7 +511,6 @@ let eval_call ?(logger=default_logger) call handle k = let add ?(logger=default_logger) x = eval_call ~logger (Serialize.add x) let edit_at i = eval_call (Serialize.edit_at i) let query ?(logger=default_logger) x = eval_call ~logger (Serialize.query x) -let inloadpath s = eval_call (Serialize.inloadpath s) let mkcases s = eval_call (Serialize.mkcases s) let status ?logger force = eval_call ?logger (Serialize.status force) let hints x = eval_call (Serialize.hints x) |