(lint-fmt)

2026-03-28 07:25.54: New job: test dinosaure/prettym https://github.com/dinosaure/prettym.git#refs/pull/8/head (e984a0afcf87b6cdc095830e1e73bc7d9a62f79b) (linux-x86_64:(lint-fmt))
Base: ocaml/opam:debian-13-ocaml-4.08@sha256:048f41796adc21a1c591ba8a7027365f75adbd0cc47a89cb4ad5d856f4815f47
ocamlformat version: version 0.28.1 (from opam)


To reproduce locally:


git clone --recursive "https://github.com/dinosaure/prettym.git" && cd "prettym" && git fetch origin "refs/pull/8/head" && git reset --hard e984a0af
cat > Dockerfile <<'END-OF-DOCKERFILE'
FROM ocaml/opam:debian-13-ocaml-4.08@sha256:048f41796adc21a1c591ba8a7027365f75adbd0cc47a89cb4ad5d856f4815f47
USER 1000:1000
RUN cd ~/opam-repository && (git cat-file -e 3f91b1a4e14ca8dfac77aab17a7ed4a7857644e1 || git fetch origin master) && git reset -q --hard 3f91b1a4e14ca8dfac77aab17a7ed4a7857644e1 && git log --no-decorate -n1 --oneline && opam update -u
RUN opam depext -i dune
WORKDIR /src
RUN opam depext -i ocamlformat=0.28.1
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


2026-03-28 07:25.54: Using cache hint "dinosaure/prettym-ocaml/opam:debian-13-ocaml-4.08@sha256:048f41796adc21a1c591ba8a7027365f75adbd0cc47a89cb4ad5d856f4815f47-debian-13-4.08_opam-2.5-ocamlformat-3f91b1a4e14ca8dfac77aab17a7ed4a7857644e1"
2026-03-28 07:25.54: Using OBuilder spec:
((from ocaml/opam:debian-13-ocaml-4.08@sha256:048f41796adc21a1c591ba8a7027365f75adbd0cc47a89cb4ad5d856f4815f47)
(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 3f91b1a4e14ca8dfac77aab17a7ed4a7857644e1 || git fetch origin master) && git reset -q --hard 3f91b1a4e14ca8dfac77aab17a7ed4a7857644e1 && 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.28.1"))
(copy (src .) (dst /src/))
(run (shell "opam exec -- dune build @fmt --ignore-promoted-rules || (echo \"dune build @fmt failed\"; exit 2)"))
)


2026-03-28 07:25.54: Waiting for resource in pool OCluster
2026-03-28 07:33.39: Waiting for worker…
2026-03-28 07:36.43: Got resource from pool OCluster
Building on asteria.caelum.ci.dev
hint: Using 'master' as the name for the initial branch. This default branch name
hint: is subject to change. To configure the initial branch name to use in all
hint: of your new repositories, which will suppress this warning, call:
hint:
hint: 	git config --global init.defaultBranch <name>
hint:
hint: Names commonly chosen instead of 'master' are 'main', 'trunk' and
hint: 'development'. The just-created branch can be renamed via this command:
hint:
hint: 	git branch -m <name>
Initialized empty Git repository in /var/cache/obuilder/ocluster/git/prettym.git-dc8d49cb93aad76576bb20d67607f0b245367688/.git/
HEAD is now at e984a0a Add the ability to encode values without margin


(from ocaml/opam:debian-13-ocaml-4.08@sha256:048f41796adc21a1c591ba8a7027365f75adbd0cc47a89cb4ad5d856f4815f47)
2026-03-28 07:36.45 ---> using "867303d7f04cee0d3e23016229d2a45a69516628a14dbff52754cd3cb283f66f" 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 3f91b1a4e14ca8dfac77aab17a7ed4a7857644e1 || git fetch origin master) && git reset -q --hard 3f91b1a4e14ca8dfac77aab17a7ed4a7857644e1 && git log --no-decorate -n1 --oneline && opam update -u"))
From https://github.com/ocaml/opam-repository
* branch                  master     -> FETCH_HEAD
ffb54b9bdd..65664dc5b2  master     -> origin/master
3f91b1a4e1 Merge pull request #29568 from Julow/ocamlformat-constraints-dune322


<><> 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)


The following actions will be performed:
- recompile ocaml-base-compiler 4.08.1* [upstream changes]
- recompile ocaml-config        1       [uses ocaml-base-compiler]
- recompile ocaml               4.08.1  [uses ocaml-base-compiler]
- recompile opam-depext         1.2.3   [uses ocaml]
===== 4 to recompile =====


<><> Gathering sources ><><><><><><><><><><><><><><><><><><><><><><><><><><><><>
[ocaml-base-compiler.4.08.1] found in cache
[opam-depext.1.2.3] found in cache


<><> Processing actions <><><><><><><><><><><><><><><><><><><><><><><><><><><><>
-> removed   opam-depext.1.2.3
-> removed   ocaml.4.08.1
-> removed   ocaml-config.1
-> removed   ocaml-base-compiler.4.08.1
-> installed ocaml-base-compiler.4.08.1
-> installed ocaml-config.1
-> installed ocaml.4.08.1
-> installed opam-depext.1.2.3
Done.
# Run eval $(opam env) to update the current shell environment
2026-03-28 07:36.45 ---> using "32d1b69e67f451f9098a103e97d6cfda36f7531338cb72c13390c3cd07390654" 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.22.0


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


<><> Processing actions <><><><><><><><><><><><><><><><><><><><><><><><><><><><>
-> installed dune.3.22.0
Done.
# Run eval $(opam env) to update the current shell environment
2026-03-28 07:36.45 ---> using "08096ea5f63aa8c8fb03277641e4c72ebc81499f7a7a3889ebe570a785b47aa0" from cache


/: (workdir /src)


/src: (run (cache (opam-archives (target /home/opam/.opam/download-cache)))
(network host)
(shell "opam depext -i ocamlformat=0.28.1"))
# 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 ocamlbuild        0.16.1   [required by fpath, astring, uuseg]
- install either            1.0.0    [required by ocamlformat-lib]
- install menhirLib         20260209 [required by ocamlformat-lib]
- install cmdliner          2.1.0    [required by ocamlformat]
- install ocaml-version     4.0.4    [required by ocamlformat-lib]
- install csexp             1.5.2    [required by ocamlformat]
- install menhirSdk         20260209 [required by ocamlformat-lib]
- install menhirGLR         20260209 [required by menhir]
- install camlp-streams     5.0.1    [required by ocamlformat-lib]
- install seq               base     [required by re]
- install fix               20250919 [required by ocamlformat-lib]
- install ocamlfind         1.9.8    [required by ocp-indent, astring, fpath, uuseg]
- install menhirCST         20260209 [required by menhir]
- install dune-build-info   3.22.0   [required by ocamlformat-lib]
- install dune-configurator 3.22.0   [required by base]
- install re                1.11.0   [required by ocamlformat]
- install topkg             1.1.1    [required by fpath, astring, uuseg]
- install ocp-indent        1.9.0    [required by ocamlformat-lib]
- install menhir            20260209 [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.28.1   [required by ocamlformat]
- install ocamlformat       0.28.1
===== 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.2.1.0] found in cache
[csexp.1.5.2] found in cache
[dune-build-info.3.22.0] found in cache
[dune-configurator.3.22.0] found in cache
[either.1.0.0] found in cache
[fix.20250919] found in cache
[fpath.0.7.3] found in cache
[menhir.20260209] found in cache
[menhirCST.20260209] found in cache
[menhirGLR.20260209] found in cache
[menhirLib.20260209] found in cache
[menhirSdk.20260209] found in cache
[ocaml-version.4.0.4] found in cache
[ocamlbuild.0.16.1] found in cache
[ocamlfind.1.9.8] found in cache
[ocamlformat.0.28.1] found in cache
[ocamlformat-lib.0.28.1] found in cache
[ocp-indent.1.9.0] 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.1.1] 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.2.1.0
-> installed dune-build-info.3.22.0
-> installed either.1.0.0
-> installed fix.20250919
-> installed menhirCST.20260209
-> installed menhirGLR.20260209
-> installed menhirLib.20260209
-> installed menhirSdk.20260209
-> installed ocaml-version.4.0.4
-> installed re.1.11.0
-> installed sexplib0.v0.14.0
-> installed dune-configurator.3.22.0
-> installed ocamlbuild.0.16.1
-> installed ocamlfind.1.9.8
-> installed ocp-indent.1.9.0
-> installed base.v0.14.3
-> installed menhir.20260209
-> installed topkg.1.1.1
-> installed stdio.v0.14.0
-> installed uutf.1.0.4
-> installed astring.0.8.5
-> installed fpath.0.7.3
-> installed uucp.15.0.0
-> installed uuseg.15.0.0
-> installed ocamlformat-lib.0.28.1
-> installed ocamlformat.0.28.1
Done.


<><> ocp-indent.1.9.0 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
2026-03-28 07:36.45 ---> using "000cd7b6efe09f2a4b8348720f5b9ec53152237a5149e531611a64528b6a0c00" from cache


/src: (copy (src .) (dst /src/))
2026-03-28 07:36.45 ---> saved as "c429624ae654acb892817756176993ce3f595f170cc932bf80ed8466e6d804c5"


/src: (run (shell "opam exec -- dune build @fmt --ignore-promoted-rules || (echo \"dune build @fmt failed\"; exit 2)"))
File "lib/pretty.mli", line 1, characters 0-0:
diff --git a/_build/default/lib/pretty.mli b/_build/default/lib/.formatted/pretty.mli
index a213855..0b9cbb0 100644
--- a/_build/default/lib/pretty.mli
+++ b/_build/default/lib/.formatted/pretty.mli
@@ -22,4 +22,8 @@ val flush : t -> t
val is_empty : t -> bool


val create :
-  ?margin:int option -> ?new_line:string -> emitter:Enclosure.emitter -> int -> t
+  ?margin:int option ->
+  ?new_line:string ->
+  emitter:Enclosure.emitter ->
+  int ->
+  t
File "lib/prettym.mli", line 1, characters 0-0:
diff --git a/_build/default/lib/prettym.mli b/_build/default/lib/.formatted/prettym.mli
index c47e960..9e65b47 100644
--- a/_build/default/lib/prettym.mli
+++ b/_build/default/lib/.formatted/prettym.mli
@@ -130,7 +130,11 @@ end
val io_buffer_size : int


val create :
-  ?margin:int option -> ?new_line:string -> emitter:(IOVec.t list -> int) -> int -> ppf
+  ?margin:int option ->
+  ?new_line:string ->
+  emitter:(IOVec.t list -> int) ->
+  int ->
+  ppf
(** [create ?margin ?new_line ~emitter weight] creates a serializer bounded to
[weight] elements. The serializer is limiter to emit [margin] bytes per
lines and break the line with [new_line] (default to ["\r\n"]).
File "test/test.ml", line 1, characters 0-0:
diff --git a/_build/default/test/test.ml b/_build/default/test/.formatted/test.ml
index c35dec6..4e3a9c2 100644
--- a/_build/default/test/test.ml
+++ b/_build/default/test/.formatted/test.ml
@@ -164,7 +164,9 @@ let make v =
List.fold_left write 0
in


-  let encoder = Prettym.create ~emitter ~margin:(Some 78) ~new_line:"\n" 0x100 in
+  let encoder =
+    Prettym.create ~emitter ~margin:(Some 78) ~new_line:"\n" 0x100
+  in


let kend encoder =
if Prettym.is_empty encoder then ()
@@ -187,7 +189,9 @@ let unroll_box () =
]
k x y
in
-  let result = Prettym.to_string ~margin:(Some 14) g ("AAAAAA", "BBBBBB", "CCCCCC") in
+  let result =
+    Prettym.to_string ~margin:(Some 14) g ("AAAAAA", "BBBBBB", "CCCCCC")
+  in
Alcotest.(check string) "result" result "AAAAAA:\r\n BBBBBB&CCCCCC\r\n"
(* XXX(dinosaure): instead to cut at [&], it unroll the [tbox] and print elements to the new line. *)


File "lib/pretty.ml", line 1, characters 0-0:
diff --git a/_build/default/lib/pretty.ml b/_build/default/lib/.formatted/pretty.ml
index 0291e69..0afdf2c 100644
--- a/_build/default/lib/pretty.ml
+++ b/_build/default/lib/.formatted/pretty.ml
@@ -155,14 +155,14 @@ let pp_token ppf = function
let pp ppf t =
Format.fprintf ppf
"{ @[<hov>boxes= @[<hov>%a@];@ breaks= @[<hov>%a@];@ inner= @[<hov>%a@];@ \
-     indent= %d;@ new_line= %S;@ queue= @[<hov>%a@];@ encoder= \
-     @[<hov>%a@];@] }"
+     indent= %d;@ new_line= %S;@ queue= @[<hov>%a@];@ encoder= @[<hov>%a@];@] \
+     }"
(Stack.pp pp_box) t.boxes
(Stack.pp (pp_list pp_break))
t.breaks
(Stack.pp (pp_list Format.pp_print_int))
-    t.inner t.indent t.new_line (Queue.pp pp_token) t.queue
-    Enclosure.pp t.encoder
+    t.inner t.indent t.new_line (Queue.pp pp_token) t.queue Enclosure.pp
+    t.encoder


let ( <.> ) f g x = f (g x)
let flip f a b = f b a
@@ -249,16 +249,19 @@ let unroll_last_box_and_emit k value t =
emit_line (merge_indents k) { t with queue = q }


let rec kpush_breakable_value ~current_length_of_line k value t =
-  let exceeding0 = match t.margin with
+  let exceeding0 =
+    match t.margin with
| None -> false
-    | Some margin -> current_length_of_line >= margin in
-  let exceeding1 = match t.margin with
+    | Some margin -> current_length_of_line >= margin
+  in
+  let exceeding1 =
+    match t.margin with
| None -> false
-    | Some margin -> current_length_of_line + length_of_token (TValue value) > margin in
-  if exceeding0 then
-    emit_line (merge_indents (kpush k (Breakable value))) t
-  else if exceeding1
-  then
+    | Some margin ->
+        current_length_of_line + length_of_token (TValue value) > margin
+  in
+  if exceeding0 then emit_line (merge_indents (kpush k (Breakable value))) t
+  else if exceeding1 then
if is_in_box t && not (Queue.is_empty (without_last_box t.queue)) then
unroll_last_box_and_emit k value t
else
@@ -279,13 +282,13 @@ let rec kpush_breakable_value ~current_length_of_line k value t =
}


and kpush_unbreakable_value ~current_length_of_line k value t =
-  let exceeding = match t.margin with
+  let exceeding =
+    match t.margin with
| None -> false
-    | Some margin -> current_length_of_line + length_of_token (TValue value) > margin in
-  if
-    exceeding
-    && not (Queue.is_empty t.queue)
-  then
+    | Some margin ->
+        current_length_of_line + length_of_token (TValue value) > margin
+  in
+  if exceeding && not (Queue.is_empty t.queue) then
if is_in_box t && not (Queue.is_empty (without_last_box t.queue)) then
unroll_last_box_and_emit k value t
else
@@ -365,11 +368,13 @@ and kpush k value t =
Queue.tail t.queue >>= merge_breaks break
with
| Some (queue, len) ->
-          let exceeding = match t.margin with
+          let exceeding =
+            match t.margin with
| None -> false
-            | Some margin -> current_length_of_line + length_of_token (TBreak len) >= margin in
-          if exceeding
-          then
+            | Some margin ->
+                current_length_of_line + length_of_token (TBreak len) >= margin
+          in
+          if exceeding then
emit_line (merge_indents k)
{ t with queue; breaks = append t.breaks (`Indent indent) }
else
@@ -381,11 +386,13 @@ and kpush k value t =
breaks = append t.breaks (`Indent indent);
}
| None ->
-          let exceeding = match t.margin with
+          let exceeding =
+            match t.margin with
| None -> false
-            | Some margin -> current_length_of_line + length_of_token (TBreak len) > margin in
-          if exceeding
-          then
+            | Some margin ->
+                current_length_of_line + length_of_token (TBreak len) > margin
+          in
+          if exceeding then
emit_line (merge_indents k)
{ t with breaks = append t.breaks (`Indent indent) }
else
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
2026-03-28 07:36.46: Job failed: Failed: Build failed