Organisations ahrefs ocannl e847d8 ()(lint-fmt)
(lint-fmt)

Created at May 09 13:01 +00:00
0s in queue
Finished at May 09 13:06 +00:00
e847d8
Ran for 5m11s
Link Copied
Code Copied
Logs

Show raw logs
2025-05-09 13:01.42: New job: test ahrefs/ocannl https://github.com/ahrefs/ocannl.git#refs/heads/master (e847d84183980d966ced535400c0871e714a7e2b) (linux-x86_64:(lint-fmt))
Base: ocaml/opam:debian-12-ocaml-4.08@sha256:23c85daf4eb9a91d154cf2f9fed47f4f9b9fa788adc9c1fc7f0802e3dc06d7c4
ocamlformat version: version 0.27.0 (from opam)


To reproduce locally:


git clone --recursive "https://github.com/ahrefs/ocannl.git" -b "master" && cd "ocannl" && git reset --hard e847d841
cat > Dockerfile <<'END-OF-DOCKERFILE'
FROM ocaml/opam:debian-12-ocaml-4.08@sha256:23c85daf4eb9a91d154cf2f9fed47f4f9b9fa788adc9c1fc7f0802e3dc06d7c4
USER 1000:1000
RUN cd ~/opam-repository && (git cat-file -e 442eddb8a363418dcb02e519972818da08bb7cd4 || git fetch origin master) && git reset -q --hard 442eddb8a363418dcb02e519972818da08bb7cd4 && git log --no-decorate -n1 --oneline && opam update -u
RUN opam depext -i dune
WORKDIR /src
RUN opam depext -i ocamlformat=0.27.0
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-05-09 13:01.42: Using cache hint "ahrefs/ocannl-ocaml/opam:debian-12-ocaml-4.08@sha256:23c85daf4eb9a91d154cf2f9fed47f4f9b9fa788adc9c1fc7f0802e3dc06d7c4-debian-12-4.08_opam-2.3-ocamlformat-442eddb8a363418dcb02e519972818da08bb7cd4"
2025-05-09 13:01.42: Using OBuilder spec:
((from ocaml/opam:debian-12-ocaml-4.08@sha256:23c85daf4eb9a91d154cf2f9fed47f4f9b9fa788adc9c1fc7f0802e3dc06d7c4)
(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 442eddb8a363418dcb02e519972818da08bb7cd4 || git fetch origin master) && git reset -q --hard 442eddb8a363418dcb02e519972818da08bb7cd4 && 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.27.0"))
(copy (src .) (dst /src/))
(run (shell "opam exec -- dune build @fmt --ignore-promoted-rules || (echo \"dune build @fmt failed\"; exit 2)"))
)


2025-05-09 13:01.42: Waiting for resource in pool OCluster
2025-05-09 13:01.42: Waiting for worker…
2025-05-09 13:01.42: Got resource from pool OCluster
Building on x86-bm-c7.sw.ocaml.org
All commits already cached
HEAD is now at e847d841 Fix overlooked metal pinned dependency


(from ocaml/opam:debian-12-ocaml-4.08@sha256:23c85daf4eb9a91d154cf2f9fed47f4f9b9fa788adc9c1fc7f0802e3dc06d7c4)
Unable to find image 'ocaml/opam:debian-12-ocaml-4.08@sha256:23c85daf4eb9a91d154cf2f9fed47f4f9b9fa788adc9c1fc7f0802e3dc06d7c4' locally
docker.io/ocaml/opam@sha256:23c85daf4eb9a91d154cf2f9fed47f4f9b9fa788adc9c1fc7f0802e3dc06d7c4: Pulling from ocaml/opam
031dfd3a3b8c: Pulling fs layer
031dfd3a3b8c: Verifying Checksum
031dfd3a3b8c: Download complete
031dfd3a3b8c: Pull complete
Digest: sha256:23c85daf4eb9a91d154cf2f9fed47f4f9b9fa788adc9c1fc7f0802e3dc06d7c4
Status: Downloaded newer image for ocaml/opam@sha256:23c85daf4eb9a91d154cf2f9fed47f4f9b9fa788adc9c1fc7f0802e3dc06d7c4
2025-05-09 13:04.00 ---> saved as "44ab722c6d76cc4aa083f99994b6eb04bd97004720a37e6316ca14ec9a9ee4aa"


/: (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 442eddb8a363418dcb02e519972818da08bb7cd4 || git fetch origin master) && git reset -q --hard 442eddb8a363418dcb02e519972818da08bb7cd4 && git log --no-decorate -n1 --oneline && opam update -u"))
From https://github.com/ocaml/opam-repository
* branch                  master     -> FETCH_HEAD
34a3fc46c3..0d013e603b  master     -> origin/master
442eddb8a3 Merge pull request #27761 from maiste/release-dune-3.18.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-05-09 13:05.08 ---> saved as "2b4d57bfea760aa246bd3085b47c380147249138e623417b44e014cb82cda1dd"


/: (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.18.1


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


<><> Processing actions <><><><><><><><><><><><><><><><><><><><><><><><><><><><>
-> installed dune.3.18.1
Done.
# Run eval $(opam env) to update the current shell environment
2025-05-09 13:05.43 ---> saved as "457b790b55ad4c3d576846b293a282971100232ad7fc0da38e5048f75a7fbcd4"


/: (workdir /src)


/src: (run (cache (opam-archives (target /home/opam/.opam/download-cache)))
(network host)
(shell "opam depext -i ocamlformat=0.27.0"))
# 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-build-info   3.18.1   [required by ocamlformat-lib]
- 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 menhirSdk         20240715 [required by ocamlformat-lib]
- install either            1.0.0    [required by ocamlformat-lib]
- install ocaml-version     4.0.0    [required by ocamlformat-lib]
- install camlp-streams     5.0.1    [required by ocamlformat-lib]
- install csexp             1.5.2    [required by ocamlformat]
- install seq               base     [required by re]
- install ocamlfind         1.9.8    [required by ocp-indent, astring, fpath, uuseg]
- install fix               20230505 [required by ocamlformat-lib]
- install menhir            20240715 [required by ocamlformat-lib]
- install dune-configurator 3.18.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.27.0   [required by ocamlformat]
- install ocamlformat       0.27.0
===== 29 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.18.1] found in cache
[dune-configurator.3.18.1] found in cache
[either.1.0.0] found in cache
[fix.20230505] 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.0] found in cache
[ocamlbuild.0.16.1] found in cache
[ocamlfind.1.9.8] found in cache
[ocamlformat.0.27.0] found in cache
[ocamlformat-lib.0.27.0] found in cache
[ocp-indent.1.8.1] found in cache
[re.1.11.0] 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 either.1.0.0
-> installed fix.20230505
-> installed cmdliner.1.3.0
-> installed menhirCST.20240715
-> installed menhirLib.20240715
-> installed menhirSdk.20240715
-> installed ocaml-version.4.0.0
-> installed re.1.11.0
-> installed sexplib0.v0.14.0
-> installed dune-build-info.3.18.1
-> installed dune-configurator.3.18.1
-> installed ocamlfind.1.9.8
-> installed base-bytes.base
-> installed ocp-indent.1.8.1
-> installed ocamlbuild.0.16.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.27.0
-> installed ocamlformat.0.27.0
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-05-09 13:06.51 ---> saved as "c834b13f15d865d5960ac73b6948470e601187f159ec92dad38721ea8407ba59"


/src: (copy (src .) (dst /src/))
2025-05-09 13:06.51 ---> saved as "e76d82a3a498b4721c94de468257e9cfc6c4c880590ee0b42bd34345ea1a0704"


/src: (run (shell "opam exec -- dune build @fmt --ignore-promoted-rules || (echo \"dune build @fmt failed\"; exit 2)"))
File "lib/PrintBox_utils.ml", line 1, characters 0-0:
diff --git a/_build/default/lib/PrintBox_utils.ml b/_build/default/lib/.formatted/PrintBox_utils.ml
index 21858c1..cc3a297 100644
--- a/_build/default/lib/PrintBox_utils.ml
+++ b/_build/default/lib/.formatted/PrintBox_utils.ml
@@ -1,6 +1,7 @@
open Base
module BPlot = PrintBox_ext_plot
module B = PrintBox
+
let _get_local_debug_runtime = Utils.get_local_debug_runtime


type box = B.t
File "lib/tensor.mli", line 1, characters 0-0:
diff --git a/_build/default/lib/tensor.mli b/_build/default/lib/.formatted/tensor.mli
index 05ed03e..673a559 100644
--- a/_build/default/lib/tensor.mli
+++ b/_build/default/lib/.formatted/tensor.mli
@@ -51,16 +51,16 @@ val with_unchanged_roots : f:(unit -> 'a) -> 'a
val default_value_prec : Ir.Ops.prec ref
(** The default precision for the value node of terminal (i.e. non-composite) tensors.


-    Note: the precision of a node can be set arbitrarily via {!Ir.Tnode.update_prec}. The
-    default precision for value nodes of composite tensors is the maximum of precisions of the value
-    nodes of sub-tensors. *)
+    Note: the precision of a node can be set arbitrarily via {!Ir.Tnode.update_prec}. The default
+    precision for value nodes of composite tensors is the maximum of precisions of the value nodes
+    of sub-tensors. *)


val default_grad_prec : Ir.Ops.prec ref
(** The default precision for the gradient node of terminal (i.e. non-composite) tensors.


-    Note: the precision of a node can be set arbitrarily via {!Ir.Tnode.update_prec}. The
-    default precision for gradient nodes of composite tensors is the maximum of precisions of the
-    gradient nodes of sub-tensors. *)
+    Note: the precision of a node can be set arbitrarily via {!Ir.Tnode.update_prec}. The default
+    precision for gradient nodes of composite tensors is the maximum of precisions of the gradient
+    nodes of sub-tensors. *)


exception Session_error of string * t option


File "arrayjit/lib/backends.mli", line 1, characters 0-0:
diff --git a/_build/default/arrayjit/lib/backends.mli b/_build/default/arrayjit/lib/.formatted/backends.mli
index 91bdfe1..7f80500 100644
--- a/_build/default/arrayjit/lib/backends.mli
+++ b/_build/default/arrayjit/lib/.formatted/backends.mli
@@ -1,7 +1,6 @@
(** {1 A collection of the execution backends} *)


open Base
-
module Schedulers = Schedulers


val finalize :
File "arrayjit/lib/cuda_backend_impl.cudajit.ml", line 1, characters 0-0:
diff --git a/_build/default/arrayjit/lib/cuda_backend_impl.cudajit.ml b/_build/default/arrayjit/lib/.formatted/cuda_backend_impl.cudajit.ml
index 43c9cfa..b58bb08 100644
--- a/_build/default/arrayjit/lib/cuda_backend_impl.cudajit.ml
+++ b/_build/default/arrayjit/lib/.formatted/cuda_backend_impl.cudajit.ml
@@ -1 +1 @@
-include Cuda_backend
\ No newline at end of file
+include Cuda_backend
File "arrayjit/lib/gcc_backend_impl.gccjit.ml", line 1, characters 0-0:
diff --git a/_build/default/arrayjit/lib/gcc_backend_impl.gccjit.ml b/_build/default/arrayjit/lib/.formatted/gcc_backend_impl.gccjit.ml
index 95a69fd..9474f04 100644
--- a/_build/default/arrayjit/lib/gcc_backend_impl.gccjit.ml
+++ b/_build/default/arrayjit/lib/.formatted/gcc_backend_impl.gccjit.ml
@@ -1 +1 @@
-include Gcc_backend
\ No newline at end of file
+include Gcc_backend
File "arrayjit/lib/gcc_backend_impl.missing.ml", line 1, characters 0-0:
diff --git a/_build/default/arrayjit/lib/gcc_backend_impl.missing.ml b/_build/default/arrayjit/lib/.formatted/gcc_backend_impl.missing.ml
index fc323f6..a4b9032 100644
--- a/_build/default/arrayjit/lib/gcc_backend_impl.missing.ml
+++ b/_build/default/arrayjit/lib/.formatted/gcc_backend_impl.missing.ml
@@ -1 +1,3 @@
-include No_device_backend_missing.Missing (struct let name = "gccjit" end)
+include No_device_backend_missing.Missing (struct
+  let name = "gccjit"
+end)
File "arrayjit/lib/lowered_backend_missing.mli", line 1, characters 0-0:
diff --git a/_build/default/arrayjit/lib/lowered_backend_missing.mli b/_build/default/arrayjit/lib/.formatted/lowered_backend_missing.mli
index cf39a01..cedbdb5 100644
--- a/_build/default/arrayjit/lib/lowered_backend_missing.mli
+++ b/_build/default/arrayjit/lib/.formatted/lowered_backend_missing.mli
@@ -1,3 +1,5 @@
-module Missing : functor (_ : sig
-  val name : string
-end) -> Ir.Backend_impl.Lowered_backend
+module Missing : functor
+  (_ : sig
+     val name : string
+   end)
+  -> Ir.Backend_impl.Lowered_backend
File "arrayjit/lib/metal_backend_impl.metal.ml", line 1, characters 0-0:
diff --git a/_build/default/arrayjit/lib/metal_backend_impl.metal.ml b/_build/default/arrayjit/lib/.formatted/metal_backend_impl.metal.ml
index 998e0bc..5c9d44e 100644
--- a/_build/default/arrayjit/lib/metal_backend_impl.metal.ml
+++ b/_build/default/arrayjit/lib/.formatted/metal_backend_impl.metal.ml
@@ -1 +1 @@
-include Metal_backend
\ No newline at end of file
+include Metal_backend
File "arrayjit/lib/metal_backend_impl.mli", line 1, characters 0-0:
diff --git a/_build/default/arrayjit/lib/metal_backend_impl.mli b/_build/default/arrayjit/lib/.formatted/metal_backend_impl.mli
index 152d1cb..4f0a1ec 100644
--- a/_build/default/arrayjit/lib/metal_backend_impl.mli
+++ b/_build/default/arrayjit/lib/.formatted/metal_backend_impl.mli
@@ -1,3 +1,5 @@
-module Fresh : functor (_ : sig
-  val config : Ir.Backend_intf.config
-end) -> Ir.Backend_impl.Lowered_backend
+module Fresh : functor
+  (_ : sig
+     val config : Ir.Backend_intf.config
+   end)
+  -> Ir.Backend_impl.Lowered_backend
File "arrayjit/lib/backend_intf.ml", line 1, characters 0-0:
diff --git a/_build/default/arrayjit/lib/backend_intf.ml b/_build/default/arrayjit/lib/.formatted/backend_intf.ml
index 0cd264e..73b727e 100644
--- a/_build/default/arrayjit/lib/backend_intf.ml
+++ b/_build/default/arrayjit/lib/.formatted/backend_intf.ml
@@ -119,8 +119,8 @@ type ('buffer_ptr, 'dev, 'runner, 'event) device =
[device_id] (distinct device instances) might refer to the same physical device. *)
cross_stream_candidates : 'buffer_ptr Hashtbl.M(Tnode).t;
(** Freshly created arrays that might be shared across streams. The map can both grow and
-          shrink. This map also contains buffer/pointer wrappers for hosted tnodes
-          on unified memory systems. *)
+          shrink. This map also contains buffer/pointer wrappers for hosted tnodes on unified memory
+          systems. *)
owner_stream : ('buffer_ptr, 'dev, 'runner, 'event) stream_ref Hashtbl.M(Tnode).t;
(** The stream owning a given node. This map can only grow. Currently, if the memory mode of a
node is inferred, only this stream will modify a cross-stream shared array. But memory
File "arrayjit/lib/metal_backend.mli", line 1, characters 0-0:
diff --git a/_build/default/arrayjit/lib/metal_backend.mli b/_build/default/arrayjit/lib/.formatted/metal_backend.mli
index 152d1cb..4f0a1ec 100644
--- a/_build/default/arrayjit/lib/metal_backend.mli
+++ b/_build/default/arrayjit/lib/.formatted/metal_backend.mli
@@ -1,3 +1,5 @@
-module Fresh : functor (_ : sig
-  val config : Ir.Backend_intf.config
-end) -> Ir.Backend_impl.Lowered_backend
+module Fresh : functor
+  (_ : sig
+     val config : Ir.Backend_intf.config
+   end)
+  -> Ir.Backend_impl.Lowered_backend
File "arrayjit/lib/no_device_backend_missing.mli", line 1, characters 0-0:
diff --git a/_build/default/arrayjit/lib/no_device_backend_missing.mli b/_build/default/arrayjit/lib/.formatted/no_device_backend_missing.mli
index 9398fe7..ee1e7fa 100644
--- a/_build/default/arrayjit/lib/no_device_backend_missing.mli
+++ b/_build/default/arrayjit/lib/.formatted/no_device_backend_missing.mli
@@ -1,3 +1,5 @@
-module Missing : functor (_ : sig
-  val name : string
-end) -> Ir.Backend_impl.Lowered_no_device_backend
+module Missing : functor
+  (_ : sig
+     val name : string
+   end)
+  -> Ir.Backend_impl.Lowered_no_device_backend
File "arrayjit/lib/cc_backend.ml", line 1, characters 0-0:
diff --git a/_build/default/arrayjit/lib/cc_backend.ml b/_build/default/arrayjit/lib/.formatted/cc_backend.ml
index 45c9bbc..de46cb4 100644
--- a/_build/default/arrayjit/lib/cc_backend.ml
+++ b/_build/default/arrayjit/lib/.formatted/cc_backend.ml
@@ -86,12 +86,13 @@ let%track7_sexp c_compile_and_load ~f_name =
let%diagn_sexp compile ~(name : string) bindings (lowered : Low_level.optimized) =
let module Syntax = C_syntax.C_syntax (C_syntax.Pure_C_config (struct
type nonrec buffer_ptr = buffer_ptr
+
let use_host_memory = use_host_memory
let procs = [| lowered |]
end)) in
(* FIXME: do we really want all of them, or only the used ones? *)
let idx_params = Indexing.bound_symbols bindings in
-let pp_file = Utils.pp_file ~base_name:name ~extension:".c" in
+  let pp_file = Utils.pp_file ~base_name:name ~extension:".c" in
Syntax.print_declarations pp_file.ppf;
let params = Syntax.compile_proc ~name pp_file.ppf idx_params lowered in
pp_file.finalize ();
@@ -101,6 +102,7 @@ let pp_file = Utils.pp_file ~base_name:name ~extension:".c" in
let%diagn_sexp compile_batch ~names bindings (lowereds : Low_level.optimized option array) =
let module Syntax = C_syntax.C_syntax (C_syntax.Pure_C_config (struct
type nonrec buffer_ptr = buffer_ptr
+
let use_host_memory = use_host_memory
let procs = Array.filter_opt lowereds
end)) in
File "arrayjit/lib/schedulers.ml", line 1, characters 0-0:
diff --git a/_build/default/arrayjit/lib/schedulers.ml b/_build/default/arrayjit/lib/.formatted/schedulers.ml
index 8180ba3..4b7fcb5 100644
--- a/_build/default/arrayjit/lib/schedulers.ml
+++ b/_build/default/arrayjit/lib/.formatted/schedulers.ml
@@ -259,6 +259,7 @@ module Sync (Backend : For_add_scheduler) = struct
let all_work _stream = ()
let is_idle _stream = true
let await _stream = ()
+
(* let global_run_no = ref 0 *)
let schedule_task _stream task = Ir.Task.run task
let get_global_debug_info () = Sexp.message "global_debug" []
File "arrayjit/lib/c_syntax.ml", line 1, characters 0-0:
diff --git a/_build/default/arrayjit/lib/c_syntax.ml b/_build/default/arrayjit/lib/.formatted/c_syntax.ml
index 9db5446..a636f9f 100644
--- a/_build/default/arrayjit/lib/c_syntax.ml
+++ b/_build/default/arrayjit/lib/.formatted/c_syntax.ml
@@ -151,14 +151,17 @@ struct
match prec with
| Ops.Byte_prec _ ->
fun ppf pp1 v1 pp2 v2 ->
-              Stdlib.Format.fprintf ppf "(((float)%a > 0.0f && (float)%a < 1.0f) ? %a : (unsigned char)0)"
-                pp1 v1 pp1 v1 pp2 v2
+              Stdlib.Format.fprintf ppf
+                "(((float)%a > 0.0f && (float)%a < 1.0f) ? %a : (unsigned char)0)" pp1 v1 pp1 v1 pp2
+                v2
| Ops.Half_prec _ ->
fun ppf pp1 v1 pp2 v2 ->
-              Stdlib.Format.fprintf ppf "((%a > 0.0f16 && %a < 1.0f16) ? %a : 0.0f16)" pp1 v1 pp1 v1 pp2 v2
+              Stdlib.Format.fprintf ppf "((%a > 0.0f16 && %a < 1.0f16) ? %a : 0.0f16)" pp1 v1 pp1 v1
+                pp2 v2
| Ops.Single_prec _ ->
fun ppf pp1 v1 pp2 v2 ->
-              Stdlib.Format.fprintf ppf "((%a > 0.0f && %a < 1.0f) ? %a : 0.0f)" pp1 v1 pp1 v1 pp2 v2
+              Stdlib.Format.fprintf ppf "((%a > 0.0f && %a < 1.0f) ? %a : 0.0f)" pp1 v1 pp1 v1 pp2
+                v2
| Ops.Double_prec _ ->
fun ppf pp1 v1 pp2 v2 ->
Stdlib.Format.fprintf ppf "((%a > 0.0 && %a < 1.0) ? %a : 0.0)" pp1 v1 pp1 v1 pp2 v2
File "arrayjit/lib/backends.ml", line 1, characters 0-0:
diff --git a/_build/default/arrayjit/lib/backends.ml b/_build/default/arrayjit/lib/.formatted/backends.ml
index 9c0675c..a87c77d 100644
--- a/_build/default/arrayjit/lib/backends.ml
+++ b/_build/default/arrayjit/lib/.formatted/backends.ml
@@ -413,11 +413,10 @@ module Raise_backend (Device : Lowered_backend) : Backend = struct
&& Tn.known_shared_cross_streams key && Tn.is_hosted_force key 44
then
Hashtbl.update_and_return device.cross_stream_candidates key ~f:(fun _ ->
-                      get_buffer_ptr
-                        ~size_in_bytes:(Lazy.force key.size_in_bytes)
-                        @@ Ndarray.get_voidptr_not_managed
-                        @@ Option.value_exn ~here:[%here]
-                        @@ Lazy.force key.array)
+                      get_buffer_ptr ~size_in_bytes:(Lazy.force key.size_in_bytes)
+                      @@ Ndarray.get_voidptr_not_managed
+                      @@ Option.value_exn ~here:[%here]
+                      @@ Lazy.force key.array)
else Hashtbl.find_or_add device.cross_stream_candidates key ~default
in
if Hashtbl.mem device.cross_stream_candidates key then
@@ -539,6 +538,8 @@ let%track5_sexp fresh_backend ?backend_name ?(config = For_parallel_copying) ()
| "sync_gccjit" ->
(module Make_device_backend_from_lowered (Schedulers.Sync) (Gcc_backend_impl) (Config)
: Backend)
-  | "cuda" -> (module Raise_backend ((Cuda_backend_impl.Fresh (Config) : Lowered_backend)) : Backend)
-  | "metal" -> (module Raise_backend ((Metal_backend_impl.Fresh (Config) : Lowered_backend)) : Backend)
+  | "cuda" ->
+      (module Raise_backend ((Cuda_backend_impl.Fresh (Config) : Lowered_backend)) : Backend)
+  | "metal" ->
+      (module Raise_backend ((Metal_backend_impl.Fresh (Config) : Lowered_backend)) : Backend)
| backend -> invalid_arg [%string "Backends.fresh_backend: unknown backend %{backend}"]
File "arrayjit/lib/cuda_backend.ml", line 1, characters 0-0:
diff --git a/_build/default/arrayjit/lib/cuda_backend.ml b/_build/default/arrayjit/lib/.formatted/cuda_backend.ml
index da07c7b..fa70979 100644
--- a/_build/default/arrayjit/lib/cuda_backend.ml
+++ b/_build/default/arrayjit/lib/.formatted/cuda_backend.ml
@@ -310,12 +310,15 @@ end) : Ir.Backend_impl.Lowered_backend = struct
| Relu_gate, _ -> C_syntax.binop_adapter ("(", " > 0.0 ?", " : 0.0)")
| Satur01_gate, Byte_prec _ ->
fun ppf pp1 v1 pp2 v2 ->
-            Stdlib.Format.fprintf ppf "(((float)%a > 0.0f && (float)%a < 1.0f) ? %a : (unsigned char)0)"
-              pp1 v1 pp1 v1 pp2 v2
+            Stdlib.Format.fprintf ppf
+              "(((float)%a > 0.0f && (float)%a < 1.0f) ? %a : (unsigned char)0)" pp1 v1 pp1 v1 pp2
+              v2
| Satur01_gate, Half_prec _ ->
fun ppf pp1 v1 pp2 v2 ->
Stdlib.Format.fprintf ppf
-              "((__hgt(%a, __ushort_as_half((unsigned short)0x0000U)) && __hlt(%a, __ushort_as_half((unsigned short)0x3C00U))) ? %a : __ushort_as_half((unsigned short)0x0000U))"
+              "((__hgt(%a, __ushort_as_half((unsigned short)0x0000U)) && __hlt(%a, \
+               __ushort_as_half((unsigned short)0x3C00U))) ? %a : __ushort_as_half((unsigned \
+               short)0x0000U))"
pp1 v1 pp1 v1 pp2 v2
| Satur01_gate, Single_prec _ ->
fun ppf pp1 v1 pp2 v2 ->
File "lib/shape.ml", line 1, characters 0-0:
diff --git a/_build/default/lib/shape.ml b/_build/default/lib/.formatted/shape.ml
index 115be61..f2aae7b 100644
--- a/_build/default/lib/shape.ml
+++ b/_build/default/lib/.formatted/shape.ml
@@ -324,8 +324,7 @@ let einsum_slot_spec_to_dims_bio ~generative ~sh_id ~row_var_env ~dim_var_env la
| Second i ->
let var = Row.get_var () in
let d = Row.Var var in
-        proj_env_update :=
-          Map.add_exn !proj_env_update ~key:var ~data:(Idx.Fixed_idx i);
+        proj_env_update := Map.add_exn !proj_env_update ~key:var ~data:(Idx.Fixed_idx i);
extras := Row.Dim_constr { d; constr = At_least_dim (i + 1) } :: !extras;
d
in
File "arrayjit/lib/gcc_backend.ml", line 1, characters 0-0:
diff --git a/_build/default/arrayjit/lib/gcc_backend.ml b/_build/default/arrayjit/lib/.formatted/gcc_backend.ml
index 6585071..ece7913 100644
--- a/_build/default/arrayjit/lib/gcc_backend.ml
+++ b/_build/default/arrayjit/lib/.formatted/gcc_backend.ml
@@ -19,7 +19,6 @@ let root_ctx =
let ctx = Context.create () in
Context.set_option ctx Optimization_level (optimization_level ());
ctx
-


module Tn = Tnode


File "lib/ppx_cd.ml", line 1, characters 0-0:
diff --git a/_build/default/lib/ppx_cd.ml b/_build/default/lib/.formatted/ppx_cd.ml
index 3c65ff5..621a083 100644
--- a/_build/default/lib/ppx_cd.ml
+++ b/_build/default/lib/.formatted/ppx_cd.ml
@@ -118,9 +118,7 @@ let assignment ~punned ~lhs ~rhses body =
else body
in
let tensor_vbs = List.filter_map rhses ~f:(fun rhs -> rhs.vb) in
-  let body =
-    [%expr { asgns = [%e body]; embedded_nodes = Base.Set.empty (module Ir.Tnode) }]
-  in
+  let body = [%expr { asgns = [%e body]; embedded_nodes = Base.Set.empty (module Ir.Tnode) }] in
let comps =
List.fold (body :: List.rev forward_args) ~init:[%expr []] ~f:(fun xs x ->
[%expr [%e x] :: [%e xs]])
@@ -198,9 +196,7 @@ let guess_pun_hint ~punned ~bad_pun_hints filler_typ filler =
| No_grad_tensor_intro { name; _ }, _ -> Hashtbl.find punned name


let empty_tns ~loc = [%expr Base.Set.empty (module Ir.Tnode)]
-
-let empty_comp ~loc =
-  [%expr { asgns = Ir.Assignments.Noop; embedded_nodes = [%e empty_tns ~loc] }]
+let empty_comp ~loc = [%expr { asgns = Ir.Assignments.Noop; embedded_nodes = [%e empty_tns ~loc] }]


let setup_array ~punned ~bad_pun_hints ~is_lhs
{ typ = filler_typ; slot; expr = filler; vbs; array_opt_of_code } =
@@ -210,8 +206,7 @@ let setup_array ~punned ~bad_pun_hints ~is_lhs
if is_lhs then [%expr Some [%e tn]] else [%expr Some (Ir.Assignments.Node [%e tn])]
in
let buffer opt_tn =
-    if is_lhs then opt_tn
-    else [%expr Option.map [%e opt_tn] ~f:(fun tn -> Ir.Assignments.Node tn)]
+    if is_lhs then opt_tn else [%expr Option.map [%e opt_tn] ~f:(fun tn -> Ir.Assignments.Node tn)]
in
let pun_hint_tnode = guess_pun_hint ~punned ~bad_pun_hints filler_typ filler in
let default_setup =
@@ -351,8 +346,7 @@ let setup_array ~punned ~bad_pun_hints ~is_lhs
| Merge_grad t ->
{
default_setup with
-        array_opt =
-          [%expr Option.map [%e filler] ~f:(fun tn -> Ir.Assignments.Merge_buffer tn)];
+        array_opt = [%expr Option.map [%e filler] ~f:(fun tn -> Ir.Assignments.Merge_buffer tn)];
tensor = Some t;
}


@@ -868,8 +862,7 @@ let translate (expr : expression) : result =
let __comment_block = [%e res2.expr] in
{
Ir.Assignments.asgns =
-                  Ir.Assignments.Block_comment
-                    ([%e comment], __comment_block.Ir.Assignments.asgns);
+                  Ir.Assignments.Block_comment ([%e comment], __comment_block.Ir.Assignments.asgns);
embedded_nodes = __comment_block.Ir.Assignments.embedded_nodes;
}];
}
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-05-09 13:06.53: Job failed: Failed: Build failed