diff options
| author | Enrico Tassi | 2020-09-25 18:09:25 +0200 |
|---|---|---|
| committer | Enrico Tassi | 2020-10-09 17:09:02 +0200 |
| commit | a023009ba68c70d8654b29bd2f68631cc5536ba9 (patch) | |
| tree | 983ea49752ce4fdee40de82c95bc51377420d660 /stm/asyncTaskQueue.ml | |
| parent | 39fe24769d18c21379f1123754fd606cdf8cd4c8 (diff) | |
[stm] move par: implementation to vernac/comTactic and stm/partac
The current implementation of par: is still in the STM, but is optional.
If the STM does not take over it, it defaults to the implementation of
in comTactic which is based on all: (i.e. sequential).
This commit also moved the interpretation of a tactic from g_ltac to
vernac/comTactic which is more appropriate.
Co-authored-by: Gaëtan Gilbert <gaetan.gilbert@skyskimmer.net>
Diffstat (limited to 'stm/asyncTaskQueue.ml')
| -rw-r--r-- | stm/asyncTaskQueue.ml | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/stm/asyncTaskQueue.ml b/stm/asyncTaskQueue.ml index a8088dae36..4f04b9fe1c 100644 --- a/stm/asyncTaskQueue.ml +++ b/stm/asyncTaskQueue.ml @@ -386,3 +386,8 @@ end module MakeQueue(T : Task) () = struct include Make(T) () end module MakeWorker(T : Task) () = struct include Make(T) () end + +exception RemoteException of Pp.t +let _ = CErrors.register_handler (function + | RemoteException ppcmd -> Some ppcmd + | _ -> None) |