Adapt ocamlformat test

Signed-off-by: Nicolás Ojeda Bär <[email protected]>

test/blackbox-tests/test-cases/dialects/run.t

@@ -1,9 +1,6 @@
 Test the (dialect ...) stanza inside the dune-project file.
 
-  $ dune build --display short @install @fmt
-          dune .formatted/dune
-   ocamlformat .formatted/main.mfi
-   ocamlformat .formatted/main.mf
+  $ dune build --display short @install
       ocamldep .main.eobjs/main.mf.d
       ocamldep .main.eobjs/main.mfi.d
         ocamlc .main.eobjs/byte/main.{cmi,cmti}

test/blackbox-tests/test-cases/formatting/fake-tools/ocamlformat.ml

@@ -1,10 +1,8 @@
-let process args ~output =
-  let oc = open_out output in
-  Printf.fprintf oc "Sys.argv: %s\n" (String.concat " " (Array.to_list args));
-  Printf.fprintf oc "ocamlformat output\n";
-  close_out oc
+let process args =
+  Printf.printf "Sys.argv: %s\n" (String.concat " " (Array.to_list args));
+  Printf.printf "ocamlformat output\n"
 
 let () =
   match Sys.argv with
-  | [| _ ; _; _; "--name"; _; "-o"; output|] -> process Sys.argv ~output
+  | [| _ ; _; _|] -> process Sys.argv
   | _ -> assert false