Commits

Yaron Minsky  committed c88e3c2

removed unnecessary handle_uncaught's

  • Participants
  • Parent commits 923e721

Comments (0)

Files changed (2)

File broker_server.ml

       ~env:(directory,stop)
   )
 
+let () = Command.run command
 
-let () =
-  Exn.handle_uncaught ~exit:true (fun () -> Command.run command)
-

File hello_world.ml

     )
     (* The command-line spec determines the argument to this function, which
        show up in an order that matches the spec. *)
-    (fun hello world () ->
-      printf "%s %s!\n" hello world
-    )
+    (fun hello world () -> printf "%s %s!\n" hello world)
 
-let () =
-  (* Exn.handle_uncaught is here to improve how exceptions are printed out when
-     the program exits. *)
-  Exn.handle_uncaught ~exit:true (fun () -> Command.run command)
+let () = Command.run command