Commits

Yaron Minsky committed c0e9df7

bugfix

Comments (0)

Files changed (1)

base/core/lib/exn.ml

 let protect ~f ~finally = protectx ~f () ~finally
 
 let pp ppf t =
-  match sexp_of_exn_opt with
+  match sexp_of_exn_opt t with
   | Some sexp -> Sexp.pp_hum ppf sexp
   | None -> Format.fprintf ppf "%s" (Printexc.to_string t)