balsoft/ligo
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

do not raise any exn in an async_exn_hook body

Browse Source
This commit is contained in:
Vincent Bernardoff 2016-10-10 15:35:36 +02:00
parent 4374b1725e
commit 9748ffcda6
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/utils/utils.ml
View File

@ -54,7 +54,7 @@ let () =
| exn -> | exn ->
Printf.eprintf "Uncaught (asynchronous) exception: %S\n%s\n%!" Printf.eprintf "Uncaught (asynchronous) exception: %S\n%s\n%!"
(Printexc.to_string exn) (Printexc.get_backtrace ()); (Printexc.to_string exn) (Printexc.get_backtrace ());
exit 1) Lwt.wakeup exit_wakener 1)
module StringMap = Map.Make (String) module StringMap = Map.Make (String)