(lint-fmt)

2025-07-17 00:45.14: New job: test tarides/runtime_events_tools https://github.com/tarides/runtime_events_tools.git#refs/heads/main (ffa08749d1811add58aefa4eb361ec7c9fd127d5) (linux-x86_64:(lint-fmt))
Base: ocaml/opam:debian-12-ocaml-4.08@sha256:cc4b148b1fa1916574df02fcec0956fedbec6798bedacd9bfd4417c1c098ce8e
ocamlformat version: version 0.26.2 (from opam)

To reproduce locally:

git clone --recursive "https://github.com/tarides/runtime_events_tools.git" -b "main" && cd "runtime_events_tools" && git reset --hard ffa08749
cat > Dockerfile <<'END-OF-DOCKERFILE'
FROM ocaml/opam:debian-12-ocaml-4.08@sha256:cc4b148b1fa1916574df02fcec0956fedbec6798bedacd9bfd4417c1c098ce8e
USER 1000:1000
RUN cd ~/opam-repository && (git cat-file -e 0eea63ad71af2b1116c556023bedc6bf083e6125 || git fetch origin master) && git reset -q --hard 0eea63ad71af2b1116c556023bedc6bf083e6125 && git log --no-decorate -n1 --oneline && opam update -u
RUN opam depext -i dune
WORKDIR /src
RUN opam depext -i ocamlformat=0.26.2
COPY --chown=1000:1000 . /src/
RUN opam exec -- dune build @fmt --ignore-promoted-rules || (echo "dune build @fmt failed"; exit 2)

END-OF-DOCKERFILE
docker build .
END-REPRO-BLOCK

2025-07-17 00:45.14: Using cache hint "tarides/runtime_events_tools-ocaml/opam:debian-12-ocaml-4.08@sha256:cc4b148b1fa1916574df02fcec0956fedbec6798bedacd9bfd4417c1c098ce8e-debian-12-4.08_opam-2.3-ocamlformat-0eea63ad71af2b1116c556023bedc6bf083e6125"
2025-07-17 00:45.14: Using OBuilder spec:
((from ocaml/opam:debian-12-ocaml-4.08@sha256:cc4b148b1fa1916574df02fcec0956fedbec6798bedacd9bfd4417c1c098ce8e)
 (user (uid 1000) (gid 1000))
 (run (cache (opam-archives (target /home/opam/.opam/download-cache)))
      (network host)
      (shell "cd ~/opam-repository && (git cat-file -e 0eea63ad71af2b1116c556023bedc6bf083e6125 || git fetch origin master) && git reset -q --hard 0eea63ad71af2b1116c556023bedc6bf083e6125 && git log --no-decorate -n1 --oneline && opam update -u"))
 (run (cache (opam-archives (target /home/opam/.opam/download-cache)))
      (network host)
      (shell "opam depext -i dune"))
 (workdir /src)
 (run (cache (opam-archives (target /home/opam/.opam/download-cache)))
      (network host)
      (shell "opam depext -i ocamlformat=0.26.2"))
 (copy (src .) (dst /src/))
 (run (shell "opam exec -- dune build @fmt --ignore-promoted-rules || (echo \"dune build @fmt failed\"; exit 2)"))
)

2025-07-17 00:45.14: Waiting for resource in pool OCluster
2025-07-17 00:45.14: Waiting for worker…
2025-07-17 00:45.14: Got resource from pool OCluster
Building on laodoke.caelum.ci.dev
All commits already cached
HEAD is now at ffa0874 Merge pull request #57 from patricoferris/use-trace-fuchsia

(from ocaml/opam:debian-12-ocaml-4.08@sha256:cc4b148b1fa1916574df02fcec0956fedbec6798bedacd9bfd4417c1c098ce8e)
2025-07-17 00:45.15 ---> using "4ea5038d254cfd14663698deb665a2dc4ce1e1383d544c063adebb02ed15ce16" from cache

/: (user (uid 1000) (gid 1000))

/: (run (cache (opam-archives (target /home/opam/.opam/download-cache)))
        (network host)
        (shell "cd ~/opam-repository && (git cat-file -e 0eea63ad71af2b1116c556023bedc6bf083e6125 || git fetch origin master) && git reset -q --hard 0eea63ad71af2b1116c556023bedc6bf083e6125 && git log --no-decorate -n1 --oneline && opam update -u"))
0eea63ad71 Merge pull request #27946 from mtelvers/opam-publish-ocaml-version.4.0.1

<><> Updating package repositories ><><><><><><><><><><><><><><><><><><><><><><>
[default] Initialised
default (at git+file:///home/opam/opam-repository): 
    [INFO] opam 2.1 and 2.2 include many performance and security improvements over 2.0; please consider upgrading (https://opam.ocaml.org/doc/Install.html)


Everything as up-to-date as possible (run with --verbose to show unavailable upgrades).
However, you may "opam upgrade" these packages explicitly, which will ask permission to downgrade or uninstall the conflicting packages.
Nothing to do.
# Run eval $(opam env) to update the current shell environment
2025-07-17 00:45.15 ---> using "ed14c208b709d50e26e290f8f669e0b0b6a2456751ee5b87b29d71221f0a9fc1" from cache

/: (run (cache (opam-archives (target /home/opam/.opam/download-cache)))
        (network host)
        (shell "opam depext -i dune"))
# Detecting depexts using vars: arch=x86_64, os=linux, os-distribution=debian, os-family=debian
# No extra OS packages requirements found.
# All required OS packages found.
# Now letting opam install the packages
The following actions will be performed:
  - install dune 3.19.1

<><> Gathering sources ><><><><><><><><><><><><><><><><><><><><><><><><><><><><>
[dune.3.19.1] found in cache

<><> Processing actions <><><><><><><><><><><><><><><><><><><><><><><><><><><><>
-> installed dune.3.19.1
Done.
# Run eval $(opam env) to update the current shell environment
2025-07-17 00:45.15 ---> using "249f8284e2625ce869f4c794eb6ff1eab40d82e0af762bb312d97ad81bf8d4f1" from cache

/: (workdir /src)

/src: (run (cache (opam-archives (target /home/opam/.opam/download-cache)))
           (network host)
           (shell "opam depext -i ocamlformat=0.26.2"))
# Detecting depexts using vars: arch=x86_64, os=linux, os-distribution=debian, os-family=debian
# No extra OS packages requirements found.
# All required OS packages found.
# Now letting opam install the packages
The following actions will be performed:
  - install sexplib0          v0.14.0  [required by base]
  - install cmdliner          1.3.0    [required by ocamlformat]
  - install menhirLib         20240715 [required by ocamlformat-lib]
  - install menhirCST         20240715 [required by menhir]
  - install ocamlbuild        0.16.1   [required by fpath, astring, uuseg]
  - install dune-build-info   3.19.1   [required by ocamlformat-lib]
  - install menhirSdk         20240715 [required by ocamlformat-lib]
  - install either            1.0.0    [required by ocamlformat-lib]
  - install ocaml-version     4.0.1    [required by ocamlformat-lib]
  - install result            1.5      [required by ocamlformat-lib]
  - install camlp-streams     5.0.1    [required by ocamlformat-lib]
  - install csexp             1.5.2    [required by ocamlformat-lib]
  - install seq               base     [required by re]
  - install fix               20250428 [required by ocamlformat-lib]
  - install ocamlfind         1.9.8    [required by ocp-indent, astring, fpath, uuseg]
  - install menhir            20240715 [required by ocamlformat-lib]
  - install dune-configurator 3.19.1   [required by base]
  - install re                1.11.0   [required by ocamlformat]
  - install topkg             1.0.8    [required by fpath, astring, uuseg]
  - install base-bytes        base     [required by ocp-indent]
  - install base              v0.14.3  [required by ocamlformat-lib]
  - install uutf              1.0.4    [required by ocamlformat-lib]
  - install astring           0.8.5    [required by ocamlformat-lib]
  - install ocp-indent        1.8.1    [required by ocamlformat-lib]
  - install stdio             v0.14.0  [required by ocamlformat-lib]
  - install uucp              15.0.0   [required by uuseg]
  - install fpath             0.7.3    [required by ocamlformat-lib]
  - install uuseg             15.0.0   [required by ocamlformat-lib]
  - install ocamlformat-lib   0.26.2   [required by ocamlformat]
  - install ocamlformat       0.26.2
===== 30 to install =====

<><> Gathering sources ><><><><><><><><><><><><><><><><><><><><><><><><><><><><>
[astring.0.8.5] found in cache
[base.v0.14.3] found in cache
[camlp-streams.5.0.1] found in cache
[cmdliner.1.3.0] found in cache
[csexp.1.5.2] found in cache
[dune-build-info.3.19.1] found in cache
[dune-configurator.3.19.1] found in cache
[either.1.0.0] found in cache
[fix.20250428] found in cache
[fpath.0.7.3] found in cache
[menhir.20240715] found in cache
[menhirCST.20240715] found in cache
[menhirLib.20240715] found in cache
[menhirSdk.20240715] found in cache
[ocaml-version.4.0.1] found in cache
[ocamlbuild.0.16.1] found in cache
[ocamlfind.1.9.8] found in cache
[ocamlformat.0.26.2] found in cache
[ocamlformat-lib.0.26.2] found in cache
[ocp-indent.1.8.1] found in cache
[re.1.11.0] found in cache
[result.1.5] found in cache
[sexplib0.v0.14.0] found in cache
[stdio.v0.14.0] found in cache
[topkg.1.0.8] found in cache
[uucp.15.0.0] found in cache
[uuseg.15.0.0] found in cache
[uutf.1.0.4] found in cache

<><> Processing actions <><><><><><><><><><><><><><><><><><><><><><><><><><><><>
-> installed seq.base
-> installed camlp-streams.5.0.1
-> installed csexp.1.5.2
-> installed cmdliner.1.3.0
-> installed either.1.0.0
-> installed fix.20250428
-> installed menhirCST.20240715
-> installed menhirLib.20240715
-> installed menhirSdk.20240715
-> installed ocaml-version.4.0.1
-> installed result.1.5
-> installed sexplib0.v0.14.0
-> installed re.1.11.0
-> installed dune-build-info.3.19.1
-> installed dune-configurator.3.19.1
-> installed ocamlfind.1.9.8
-> installed base-bytes.base
-> installed ocamlbuild.0.16.1
-> installed ocp-indent.1.8.1
-> installed base.v0.14.3
-> installed topkg.1.0.8
-> installed stdio.v0.14.0
-> installed uutf.1.0.4
-> installed astring.0.8.5
-> installed fpath.0.7.3
-> installed menhir.20240715
-> installed uucp.15.0.0
-> installed uuseg.15.0.0
-> installed ocamlformat-lib.0.26.2
-> installed ocamlformat.0.26.2
Done.

<><> ocp-indent.1.8.1 installed successfully ><><><><><><><><><><><><><><><><><>
=> This package requires additional configuration for use in editors. Install package 'user-setup', or manually:

   * for Emacs, add these lines to ~/.emacs:
     (add-to-list 'load-path "/home/opam/.opam/4.08/share/emacs/site-lisp")
     (require 'ocp-indent)

   * for Vim, add this line to ~/.vimrc:
     set rtp^="/home/opam/.opam/4.08/share/ocp-indent/vim"
# Run eval $(opam env) to update the current shell environment
2025-07-17 00:46.16 ---> saved as "506f4df4f85e5295f19a384a5ba309a546e40ceb6ba2016484fd566e6ae92707"

/src: (copy (src .) (dst /src/))
2025-07-17 00:46.17 ---> saved as "e5feac6c63e8c4a334032bbc2ccb3b31eddd919d82ff9e058ff28ebbfec63728"

/src: (run (shell "opam exec -- dune build @fmt --ignore-promoted-rules || (echo \"dune build @fmt failed\"; exit 2)"))
File "test/run_endlessly.ml", line 1, characters 0-0:
diff --git a/_build/default/test/run_endlessly.ml b/_build/default/test/.formatted/run_endlessly.ml
index 52d8b74..698adec 100644
--- a/_build/default/test/run_endlessly.ml
+++ b/_build/default/test/.formatted/run_endlessly.ml
@@ -2,4 +2,4 @@ let _ =
   let i = ref 0 in
   while true do
     i := 42
-  done
\ No newline at end of file
+  done
File "test/test_launch.ml", line 1, characters 0-0:
diff --git a/_build/default/test/test_launch.ml b/_build/default/test/.formatted/test_launch.ml
index 3457645..b0b3b17 100644
--- a/_build/default/test/test_launch.ml
+++ b/_build/default/test/.formatted/test_launch.ml
@@ -3,47 +3,44 @@ let process_launch_failure () =
   let open Alcotest in
   match_raises "executable not found on path should not launch"
     (* Executable not found on path *)
-    (function
-     | Launch.Fail _ -> true
-     | _exn -> false)
-    (fun () -> ignore (Launch.exec_process ["missing.exe"]));
+      (function Launch.Fail _ -> true | _exn -> false)
+    (fun () -> ignore (Launch.exec_process [ "missing.exe" ]));
 
   match_raises "non-executable should not launch"
     (* File for exec_process is not an executable *)
-    (function
-     | Unix.Unix_error(Unix.EACCES, _, _) -> true
-     | _exn -> false)
-    (fun () -> ignore ( Launch.exec_process ["./run_endlessly.ml"]));
+      (function Unix.Unix_error (Unix.EACCES, _, _) -> true | _exn -> false)
+    (fun () -> ignore (Launch.exec_process [ "./run_endlessly.ml" ]));
 
   match_raises "empty executable string should not launch"
     (* Empty executable string provided *)
-    (function
-     | Launch.Fail _ -> true
-     | _exn -> false)
-    (fun () -> ignore ( Launch.exec_process [""]))
-
+      (function Launch.Fail _ -> true | _exn -> false)
+    (fun () -> ignore (Launch.exec_process [ "" ]))
 
 let process_launch () =
   let open Olly_common in
-  Alcotest.(check bool) "process should launch" true
+  Alcotest.(check bool)
+    "process should launch" true
     (try
-       let a = Launch.exec_process ["./run_endlessly.exe"] in
+       let a = Launch.exec_process [ "./run_endlessly.exe" ] in
        try
          (* Sending signal Zero to kill checks the process exists for Unix. *)
          Unix.kill a.pid 0;
          true
        with Unix.Unix_error (Unix.ESRCH, _, _) -> false
-
      with
-     (* Any exceptions indicate a failure to launch *)
-     | Unix.Unix_error(Unix.ENOENT, _, _) -> false
-     | _exn -> Printf.printf "%s" (Printexc.to_string _exn); false)
+    (* Any exceptions indicate a failure to launch *)
+    | Unix.Unix_error (Unix.ENOENT, _, _) -> false
+    | _exn ->
+        Printf.printf "%s" (Printexc.to_string _exn);
+        false)
 
 let () =
   let open Alcotest in
-  run "Runtime Events Tools" [
-      "process",
-      [test_case "process::launch success" `Quick process_launch
-      ; test_case "process::launch failure" `Quick process_launch_failure
-      ]
-    ]
\ No newline at end of file
+  run "Runtime Events Tools"
+    [
+      ( "process",
+        [
+          test_case "process::launch success" `Quick process_launch;
+          test_case "process::launch failure" `Quick process_launch_failure;
+        ] );
+    ]
File "lib/olly_trace/olly_format_backend/olly_format_fuchsia.ml", line 1, characters 0-0:
diff --git a/_build/default/lib/olly_trace/olly_format_backend/olly_format_fuchsia.ml b/_build/default/lib/olly_trace/olly_format_backend/.formatted/olly_format_fuchsia.ml
index 6336b46..4ec2aaa 100644
--- a/_build/default/lib/olly_trace/olly_format_backend/olly_format_fuchsia.ml
+++ b/_build/default/lib/olly_trace/olly_format_backend/.formatted/olly_format_fuchsia.ml
@@ -5,8 +5,8 @@ let description = "Perfetto"
 
 module Trace = Trace_fuchsia.Writer
 
-type trace = { 
-  doms : Trace.Thread_ref.t array; 
+type trace = {
+  doms : Trace.Thread_ref.t array;
   buf : Trace_fuchsia.Buf_chain.t;
   subscriber : Trace_fuchsia.Subscriber.t;
   exporter : Trace_fuchsia.Exporter.t;
@@ -14,15 +14,17 @@ type trace = {
 
 let flush trace =
   Trace_fuchsia.Buf_chain.ready_all_non_empty trace.buf;
-  Trace_fuchsia.Buf_chain.pop_ready trace.buf ~f:trace.exporter.write_bufs; 
+  Trace_fuchsia.Buf_chain.pop_ready trace.buf ~f:trace.exporter.write_bufs;
   trace.exporter.flush ()
 
 let create ~filename =
   let buf_pool = Trace_fuchsia.Buf_pool.create () in
   let buf = Trace_fuchsia.Buf_chain.create ~sharded:false ~buf_pool () in
   let oc = Out_channel.open_bin filename in
-  let exporter = Trace_fuchsia.Exporter.of_out_channel ~close_channel:true oc in 
-  let subscriber = Trace_fuchsia.Subscriber.create ~buf_pool ~pid:0 ~exporter () in
+  let exporter = Trace_fuchsia.Exporter.of_out_channel ~close_channel:true oc in
+  let subscriber =
+    Trace_fuchsia.Subscriber.create ~buf_pool ~pid:0 ~exporter ()
+  in
   (* Adds the headers to output *)
   Trace_fuchsia.Subscriber.Callbacks.on_init subscriber ~time_ns:0L;
   let doms =
@@ -35,7 +37,7 @@ let create ~filename =
 
 let close trace =
   flush trace;
-  Trace_fuchsia.Subscriber.close trace.subscriber 
+  Trace_fuchsia.Subscriber.close trace.subscriber
 
 let emit trace evt =
   let open Event in
@@ -50,7 +52,9 @@ let emit trace evt =
       in
       write trace.buf ~args:[] ~t_ref ~name ~time_ns ()
   | Counter value ->
-      Trace.Event.Counter.encode trace.buf ~t_ref ~name ~time_ns ~args:[ ("v", A_int value) ] ()
+      Trace.Event.Counter.encode trace.buf ~t_ref ~name ~time_ns
+        ~args:[ ("v", A_int value) ]
+        ()
   | Instant ->
-      Trace.Event.Instant.encode trace.buf ~name ~args:[] ~t_ref ~time_ns () 
+      Trace.Event.Instant.encode trace.buf ~name ~args:[] ~t_ref ~time_ns ()
   | _ -> ()
File "lib/olly_common/launch.ml", line 1, characters 0-0:
diff --git a/_build/default/lib/olly_common/launch.ml b/_build/default/lib/olly_common/.formatted/launch.ml
index fad4d58..1fdb4c9 100644
--- a/_build/default/lib/olly_common/launch.ml
+++ b/_build/default/lib/olly_common/.formatted/launch.ml
@@ -8,9 +8,7 @@ type subprocess = {
   pid : int;
 }
 
-type exec_config =
-  | Attach of string * int
-  | Execute of string list
+type exec_config = Attach of string * int | Execute of string list
 
 (* Raised by exec_process to indicate various unrecoverable failures. *)
 exception Fail of string
@@ -37,12 +35,13 @@ let exec_process (argsl : string list) : subprocess =
       |]
       (Unix.environment ())
   in
-  let child_pid = try
-    Unix.create_process_env executable_filename (Array.of_list argsl) env
-      Unix.stdin Unix.stdout Unix.stderr
-    with
-    | Unix.Unix_error(Unix.ENOENT, _, _) ->
-       raise (Fail (Printf.sprintf "executable %s not found" executable_filename))
+  let child_pid =
+    try
+      Unix.create_process_env executable_filename (Array.of_list argsl) env
+        Unix.stdin Unix.stdout Unix.stderr
+    with Unix.Unix_error (Unix.ENOENT, _, _) ->
+      raise
+        (Fail (Printf.sprintf "executable %s not found" executable_filename))
   in
   Unix.sleepf 0.1;
   let cursor = Runtime_events.create_cursor (Some (dir, child_pid)) in
@@ -55,9 +54,7 @@ let exec_process (argsl : string list) : subprocess =
     Runtime_events.free_cursor cursor;
     (* We need to remove the ring buffers ourselves because we told
        the child process not to remove them *)
-    let ring_file =
-      Filename.concat dir (string_of_int child_pid ^ ".events")
-    in
+    let ring_file = Filename.concat dir (string_of_int child_pid ^ ".events") in
     Unix.unlink ring_file
   in
   { alive; cursor; close; pid = child_pid }
File "lib/olly_common/cli.ml", line 1, characters 0-0:
diff --git a/_build/default/lib/olly_common/cli.ml b/_build/default/lib/olly_common/.formatted/cli.ml
index 9f75d35..b9981ee 100644
--- a/_build/default/lib/olly_common/cli.ml
+++ b/_build/default/lib/olly_common/.formatted/cli.ml
@@ -37,9 +37,13 @@ let exec_args p =
   let exec_and_args, ea_docv =
     let doc = "Executable and arguments to trace." in
     let docv = "EXECUTABLE" in
-    Term.(const List.concat
-          $ Arg.(value & pos_right (p - 1) (list ~sep: ' ' string) []
-          & info [] ~docv ~doc), docv)
+    Term.
+      ( (const List.concat
+        $ Arg.(
+            value
+            & pos_right (p - 1) (list ~sep:' ' string) []
+            & info [] ~docv ~doc)),
+        docv )
   in
   let attach_opt, ao_docv =
     let doc =
File "lib/olly_gc_stats/olly_gc_stats.ml", line 1, characters 0-0:
diff --git a/_build/default/lib/olly_gc_stats/olly_gc_stats.ml b/_build/default/lib/olly_gc_stats/.formatted/olly_gc_stats.ml
index 6a5c214..f12fe30 100644
--- a/_build/default/lib/olly_gc_stats/olly_gc_stats.ml
+++ b/_build/default/lib/olly_gc_stats/.formatted/olly_gc_stats.ml
@@ -142,8 +142,9 @@ let gc_stats json output exec_args =
     olly
       { empty_config with runtime_begin; runtime_end; lifecycle; init; cleanup }
       exec_args
-  with
-  | Fail msg -> Printf.eprintf "%s\n" msg; exit (-1)
+  with Fail msg ->
+    Printf.eprintf "%s\n" msg;
+    exit (-1)
 
 let gc_stats_cmd =
   let open Cmdliner in
dune build @fmt failed
"/usr/bin/env" "bash" "-c" "opam exec -- dune build @fmt --ignore-promoted-rules || (echo "dune build @fmt failed"; exit 2)" failed with exit status 2
2025-07-17 00:46.19: Job failed: Failed: Build failed