Skip to content
Snippets Groups Projects
Commit d2711b59 authored by François Bobot's avatar François Bobot
Browse files

[Logging] Print Base Not_found error

parent a512ddfe
No related branches found
No related tags found
No related merge requests found
...@@ -117,4 +117,5 @@ let () = ...@@ -117,4 +117,5 @@ let () =
| Invalid_argument msg -> Fmt.pf fmt "Invalid argument: %s" msg | Invalid_argument msg -> Fmt.pf fmt "Invalid argument: %s" msg
| Failure msg -> Fmt.pf fmt "Failure: %s" msg | Failure msg -> Fmt.pf fmt "Failure: %s" msg
| Sys_error msg -> Fmt.pf fmt "%s" msg | Sys_error msg -> Fmt.pf fmt "%s" msg
| Sexplib0.Sexp.Not_found_s sexp -> Sexplib0.Sexp.pp_hum fmt sexp
| _ -> raise exn) | _ -> raise exn)
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment