File tree Expand file tree Collapse file tree 1 file changed +2
-2
lines changed Expand file tree Collapse file tree 1 file changed +2
-2
lines changed Original file line number Diff line number Diff line change @@ -287,7 +287,7 @@ let run_exn ~non_deterministic ~silent_eval ~record_backtrace ~syntax ~silent
287287
288288 let test_block ~ppf ~temp_file t =
289289 let print_block () = Block. pp ?syntax ppf t in
290- if Block. is_active ?section t then
290+ if Block. is_active ?section t then (
291291 match Block. value t with
292292 | Raw _ -> print_block ()
293293 | Include { file_included; file_kind = Fk_ocaml { part_included } } ->
@@ -341,7 +341,7 @@ let run_exn ~non_deterministic ~silent_eval ~record_backtrace ~syntax ~silent
341341 ~det: (fun () ->
342342 assert (syntax <> Some Cram );
343343 Mdx_top. in_env env (fun () ->
344- run_toplevel_tests ?syntax ?root c ppf phrases t))
344+ run_toplevel_tests ?syntax ?root c ppf phrases t)))
345345 else print_block ()
346346 in
347347 let gen_corrected file_contents items =
You can’t perform that action at this time.
0 commit comments