1open Printf
2
3let _ =
4  try
5    Xenlight.test_raise_exception ()
6  with Xenlight.Error(err, fn) -> begin
7    printf "Caught Exception: %s: %s\n" (Xenlight.string_of_error err) fn;
8  end
9
10