RosettaCodeData/Task/Stack-traces/OCaml/stack-traces-1.ocaml
2023-07-01 13:44:08 -04:00

8 lines
151 B
Text

let div a b = a / b
let () =
try let _ = div 3 0 in ()
with e ->
prerr_endline(Printexc.to_string e);
Printexc.print_backtrace stderr;
;;