Build:
- 0
2026-09-04 18:15.02: New job: build vhd-format.0.12.3 (f3cfd5456216) 2026-09-04 18:15.02: Waiting for resource in pool day11-builds 2026-09-04 18:34.38: Got resource from pool day11-builds 2026-09-04 18:34.38: [profile full] build vhd-format.0.12.3 2026-09-04 18:34.38: build vhd-format.0.12.3 (f3cfd5456216) === DEPENDENCIES (25 transitive) === base-threads.base 3d2f2cbc6db2 base-unix.base 3a38ddca6b5e bigarray-compat.1.1.0 d56b8910e911 compiler-cloning.enabled 966a2e6839f0 conf-pkg-config.5 74f50f3cfe72 cstruct.6.0.1 533594e9b7a1 dune.3.24.2 25fbaa318de6 io-page.3.0.0 91265829f77d num.1.6 244eeeb7f1b4 ocaml.5.5.1 70ca0c66e0e8 ocaml-base-compiler.5.5.1 59841d7ed85e ocaml-compiler.5.5.1 492c0c740bd1 ocaml-compiler-libs.v0.17.0 235024900ef6 ocamlbuild.0.16.1 e25cf731aeb5 ocamlfind.1.9.9~preview 5e0261154b58 parsexp.v0.17.0 79bf454965d2 ppx_cstruct.6.0.1 494075988c9a ppx_derivers.1.2.1 8d5f777c17ee ppxlib.0.38.0 ac854f4fbd20 rresult.0.7.0 bd921cc3de54 sexplib.v0.17.0 bfd4eff0be44 sexplib0.v0.17.0 055934f8e366 stdlib-shims.0.3.0 cc542b70be6c topkg.1.1.1 2919b4412ec4 uuidm.0.9.10 1c1ce7b82050 === STDOUT === Processing: [default: loading data] [vhd-format.0.12.3: dl] [vhd-format.0.12.3: extract] -> retrieved vhd-format.0.12.3 (https://opam.ocaml.org/cache) [vhd-format: dune build] + /home/opam/.opam/default/bin/dune "build" "-p" "vhd-format" "-j" "39" (CWD=/home/opam/.opam/default/.opam-switch/build/vhd-format.0.12.3) - (cd _build/default && /home/opam/.opam/default/bin/ocamlc.opt -w -40 -w -32-34-37 -g -bin-annot -bin-annot-occurrences -I vhd_format/.vhd_format.objs/byte -I /home/opam/.opam/default/lib/bigarray-compat -I /home/opam/.opam/default/lib/cstruct -I /home/opam/.opam/default/lib/io-page -I /home/opam/.opam/default/lib/rresult -I /home/opam/.opam/default/lib/stdlib-shims -I /home/opam/.opam/default/lib/uuidm -no-alias-deps -open Vhd_format -o vhd_format/.vhd_format.objs/byte/vhd_format__S.cmo -c -impl vhd_format/s.pp.ml) - File "vhd_format/s.ml", line 1: - Alert ocaml_deprecated_auto_include: - OCaml's lib directory layout changed in 5.0. The unix subdirectory has been - automatically added to the search path, but you should add -I +unix to the - command-line to silence this alert (e.g. by adding unix to the list of - libraries in your dune file, or adding use_unix to your _tags file for - ocamlbuild, or using -package unix for ocamlfind). - (cd _build/default && /home/opam/.opam/default/bin/ocamlc.opt -w -40 -w -32-34-37 -g -bin-annot -bin-annot-occurrences -I vhd_format/.vhd_format.objs/byte -I /home/opam/.opam/default/lib/bigarray-compat -I /home/opam/.opam/default/lib/cstruct -I /home/opam/.opam/default/lib/io-page -I /home/opam/.opam/default/lib/rresult -I /home/opam/.opam/default/lib/stdlib-shims -I /home/opam/.opam/default/lib/uuidm -cmi-file vhd_format/.vhd_format.objs/byte/vhd_format__Element.cmi -no-alias-deps -open Vhd_format -o vhd_format/.vhd_format.objs/byte/vhd_format__Element.cmo -c -impl vhd_format/element.pp.ml) - File "vhd_format/element.ml", line 30, characters 7-18: - 30 | if Cstruct.len x = sector_size - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/element.ml", line 32, characters 48-59: - 32 | else Printf.sprintf "%d sectors \"%s...\"" (Cstruct.len x / sector_size) text - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/element.ml", line 40, characters 32-43: - 40 | | `Sectors x -> Int64.of_int (Cstruct.len x / sector_size) - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - (cd _build/default && /home/opam/.opam/default/bin/ocamlopt.opt -w -40 -w -32-34-37 -g -I vhd_format/.vhd_format.objs/byte -I vhd_format/.vhd_format.objs/native -I /home/opam/.opam/default/lib/bigarray-compat -I /home/opam/.opam/default/lib/cstruct -I /home/opam/.opam/default/lib/io-page -I /home/opam/.opam/default/lib/rresult -I /home/opam/.opam/default/lib/stdlib-shims -I /home/opam/.opam/default/lib/uuidm -cmi-file vhd_format/.vhd_format.objs/byte/vhd_format__Element.cmi -no-alias-deps -open Vhd_format -o vhd_format/.vhd_format.objs/native/vhd_format__Element.cmx -c -impl vhd_format/element.pp.ml) - File "vhd_format/element.ml", line 30, characters 7-18: - 30 | if Cstruct.len x = sector_size - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/element.ml", line 32, characters 48-59: - 32 | else Printf.sprintf "%d sectors \"%s...\"" (Cstruct.len x / sector_size) text - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/element.ml", line 40, characters 32-43: - 40 | | `Sectors x -> Int64.of_int (Cstruct.len x / sector_size) - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - (cd _build/default && /home/opam/.opam/default/bin/ocamlopt.opt -w -40 -w -32-34-37 -g -I vhd_format/.vhd_format.objs/byte -I vhd_format/.vhd_format.objs/native -I /home/opam/.opam/default/lib/bigarray-compat -I /home/opam/.opam/default/lib/cstruct -I /home/opam/.opam/default/lib/io-page -I /home/opam/.opam/default/lib/rresult -I /home/opam/.opam/default/lib/stdlib-shims -I /home/opam/.opam/default/lib/uuidm -cmi-file vhd_format/.vhd_format.objs/byte/vhd_format__S.cmi -no-alias-deps -open Vhd_format -o vhd_format/.vhd_format.objs/native/vhd_format__S.cmx -c -impl vhd_format/s.pp.ml) - File "vhd_format/s.ml", line 1: - Alert ocaml_deprecated_auto_include: - OCaml's lib directory layout changed in 5.0. The unix subdirectory has been - automatically added to the search path, but you should add -I +unix to the - command-line to silence this alert (e.g. by adding unix to the list of - libraries in your dune file, or adding use_unix to your _tags file for - ocamlbuild, or using -package unix for ocamlfind). - (cd _build/default && /home/opam/.opam/default/bin/ocamlc.opt -w -40 -w -32-34-37 -g -bin-annot -bin-annot-occurrences -I vhd_format/.vhd_format.objs/byte -I /home/opam/.opam/default/lib/bigarray-compat -I /home/opam/.opam/default/lib/cstruct -I /home/opam/.opam/default/lib/io-page -I /home/opam/.opam/default/lib/rresult -I /home/opam/.opam/default/lib/stdlib-shims -I /home/opam/.opam/default/lib/uuidm -cmi-file vhd_format/.vhd_format.objs/byte/vhd_format__F.cmi -no-alias-deps -open Vhd_format -o vhd_format/.vhd_format.objs/byte/vhd_format__F.cmo -c -impl vhd_format/f.pp.ml) - File "vhd_format/f.ml", line 26, characters 19-30: - 26 | for i = 0 to Cstruct.len a - 1 do - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 33, characters 3-14: - 33 | (Cstruct.len a = (Cstruct.len b)) && (check_contents a b) - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 33, characters 20-31: - 33 | (Cstruct.len a = (Cstruct.len b)) && (check_contents a b) - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 83, characters 23-37: - 83 | let blank_uuid = match Uuidm.of_bytes (String.make 16 '\000') with - ^^^^^^^^^^^^^^ - Alert deprecated: Uuidm.of_bytes - Use Uuidm.of_binary_string instead - - File "vhd_format/f.ml", line 205, characters 11-22: - 205 | if n=Cstruct.len m then cur else - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 353, characters 12-19: - 353 | ?(uid = Uuidm.v `V4) ?(saved_state = false) () = - ^^^^^^^ - Alert deprecated: Uuidm.v - Use the version specific Uuidm.v* functions. - - File "vhd_format/f.ml", line 432, characters 20-34: - 432 | set_footer_uid (Uuidm.to_bytes t.uid) 0 buf; - ^^^^^^^^^^^^^^ - Alert deprecated: Uuidm.to_bytes - Use Uuidm.to_binary_string instead - - File "vhd_format/f.ml", line 467, characters 12-26: - 467 | ( match Uuidm.of_bytes bytes with - ^^^^^^^^^^^^^^ - Alert deprecated: Uuidm.of_bytes - Use Uuidm.of_binary_string instead - - File "vhd_format/f.ml", line 574, characters 11-22: - 574 | if Cstruct.len t.platform_data <= from - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 779, characters 33-47: - 779 | set_header_parent_unique_id (Uuidm.to_bytes t.parent_unique_id) 0 buf; - ^^^^^^^^^^^^^^ - Alert deprecated: Uuidm.to_bytes - Use Uuidm.to_binary_string instead - - File "vhd_format/f.ml", line 830, characters 13-27: - 830 | ( match (Uuidm.of_bytes bytes) with - ^^^^^^^^^^^^^^ - Alert deprecated: Uuidm.of_bytes - Use Uuidm.of_binary_string instead - - File "vhd_format/f.ml", line 912, characters 18-29: - 912 | for i = 0 to (Cstruct.len data) / 4 - 1 do - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 922, characters 83-94: - 922 | Printf.sprintf "(%d rounded to %d)[ %s ] with highest_value = %ld" (length t) (Cstruct.len t.data / 4) (String.concat "; " (List.map (fun (i, x) -> Printf.sprintf "(%d, %lx)" i x) (List.rev !used))) t.highest_value - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 936, characters 33-44: - 936 | Cstruct.blit t.data 0 buf 0 (Cstruct.len t.data) - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 993, characters 17-28: - 993 | for i = 0 to Cstruct.len buf - 1 do - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 1099, characters 14-25: - 1099 | if size = Cstruct.len sector_all_ones - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 1104, characters 14-25: - 1104 | if size = Cstruct.len sector_all_zeroes - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 1120, characters 7-18: - 1120 | if Cstruct.len t = 0 - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 1123, characters 17-28: - 1123 | for i=0 to Cstruct.len t - 1 do - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 1513, characters 42-53: - 1513 | let adjusted_len = offset ++ (of_int (Cstruct.len buffer)) -- sector_start in - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 1517, characters 44-55: - 1517 | let useful_bytes_to_write = Stdlib.min (Cstruct.len buffer) (to_int (write_this_time -- offset ++ sector_start)) in - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 1675, characters 15-22: - 1675 | ?(uuid = Uuidm.v `V4) - ^^^^^^^ - Alert deprecated: Uuidm.v - Use the version specific Uuidm.v* functions. - - File "vhd_format/f.ml", line 1726, characters 13-20: - 1726 | ?(uuid=Uuidm.v `V4) - ^^^^^^^ - Alert deprecated: Uuidm.v - Use the version specific Uuidm.v* functions. - - File "vhd_format/f.ml", line 1867, characters 53-64: - 1867 | write_physical t (Int64.(add offset (of_int (Cstruct.len b))), bs) - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 1872, characters 25-36: - 1872 | | b :: bs -> loop (Cstruct.len b / sector_size + acc) bs in - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 1887, characters 24-35: - 1887 | let available = Cstruct.len b / sector_size in - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - (cd _build/default && /home/opam/.opam/default/bin/ocamlopt.opt -w -40 -w -32-34-37 -g -I vhd_format/.vhd_format.objs/byte -I vhd_format/.vhd_format.objs/native -I /home/opam/.opam/default/lib/bigarray-compat -I /home/opam/.opam/default/lib/cstruct -I /home/opam/.opam/default/lib/io-page -I /home/opam/.opam/default/lib/rresult -I /home/opam/.opam/default/lib/stdlib-shims -I /home/opam/.opam/default/lib/uuidm -cmi-file vhd_format/.vhd_format.objs/byte/vhd_format__F.cmi -no-alias-deps -open Vhd_format -o vhd_format/.vhd_format.objs/native/vhd_format__F.cmx -c -impl vhd_format/f.pp.ml) - File "vhd_format/f.ml", line 26, characters 19-30: - 26 | for i = 0 to Cstruct.len a - 1 do - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 33, characters 3-14: - 33 | (Cstruct.len a = (Cstruct.len b)) && (check_contents a b) - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 33, characters 20-31: - 33 | (Cstruct.len a = (Cstruct.len b)) && (check_contents a b) - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 83, characters 23-37: - 83 | let blank_uuid = match Uuidm.of_bytes (String.make 16 '\000') with - ^^^^^^^^^^^^^^ - Alert deprecated: Uuidm.of_bytes - Use Uuidm.of_binary_string instead - - File "vhd_format/f.ml", line 205, characters 11-22: - 205 | if n=Cstruct.len m then cur else - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 353, characters 12-19: - 353 | ?(uid = Uuidm.v `V4) ?(saved_state = false) () = - ^^^^^^^ - Alert deprecated: Uuidm.v - Use the version specific Uuidm.v* functions. - - File "vhd_format/f.ml", line 432, characters 20-34: - 432 | set_footer_uid (Uuidm.to_bytes t.uid) 0 buf; - ^^^^^^^^^^^^^^ - Alert deprecated: Uuidm.to_bytes - Use Uuidm.to_binary_string instead - - File "vhd_format/f.ml", line 467, characters 12-26: - 467 | ( match Uuidm.of_bytes bytes with - ^^^^^^^^^^^^^^ - Alert deprecated: Uuidm.of_bytes - Use Uuidm.of_binary_string instead - - File "vhd_format/f.ml", line 574, characters 11-22: - 574 | if Cstruct.len t.platform_data <= from - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 779, characters 33-47: - 779 | set_header_parent_unique_id (Uuidm.to_bytes t.parent_unique_id) 0 buf; - ^^^^^^^^^^^^^^ - Alert deprecated: Uuidm.to_bytes - Use Uuidm.to_binary_string instead - - File "vhd_format/f.ml", line 830, characters 13-27: - 830 | ( match (Uuidm.of_bytes bytes) with - ^^^^^^^^^^^^^^ - Alert deprecated: Uuidm.of_bytes - Use Uuidm.of_binary_string instead - - File "vhd_format/f.ml", line 912, characters 18-29: - 912 | for i = 0 to (Cstruct.len data) / 4 - 1 do - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 922, characters 83-94: - 922 | Printf.sprintf "(%d rounded to %d)[ %s ] with highest_value = %ld" (length t) (Cstruct.len t.data / 4) (String.concat "; " (List.map (fun (i, x) -> Printf.sprintf "(%d, %lx)" i x) (List.rev !used))) t.highest_value - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 936, characters 33-44: - 936 | Cstruct.blit t.data 0 buf 0 (Cstruct.len t.data) - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 993, characters 17-28: - 993 | for i = 0 to Cstruct.len buf - 1 do - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 1099, characters 14-25: - 1099 | if size = Cstruct.len sector_all_ones - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 1104, characters 14-25: - 1104 | if size = Cstruct.len sector_all_zeroes - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 1120, characters 7-18: - 1120 | if Cstruct.len t = 0 - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 1123, characters 17-28: - 1123 | for i=0 to Cstruct.len t - 1 do - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 1513, characters 42-53: - 1513 | let adjusted_len = offset ++ (of_int (Cstruct.len buffer)) -- sector_start in - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 1517, characters 44-55: - 1517 | let useful_bytes_to_write = Stdlib.min (Cstruct.len buffer) (to_int (write_this_time -- offset ++ sector_start)) in - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 1675, characters 15-22: - 1675 | ?(uuid = Uuidm.v `V4) - ^^^^^^^ - Alert deprecated: Uuidm.v - Use the version specific Uuidm.v* functions. - - File "vhd_format/f.ml", line 1726, characters 13-20: - 1726 | ?(uuid=Uuidm.v `V4) - ^^^^^^^ - Alert deprecated: Uuidm.v - Use the version specific Uuidm.v* functions. - - File "vhd_format/f.ml", line 1867, characters 53-64: - 1867 | write_physical t (Int64.(add offset (of_int (Cstruct.len b))), bs) - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 1872, characters 25-36: - 1872 | | b :: bs -> loop (Cstruct.len b / sector_size + acc) bs in - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. - - File "vhd_format/f.ml", line 1887, characters 24-35: - 1887 | let available = Cstruct.len b / sector_size in - ^^^^^^^^^^^ - Alert deprecated: Cstruct.len - len is deprecated, you should use length instead. -> compiled vhd-format.0.12.3 -> installed vhd-format.0.12.3 === STDERR === 2026-09-04 18:34.52: OK: build vhd-format.0.12.3 (runc: 5.6s, disk: 26KB) 2026-09-04 18:34.52: Job succeeded