this repo has no description
0
fork

Configure Feed

Select the types of activity you want to include in your feed.

Logs

+5 -1
+5 -1
lib/impl.ml
··· 808 808 let b = Sys.file_exists (prefix ^ ".cmi") in 809 809 Logs.info (fun m -> m "file_exists: %s = %b\n%!" (prefix ^ ".cmi") b)); 810 810 (* reset_dirs () *) () 811 - with exn -> 811 + with 812 + | Env.Error e -> 813 + Logs.err (fun m -> m "Env.Error: %a" Env.report_error e); 814 + () 815 + | exn -> 812 816 let s = Printexc.to_string exn in 813 817 Logs.err (fun m -> m "Error in add_cmi: %s" s); 814 818 Logs.err (fun m -> m "Backtrace: %s" (Printexc.get_backtrace ()));