Getting StartedDocumentation
Organisationsahrefsocannlccaf45 ()(lint-fmt)

(lint-fmt)

Link Copied
Code Copied

Logs

Show raw logs
2025-03-20 21:04.47: New job: test ahrefs/ocannl https://github.com/ahrefs/ocannl.git#refs/heads/master (ccaf459c55f1e1dab014a65af54e1ba2ec3b9ad0) (linux-x86_64:(lint-fmt))
Base: ocaml/opam:debian-12-ocaml-4.08@sha256:a7c06d659921ac2c9eb6cf997eb3a48300686cce5d1aeb393c0eb201644f0112
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 ccaf459c
cat > Dockerfile <<'END-OF-DOCKERFILE'
FROM ocaml/opam:debian-12-ocaml-4.08@sha256:a7c06d659921ac2c9eb6cf997eb3a48300686cce5d1aeb393c0eb201644f0112
USER 1000:1000
RUN cd ~/opam-repository && (git cat-file -e cb8df6db0195538a02cc2b2eb20e468f22c475a7 || git fetch origin master) && git reset -q --hard cb8df6db0195538a02cc2b2eb20e468f22c475a7 && 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-03-20 21:04.47: Using cache hint "ahrefs/ocannl-ocaml/opam:debian-12-ocaml-4.08@sha256:a7c06d659921ac2c9eb6cf997eb3a48300686cce5d1aeb393c0eb201644f0112-debian-12-4.08_opam-2.3-ocamlformat-cb8df6db0195538a02cc2b2eb20e468f22c475a7"
2025-03-20 21:04.47: Using OBuilder spec:
((from ocaml/opam:debian-12-ocaml-4.08@sha256:a7c06d659921ac2c9eb6cf997eb3a48300686cce5d1aeb393c0eb201644f0112)
(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 cb8df6db0195538a02cc2b2eb20e468f22c475a7 || git fetch origin master) && git reset -q --hard cb8df6db0195538a02cc2b2eb20e468f22c475a7 && 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-03-20 21:04.47: Waiting for resource in pool OCluster
2025-03-20 21:04.47: Waiting for worker…
2025-03-20 21:14.59: Got resource from pool OCluster
Building on x86-bm-c4.sw.ocaml.org
HEAD is now at 367be265 Load log_level earlier to consistently log all settings
HEAD is now at ccaf459c Missing from previous commit: test update


(from ocaml/opam:debian-12-ocaml-4.08@sha256:a7c06d659921ac2c9eb6cf997eb3a48300686cce5d1aeb393c0eb201644f0112)
Unable to find image 'ocaml/opam:debian-12-ocaml-4.08@sha256:a7c06d659921ac2c9eb6cf997eb3a48300686cce5d1aeb393c0eb201644f0112' locally
docker.io/ocaml/opam@sha256:a7c06d659921ac2c9eb6cf997eb3a48300686cce5d1aeb393c0eb201644f0112: Pulling from ocaml/opam
6eeca244d5b0: Pulling fs layer
6eeca244d5b0: Verifying Checksum
6eeca244d5b0: Download complete
6eeca244d5b0: Pull complete
Digest: sha256:a7c06d659921ac2c9eb6cf997eb3a48300686cce5d1aeb393c0eb201644f0112
Status: Downloaded newer image for ocaml/opam@sha256:a7c06d659921ac2c9eb6cf997eb3a48300686cce5d1aeb393c0eb201644f0112
2025-03-20 21:16.46 ---> saved as "212a1b8e3ddbfd9f9183e74007cf11c0bf064a0a89cec366fca17516e11ae032"


/: (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 cb8df6db0195538a02cc2b2eb20e468f22c475a7 || git fetch origin master) && git reset -q --hard cb8df6db0195538a02cc2b2eb20e468f22c475a7 && git log --no-decorate -n1 --oneline && opam update -u"))
From https://github.com/ocaml/opam-repository
* branch                  master     -> FETCH_HEAD
a8ed476033..6cf83229dd  master     -> origin/master
cb8df6db01 Merge pull request #27631 from dbuenzli/incompatible-cmdliner2


<><> Updating package repositories ><><><><><><><><><><><><><><><><><><><><><><>
[opam-repository-archive] synchronised from git+https://github.com/ocaml/opam-repository-archive
[default] synchronised from file:///home/opam/opam-repository
default (at 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-03-20 21:17.42 ---> saved as "ec6e29036ddcadc06b009bbe66fde669f454df6f1dedff137b04204fabed1ccb"


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


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


<><> Processing actions <><><><><><><><><><><><><><><><><><><><><><><><><><><><>
-> installed dune.3.17.2
Done.
# Run eval $(opam env) to update the current shell environment
2025-03-20 21:18.24 ---> saved as "35e5ad98a700b9958ac679b199bff7e68f223d3229ae579e2b6c1aaa977740e4"


/: (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 ocaml-version     3.7.3    [required by ocamlformat-lib]
- install sexplib0          v0.14.0  [required by base]
- install dune-build-info   3.17.2   [required by ocamlformat-lib]
- install menhirLib         20240715 [required by ocamlformat-lib]
- install menhirCST         20240715 [required by menhir]
- install ocamlfind         1.9.8    [required by ocp-indent, astring, fpath, uuseg]
- install menhirSdk         20240715 [required by ocamlformat-lib]
- install either            1.0.0    [required by ocamlformat-lib]
- install cmdliner          1.3.0    [required by ocamlformat]
- install seq               base     [required by re]
- install camlp-streams     5.0.1    [required by ocamlformat-lib]
- install csexp             1.5.2    [required by ocamlformat]
- install ocamlbuild        0.16.1   [required by fpath, astring, uuseg]
- install fix               20230505 [required by ocamlformat-lib]
- install base-bytes        base     [required by ocp-indent]
- install menhir            20240715 [required by ocamlformat-lib]
- install re                1.11.0   [required by ocamlformat]
- install dune-configurator 3.17.2   [required by base]
- install topkg             1.0.8    [required by fpath, astring, uuseg]
- install ocp-indent        1.8.1    [required by ocamlformat-lib]
- 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 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.17.2] found in cache
[dune-configurator.3.17.2] 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.3.7.3] 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.3.7.3
-> installed re.1.11.0
-> installed sexplib0.v0.14.0
-> installed dune-build-info.3.17.2
-> installed dune-configurator.3.17.2
-> 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 stdio.v0.14.0
-> installed topkg.1.0.8
-> 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-03-20 21:19.42 ---> saved as "4672e4377366a2d114fbc797e4a13df62976530243b73d7d66dfeeb003832a55"


/src: (copy (src .) (dst /src/))
2025-03-20 21:19.42 ---> saved as "95e13bdf449884d1610dc43d66654b0fa8bb12217e8310539a7b867460eb72ed"


/src: (run (shell "opam exec -- dune build @fmt --ignore-promoted-rules || (echo \"dune build @fmt failed\"; exit 2)"))
File "lib/dune", line 1, characters 0-0:
diff --git a/_build/default/lib/dune b/_build/default/lib/.formatted/dune
index b49989d..15addba 100644
--- a/_build/default/lib/dune
+++ b/_build/default/lib/.formatted/dune
@@ -14,7 +14,8 @@
; mem_usage
ppx_minidebug.runtime
arrayjit)
-  (preprocessor_deps (env_var OCANNL_LOG_LEVEL))
+ (preprocessor_deps
+  (env_var OCANNL_LOG_LEVEL))
(preprocess
(pps
ppx_compare
Warning: Invalid documentation comment:
File "lib/shape.mli", line 86, characters 107-108:
Unpaired '}' (end of markup).
Suggestion: try '\}'.
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 c9465b9..eba4c2e 100644
--- a/_build/default/lib/tensor.mli
+++ b/_build/default/lib/.formatted/tensor.mli
@@ -157,6 +157,7 @@ val ternop :
t ->
t ->
t
+
val term :
label:string list ->
grad_spec:grad_spec ->
File "test/primitive_ops.ml", line 1, characters 0-0:
diff --git a/_build/default/test/primitive_ops.ml b/_build/default/test/.formatted/primitive_ops.ml
index 4b402ed..8c71124 100644
--- a/_build/default/test/primitive_ops.ml
+++ b/_build/default/test/.formatted/primitive_ops.ml
@@ -153,11 +153,13 @@ let%expect_test "sat01" =
│     │                                                 x                                                  │
└─────┴────────────────────────────────────────────────────────────────────────────────────────────────────┘
|}]
+
let%expect_test "exp(x)" =
let%op f x = exp x in
let plot_box = plot_unop ~f in
PrintBox_text.output Stdio.stdout plot_box;
-  [%expect {|
+  [%expect
+    {|
┌────────┬────────────────────────────────────────────────────────────────────────────────────────────────────┐
│ 1.34e+2│                                                                                                   *│
│        │                                                                                                    │
@@ -206,10 +208,11 @@ let%expect_test "exp(x)" =
|}]


let%expect_test "log(x)" =
-  let%op f x = log x in
+  let%op f x = log x in
let plot_box = plot_unop ~f in
PrintBox_text.output Stdio.stdout plot_box;
-  [%expect {|
+  [%expect
+    {|
┌─────┬────────────────────────────────────────────────────────────────────────────────────────────────────┐
│ 1.58│                                                                                                    │
│     │                                                                                                    │
@@ -261,7 +264,8 @@ let%expect_test "log2(x)" =
let%op f x = log2 x in
let plot_box = plot_unop ~f in
PrintBox_text.output Stdio.stdout plot_box;
-  [%expect {|
+  [%expect
+    {|
┌─────┬────────────────────────────────────────────────────────────────────────────────────────────────────┐
│ 2.29│                                                                                                    │
│     │                                                                                                    │
@@ -313,7 +317,8 @@ let%expect_test "sin(x)" =
let%op f x = sin x in
let plot_box = plot_unop ~f in
PrintBox_text.output Stdio.stdout plot_box;
-  [%expect {|
+  [%expect
+    {|
┌─────────┬────────────────────────────────────────────────────────────────────────────────────────────────────┐
│ 1.00    │                                                  *                                                 │
│         │# # ##                                         **** *         # ####                                │
@@ -365,7 +370,8 @@ let%expect_test "cos(x)" =
let%op f x = cos x in
let plot_box = plot_unop ~f in
PrintBox_text.output Stdio.stdout plot_box;
-  [%expect {|
+  [%expect
+    {|
┌─────────┬────────────────────────────────────────────────────────────────────────────────────────────────────┐
│ 1.00    │                                                  #                                                 │
│         │                                ** ***         #### #                                         *** **│
@@ -417,7 +423,8 @@ let%expect_test "neg(x)" =
let%op f x = neg x in
let plot_box = plot_unop ~f in
PrintBox_text.output Stdio.stdout plot_box;
-  [%expect {|
+  [%expect
+    {|
┌──────┬────────────────────────────────────────────────────────────────────────────────────────────────────┐
│ 5.00 │#                                                                                                   │
│      │# #                                                                                                 │
@@ -469,7 +476,8 @@ let%expect_test "fma(x, 2, 1)" =
let%op f x = fma x !.2. !.1. in
let plot_box = plot_unop ~f in
PrintBox_text.output Stdio.stdout plot_box;
-  [%expect {|
+  [%expect
+    {|
┌────────┬────────────────────────────────────────────────────────────────────────────────────────────────────┐
│ 1.08e+1│                                                                                                   #│
│        │                                                                                                # # │
Warning: Invalid documentation comment:
File "arrayjit/lib/ops.ml", line 117, characters 9-81:
'{{https://github.com/tinygrad/tinygrad/blob/master/tinygrad/ops.py#L123}': bad markup.
Suggestion: did you mean '{!{https://github.com/tinygrad/tinygrad/blob/master/tinygrad/ops.py#L123}' or '[{https://github.com/tinygrad/tinygrad/blob/master/tinygrad/ops.py#L123]'?
Warning: Invalid documentation comment:
File "arrayjit/lib/ops.ml", line 117, characters 94-95:
Unpaired '}' (end of markup).
Suggestion: try '\}'.
Warning: Invalid documentation comment:
File "arrayjit/lib/ops.ml", line 118, characters 4-60:
'{{https://docs.nvidia.com/cuda/cuda-math-api/index.html}': bad markup.
Suggestion: did you mean '{!{https://docs.nvidia.com/cuda/cuda-math-api/index.html}' or '[{https://docs.nvidia.com/cuda/cuda-math-api/index.html]'?
Warning: Invalid documentation comment:
File "arrayjit/lib/ops.ml", line 118, characters 74-75:
Unpaired '}' (end of markup).
Suggestion: try '\}'.
File "arrayjit/lib/ops.ml", line 1, characters 0-0:
diff --git a/_build/default/arrayjit/lib/ops.ml b/_build/default/arrayjit/lib/.formatted/ops.ml
index 95aaf61..eb6a67d 100644
--- a/_build/default/arrayjit/lib/ops.ml
+++ b/_build/default/arrayjit/lib/.formatted/ops.ml
@@ -379,11 +379,7 @@ let unop_c_syntax prec op =
| Double_prec _ | Byte_prec _ -> "fmax"
| _ -> "fmaxf"
in
-  let fmin () =
-    match prec with
-    | Double_prec _ | Byte_prec _ -> "fmin"
-    | _ -> "fminf"
-  in
+  let fmin () = match prec with Double_prec _ | Byte_prec _ -> "fmin" | _ -> "fminf" in
match (op, prec) with
| Identity, _ -> ("", "")
| Relu, Byte_prec _ -> ("fmax(0, ", ")")
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 4de694a..0a7a844 100644
--- a/_build/default/lib/shape.ml
+++ b/_build/default/lib/.formatted/shape.ml
@@ -894,7 +894,7 @@ let axis_keys_to_idcs (sh : t) : int axis_map =
Array.rev_inplace idcs;
Map.of_alist_exn (module AxisKey) @@ Array.to_list @@ Array.mapi idcs ~f:(fun i key -> (key, i))


-let%debug5_sexp default_display_indices (sh: t): int array =
+let%debug5_sexp default_display_indices (sh : t) : int array =
let axes = axis_keys_to_idcs sh |> Map.map ~f:(fun _ -> 0) in
let occupied = Array.create ~len:5 false in
let set_occu prio =
File "arrayjit/lib/ndarray.ml", line 1, characters 0-0:
diff --git a/_build/default/arrayjit/lib/ndarray.ml b/_build/default/arrayjit/lib/.formatted/ndarray.ml
index f56c4b1..280eeae 100644
--- a/_build/default/arrayjit/lib/ndarray.ml
+++ b/_build/default/arrayjit/lib/.formatted/ndarray.ml
@@ -447,8 +447,8 @@ let log_debug_info ~from_log_level:_level _nd =


let concise_float ~prec v =
(* The C99 standard requires at least two digits for the exponent, but the leading zero is a waste
-     of space. Also handles e+0. String-based approach to avoid rounding issues I
-     noticed on Windows. *)
+     of space. Also handles e+0. String-based approach to avoid rounding issues I noticed on
+     Windows. *)
let s = Printf.sprintf "%.*e" (prec + 3) v in
let s = Str.global_replace (Str.regexp "[0-9][0-9][0-9]e") "e" s in
let s = Str.global_replace (Str.regexp "e[+-]0+$") "" s in
File "arrayjit/lib/gcc_backend.gccjit.ml", line 1, characters 0-0:
diff --git a/_build/default/arrayjit/lib/gcc_backend.gccjit.ml b/_build/default/arrayjit/lib/.formatted/gcc_backend.gccjit.ml
index 813a192..7dde527 100644
--- a/_build/default/arrayjit/lib/gcc_backend.gccjit.ml
+++ b/_build/default/arrayjit/lib/.formatted/gcc_backend.gccjit.ml
@@ -540,7 +540,7 @@ let compile_main ~name ~log_functions ~env { ctx; nodes; get_ident; merge_node;
&& not (String.is_prefix ~prefix:"(" prefix));
let f = Function.builtin ctx (String.drop_suffix prefix 1) in
RValue.call ctx f [ loop c ]
-    | Ternop (FMA as op, c1, c2, c3) ->
+    | Ternop ((FMA as op), c1, c2, c3) ->
let prefix, _, _, _ = Ops.ternop_c_syntax prec op in
let f = Function.builtin ctx (String.drop_suffix prefix 1) in
RValue.call ctx f [ loop c1; loop c2; loop c3 ]
@@ -568,8 +568,9 @@ let compile_main ~name ~log_functions ~env { ctx; nodes; get_ident; merge_node;
RValue.unary_op ctx Negate num_typ v
| Unop (Not, c) ->
let v = loop c in
-        cast_bool num_typ @@ RValue.unary_op ctx Logical_negate (Type.get ctx Type.Bool)
-          (RValue.comparison ctx Eq v (RValue.zero ctx num_typ))
+        cast_bool num_typ
+        @@ RValue.unary_op ctx Logical_negate (Type.get ctx Type.Bool)
+             (RValue.comparison ctx Eq v (RValue.zero ctx num_typ))
and loop_for_loop ~toplevel ~env key ~from_ ~to_ body =
let open Gccjit in
let i = Indexing.symbol_ident key 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-03-20 21:19.44: Job failed: Failed: Build failed