diff options
| author | Hugo Herbelin | 2018-10-10 22:02:00 +0200 |
|---|---|---|
| committer | Emilio Jesus Gallego Arias | 2019-03-04 16:24:48 +0100 |
| commit | e6cc52efca8c7395aaa828500e908fc8a0489e52 (patch) | |
| tree | 2d29a3bbba8201c6edbecc164ae436f6c0d1f831 /lib/future.ml | |
| parent | be15d32ad16104c81f4fbf42556067848aa0acec (diff) | |
Removing debugging warning when no exception handler is registered in futures.
As far as I understood, this was useful for tine-tuning the stm but
this is no longuer needed: it is ok not to have exception handler when
a constant registration does not span over several commands (such as
"Goal ... Qed" or obligations).
Diffstat (limited to 'lib/future.ml')
| -rw-r--r-- | lib/future.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/future.ml b/lib/future.ml index b372bedc5d..6e7c6fd9e3 100644 --- a/lib/future.ml +++ b/lib/future.ml @@ -33,7 +33,7 @@ let _ = CErrors.register_handler (function | _ -> raise CErrors.Unhandled) type fix_exn = Exninfo.iexn -> Exninfo.iexn -let id x = prerr_endline "Future: no fix_exn.\nYou have probably created a Future.computation from a value without passing the ~fix_exn argument. You probably want to chain with an already existing future instead."; x +let id x = x module UUID = struct type t = int |