Improve exiting code clarity

src/command_def.ml

@@ -267,6 +267,7 @@ let run ~version ~build_info () =
     |> run ~version ~build_info
   in
 
+  (* Return error code with exceptions *)
   let exit_code =
     match
       hack_parse ()

src/oclaunch.ml

@@ -47,6 +47,5 @@ let build_info = ( "Build with OCaml version " ^ (Sys.ocaml_version) ^ " on " ^
 
 let () =
   Command_def.run ~version:version_number ~build_info:build_info ()
-  |> function
-    `Exit n -> exit n
+  |> function `Exit n -> exit n
 ;;