test.ml
- exception Test_exc
- let raise_f () = raise Test_exc
- let () =
- let exc = try raise_f () with e -> e in
- raise exc
output.txt
- Fatal error: exception Test.Test_exc
- Raised at file "pplacer_src/test.ml", line 3, characters 23-31
- Called from file "pplacer_src/test.ml", line 6, characters 16-26
- Re-raised at file "pplacer_src/test.ml", line 7, characters 8-11