diff options
| author |  Enrico Tassi <Enrico.Tassi@inria.fr> | 2014-09-01 14:54:49 +0200 |
|---|---|---|
| committer | Enrico Tassi <Enrico.Tassi@inria.fr> | 2014-09-02 11:29:42 +0200 |
| commit | cf6b12cb3a88fb3af6a7b3e91d17db8b06d23c81 (patch) | |
| tree | 46ec306afd1ebf29b735e7f6679c8e1b8d9c5679 /toplevel/vernac.ml | |
| parent | 7befcc7ea63ea4bd6e45e6f4b8ec01a69b586cc7 (diff) | |
coqworkmgr
Diffstat (limited to 'toplevel/vernac.ml')
| -rw-r--r-- | toplevel/vernac.ml | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/toplevel/vernac.ml b/toplevel/vernac.ml index a011fc6a6..5e9d77bed 100644 --- a/toplevel/vernac.ml +++ b/toplevel/vernac.ml @@ -350,3 +350,8 @@ let compile verbosely f = let univs, proofs = Stm.finish_tasks lfdv univs disch proofs tasks in Library.save_library_raw lfdv lib univs proofs +let compile v f = + ignore(CoqworkmgrApi.get 1); + compile v f; + CoqworkmgrApi.giveback 1 + |