diff --git a/tools/ptests/ptests.ml b/tools/ptests/ptests.ml index 70b15a30939e721576038a52be0c196560acea76..fa3f15ea40eb681d6cb538e206e95d5b10d68615 100644 --- a/tools/ptests/ptests.ml +++ b/tools/ptests/ptests.ml @@ -1340,7 +1340,7 @@ let print_json_wrapper ~file wtest = if !verbosity >= 2 then Format.printf "%% Generates %S wrapper file...@." file; let wrapper_cout = open_out file in let wrapper_fmt = Format.formatter_of_out_channel wrapper_cout in - Format.fprintf wrapper_fmt "%a@" (pp_wtest ~compacted:false) wtest; + Format.fprintf wrapper_fmt "%a@." (pp_wtest ~compacted:false) wtest; close_out wrapper_cout let oracle_target oracle_fmt dir fname =