Skip to content
Snippets Groups Projects
Commit 6deed0cb authored by Michele Alberti's avatar Michele Alberti
Browse files

Do not quote failure errors.

parent a4fbc543
No related branches found
No related tags found
No related merge requests found
......@@ -302,7 +302,7 @@ let build_command ~raw_options confg_solver property model =
Stdlib.close_out out_channel;
Ok tmp
with Sys_error e ->
Error (Format.sprintf "Unexpected failure@ `%s'." e)
Error (Format.sprintf "Unexpected failure:@ %s." e)
end >>= fun prop ->
(* Build actual command-line. *)
try
......@@ -335,7 +335,7 @@ let build_command ~raw_options confg_solver property model =
in
Ok (prop, cmd)
with Failure e ->
Error (Format.sprintf "Unexpected failure@ `%s'." e)
Error (Format.sprintf "Unexpected failure:@ %s." e)
let exec ~raw_options config model property =
let open Result in
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment