- github
- ocaml
- opam-repository
- 19c70f
- compilers,4.14,dune.3.22.0~alpha2,revdeps,dns.5.0.1
(not at the head of any monitored branch or PR)
2026-03-16 19:17.38: New job: test dns.5.0.1 with dune.3.22.0~alpha2, using opam dev
from https://github.com/ocaml/opam-repository.git#refs/pull/29547/head (19c70fd6a788b154ec5e9fe26bca1d12fb2519be)
on debian-13-ocaml-4.14/amd64
To reproduce locally:
cd $(mktemp -d)
git clone --recursive "https://github.com/ocaml/opam-repository.git" && cd "opam-repository" && git fetch origin "refs/pull/29547/head" && git reset --hard 19c70fd6
git fetch origin master
git merge --no-edit 4f056bfedf536e66065c3783e694e6aa0b38261a
cat > ../Dockerfile <<'END-OF-DOCKERFILE'
FROM ocaml/opam:debian-13-ocaml-4.14@sha256:37323dc71cac48a3e4688e16b45b95486f3cc440c55ab3f83114e8973362f41e
USER 1000:1000
WORKDIR /home/opam
RUN sudo ln -f /usr/bin/opam-dev /usr/bin/opam
RUN opam init --reinit -ni
RUN opam option solver=builtin-0install && opam config report
ENV OPAMDOWNLOADJOBS="1"
ENV OPAMERRLOGLEN="0"
ENV OPAMPRECISETRACKING="1"
ENV CI="true"
ENV OPAM_REPO_CI="true"
RUN rm -rf opam-repository/
COPY --chown=1000:1000 . opam-repository/
RUN opam repository set-url --strict default opam-repository/
RUN opam update --depexts || true
RUN opam pin add -k version -yn dune.3.22.0~alpha2 3.22.0~alpha2
RUN opam reinstall dune.3.22.0~alpha2; \
res=$?; \
test "$res" != 31 && exit "$res"; \
export OPAMCLI=2.0; \
build_dir=$(opam var prefix)/.opam-switch/build; \
failed=$(ls "$build_dir"); \
partial_fails=""; \
for pkg in $failed; do \
if opam show -f x-ci-accept-failures: "$pkg" | grep -qF "\"debian-13\""; then \
echo "A package failed and has been disabled for CI using the 'x-ci-accept-failures' field."; \
fi; \
test "$pkg" != 'dune.3.22.0~alpha2' && partial_fails="$partial_fails $pkg"; \
done; \
test "${partial_fails}" != "" && echo "opam-repo-ci detected dependencies failing: ${partial_fails}"; \
exit 1
RUN opam reinstall dns.5.0.1; \
res=$?; \
test "$res" != 31 && exit "$res"; \
export OPAMCLI=2.0; \
build_dir=$(opam var prefix)/.opam-switch/build; \
failed=$(ls "$build_dir"); \
partial_fails=""; \
for pkg in $failed; do \
if opam show -f x-ci-accept-failures: "$pkg" | grep -qF "\"debian-13\""; then \
echo "A package failed and has been disabled for CI using the 'x-ci-accept-failures' field."; \
fi; \
test "$pkg" != 'dns.5.0.1' && partial_fails="$partial_fails $pkg"; \
done; \
test "${partial_fails}" != "" && echo "opam-repo-ci detected dependencies failing: ${partial_fails}"; \
exit 1
RUN (opam reinstall --with-test dns.5.0.1) || true
RUN opam reinstall --with-test --verbose dns.5.0.1; \
res=$?; \
test "$res" != 31 && exit "$res"; \
export OPAMCLI=2.0; \
build_dir=$(opam var prefix)/.opam-switch/build; \
failed=$(ls "$build_dir"); \
partial_fails=""; \
for pkg in $failed; do \
if opam show -f x-ci-accept-failures: "$pkg" | grep -qF "\"debian-13\""; then \
echo "A package failed and has been disabled for CI using the 'x-ci-accept-failures' field."; \
fi; \
test "$pkg" != 'dns.5.0.1' && partial_fails="$partial_fails $pkg"; \
done; \
test "${partial_fails}" != "" && echo "opam-repo-ci detected dependencies failing: ${partial_fails}"; \
exit 1
END-OF-DOCKERFILE
docker build -f ../Dockerfile .
2026-03-16 19:17.38: Using cache hint "ocaml/opam:debian-13-ocaml-4.14@sha256:37323dc71cac48a3e4688e16b45b95486f3cc440c55ab3f83114e8973362f41e-dune.3.22.0~alpha2-dns.5.0.1-19c70fd6a788b154ec5e9fe26bca1d12fb2519be"
2026-03-16 19:17.38: Using OBuilder spec:
((from ocaml/opam:debian-13-ocaml-4.14@sha256:37323dc71cac48a3e4688e16b45b95486f3cc440c55ab3f83114e8973362f41e)
(user (uid 1000) (gid 1000))
(workdir /home/opam)
(run (shell "sudo ln -f /usr/bin/opam-dev /usr/bin/opam"))
(run (network host)
(shell "opam init --reinit --config .opamrc-sandbox -ni"))
(run (shell "opam option solver=builtin-0install && opam config report"))
(env OPAMDOWNLOADJOBS 1)
(env OPAMERRLOGLEN 0)
(env OPAMPRECISETRACKING 1)
(env CI true)
(env OPAM_REPO_CI true)
(run (shell "rm -rf opam-repository/"))
(copy (src .) (dst opam-repository/))
(run (shell "opam repository set-url --strict default opam-repository/"))
(run (network host)
(shell "opam update --depexts || true"))
(run (shell "opam pin add -k version -yn dune.3.22.0~alpha2 3.22.0~alpha2"))
(run (cache (opam-archives (target /home/opam/.opam/download-cache)))
(network host)
(shell "opam reinstall dune.3.22.0~alpha2;\
\n res=$?;\
\n test \"$res\" != 31 && exit \"$res\";\
\n export OPAMCLI=2.0;\
\n build_dir=$(opam var prefix)/.opam-switch/build;\
\n failed=$(ls \"$build_dir\");\
\n partial_fails=\"\";\
\n for pkg in $failed; do\
\n if opam show -f x-ci-accept-failures: \"$pkg\" | grep -qF \"\\\"debian-13\\\"\"; then\
\n echo \"A package failed and has been disabled for CI using the 'x-ci-accept-failures' field.\";\
\n fi;\
\n test \"$pkg\" != 'dune.3.22.0~alpha2' && partial_fails=\"$partial_fails $pkg\";\
\n done;\
\n test \"${partial_fails}\" != \"\" && echo \"opam-repo-ci detected dependencies failing: ${partial_fails}\";\
\n exit 1"))
(run (cache (opam-archives (target /home/opam/.opam/download-cache)))
(network host)
(shell "opam reinstall dns.5.0.1;\
\n res=$?;\
\n test \"$res\" != 31 && exit \"$res\";\
\n export OPAMCLI=2.0;\
\n build_dir=$(opam var prefix)/.opam-switch/build;\
\n failed=$(ls \"$build_dir\");\
\n partial_fails=\"\";\
\n for pkg in $failed; do\
\n if opam show -f x-ci-accept-failures: \"$pkg\" | grep -qF \"\\\"debian-13\\\"\"; then\
\n echo \"A package failed and has been disabled for CI using the 'x-ci-accept-failures' field.\";\
\n fi;\
\n test \"$pkg\" != 'dns.5.0.1' && partial_fails=\"$partial_fails $pkg\";\
\n done;\
\n test \"${partial_fails}\" != \"\" && echo \"opam-repo-ci detected dependencies failing: ${partial_fails}\";\
\n exit 1"))
(run (network host)
(shell "(opam reinstall --with-test dns.5.0.1) || true"))
(run (shell "opam reinstall --with-test --verbose dns.5.0.1;\
\n res=$?;\
\n test \"$res\" != 31 && exit \"$res\";\
\n export OPAMCLI=2.0;\
\n build_dir=$(opam var prefix)/.opam-switch/build;\
\n failed=$(ls \"$build_dir\");\
\n partial_fails=\"\";\
\n for pkg in $failed; do\
\n if opam show -f x-ci-accept-failures: \"$pkg\" | grep -qF \"\\\"debian-13\\\"\"; then\
\n echo \"A package failed and has been disabled for CI using the 'x-ci-accept-failures' field.\";\
\n fi;\
\n test \"$pkg\" != 'dns.5.0.1' && partial_fails=\"$partial_fails $pkg\";\
\n done;\
\n test \"${partial_fails}\" != \"\" && echo \"opam-repo-ci detected dependencies failing: ${partial_fails}\";\
\n exit 1"))
)
2026-03-16 19:17.38: Waiting for resource in pool OCluster
2026-03-17 05:24.24: Waiting for worker…
2026-03-17 05:26.29: Got resource from pool OCluster
Building on asteria.caelum.ci.dev
All commits already cached
HEAD is now at 4f056bfedf Merge pull request #29543 from Zaneham/add-olint-0.1.0
Updating 4f056bfedf..19c70fd6a7
Fast-forward
.../chrome-trace/chrome-trace.3.22.0~alpha2/opam | 39 +++++++++++
.../dune-action-plugin.3.22.0~alpha2/opam | 52 +++++++++++++++
.../dune-action-trace.3.22.0~alpha2/opam | 39 +++++++++++
.../dune-build-info.3.22.0~alpha2/opam | 45 +++++++++++++
.../dune-configurator.3.22.0~alpha2/opam | 49 ++++++++++++++
packages/dune-glob/dune-glob.3.22.0~alpha2/opam | 42 ++++++++++++
.../dune-private-libs.3.22.0~alpha2/opam | 50 +++++++++++++++
.../dune-rpc-lwt/dune-rpc-lwt.3.22.0~alpha2/opam | 41 ++++++++++++
packages/dune-rpc/dune-rpc.3.22.0~alpha2/opam | 44 +++++++++++++
packages/dune-site/dune-site.3.22.0~alpha2/opam | 37 +++++++++++
packages/dune/dune.3.22.0~alpha2/opam | 75 ++++++++++++++++++++++
packages/dyn/dyn.3.22.0~alpha2/opam | 40 ++++++++++++
packages/fs-io/fs-io.3.22.0~alpha2/opam | 39 +++++++++++
packages/ocamlc-loc/ocamlc-loc.3.22.0~alpha2/opam | 43 +++++++++++++
packages/ordering/ordering.3.22.0~alpha2/opam | 38 +++++++++++
packages/stdune/stdune.3.22.0~alpha2/opam | 46 +++++++++++++
.../top-closure/top-closure.3.22.0~alpha2/opam | 38 +++++++++++
packages/xdg/xdg.3.22.0~alpha2/opam | 39 +++++++++++
18 files changed, 796 insertions(+)
create mode 100644 packages/chrome-trace/chrome-trace.3.22.0~alpha2/opam
create mode 100644 packages/dune-action-plugin/dune-action-plugin.3.22.0~alpha2/opam
create mode 100644 packages/dune-action-trace/dune-action-trace.3.22.0~alpha2/opam
create mode 100644 packages/dune-build-info/dune-build-info.3.22.0~alpha2/opam
create mode 100644 packages/dune-configurator/dune-configurator.3.22.0~alpha2/opam
create mode 100644 packages/dune-glob/dune-glob.3.22.0~alpha2/opam
create mode 100644 packages/dune-private-libs/dune-private-libs.3.22.0~alpha2/opam
create mode 100644 packages/dune-rpc-lwt/dune-rpc-lwt.3.22.0~alpha2/opam
create mode 100644 packages/dune-rpc/dune-rpc.3.22.0~alpha2/opam
create mode 100644 packages/dune-site/dune-site.3.22.0~alpha2/opam
create mode 100644 packages/dune/dune.3.22.0~alpha2/opam
create mode 100644 packages/dyn/dyn.3.22.0~alpha2/opam
create mode 100644 packages/fs-io/fs-io.3.22.0~alpha2/opam
create mode 100644 packages/ocamlc-loc/ocamlc-loc.3.22.0~alpha2/opam
create mode 100644 packages/ordering/ordering.3.22.0~alpha2/opam
create mode 100644 packages/stdune/stdune.3.22.0~alpha2/opam
create mode 100644 packages/top-closure/top-closure.3.22.0~alpha2/opam
create mode 100644 packages/xdg/xdg.3.22.0~alpha2/opam
(from ocaml/opam:debian-13-ocaml-4.14@sha256:37323dc71cac48a3e4688e16b45b95486f3cc440c55ab3f83114e8973362f41e)
2026-03-17 05:26.45 ---> using "32cd5b5baf995c02200cf270da597dbb25becd220af2c200c00b8b241a742195" from cache
/: (user (uid 1000) (gid 1000))
/: (workdir /home/opam)
/home/opam: (run (shell "sudo ln -f /usr/bin/opam-dev /usr/bin/opam"))
2026-03-17 05:26.45 ---> using "f3ed7bdbef828c9c0b079b10505c5f05c3c9adcca11ce5bf2dac2a4183e099d8" from cache
/home/opam: (run (network host)
(shell "opam init --reinit --config .opamrc-sandbox -ni"))
Configuring from /home/opam/.opamrc-sandbox, then /home/opam/.opamrc, and finally from built-in defaults.
Checking for available remotes: rsync and local, git.
- you won't be able to use mercurial repositories unless you install the hg command on your system.
- you won't be able to use darcs repositories unless you install the darcs command on your system.
This version of opam requires an update to the layout of /home/opam/.opam from version 2.0 to version 2.2, which can't be reverted.
You may want to back it up before going further.
Continue? [Y/n] y
[NOTE] The 'jobs' option was reset, its value was 71 and its new value will vary according to the current number of cores on your machine. You can restore the fixed value using:
opam option jobs=71 --global
Format upgrade done.
<><> Updating repositories ><><><><><><><><><><><><><><><><><><><><><><><><><><>
[default] Initialised
2026-03-17 05:26.45 ---> using "5bf6adb7b45bb7e0c215b8f509c71a8dae73a9a2060efcc27df9d4ef6c6d3350" from cache
/home/opam: (run (shell "opam option solver=builtin-0install && opam config report"))
Set to 'builtin-0install' the field solver in global configuration
# opam config report
# opam-version 2.5.0
# self-upgrade no
# system arch=x86_64 os=linux os-distribution=debian os-version=13
# solver builtin-0install
# install-criteria -changed,-count[avoid-version,solution]
# upgrade-criteria -count[avoid-version,solution]
# jobs 255
# repositories 1 (version-controlled)
# pinned 1 (version)
# current-switch 4.14
# invariant ["ocaml-base-compiler" {= "4.14.2"}]
# compiler-packages ocaml-base-compiler.4.14.2, ocaml-options-vanilla.1
# ocaml:native true
# ocaml:native-tools true
# ocaml:native-dynlink true
# ocaml:stubsdir /home/opam/.opam/4.14/lib/ocaml/stublibs:/home/opam/.opam/4.14/lib/ocaml
# ocaml:preinstalled false
# ocaml:compiler 4.14.2
2026-03-17 05:26.45 ---> using "0546f18fa5979677ee22eb9f2fcf19ab371564e845d317c2c70e41dd97dc22dd" from cache
/home/opam: (env OPAMDOWNLOADJOBS 1)
/home/opam: (env OPAMERRLOGLEN 0)
/home/opam: (env OPAMPRECISETRACKING 1)
/home/opam: (env CI true)
/home/opam: (env OPAM_REPO_CI true)
/home/opam: (run (shell "rm -rf opam-repository/"))
2026-03-17 05:26.45 ---> using "0a7188cbe95f4fe0ff26694977eb8794c975bdb534078da98a06d6c7373289b4" from cache
/home/opam: (copy (src .) (dst opam-repository/))
2026-03-17 05:26.46 ---> using "bac94271bd2933048ab9ec083de7359406ae7b709f9e625d1aacde394e5b6b85" from cache
/home/opam: (run (shell "opam repository set-url --strict default opam-repository/"))
[default] Initialised
2026-03-17 05:26.46 ---> using "1963dd823dac22306d550e5e9c9f971346ae5d465407ab924aff86b04a5120b3" from cache
/home/opam: (run (network host)
(shell "opam update --depexts || true"))
+ /usr/bin/sudo "apt-get" "update"
- Get:1 http://deb.debian.org/debian trixie InRelease [140 kB]
- Get:2 http://deb.debian.org/debian trixie-updates InRelease [47.3 kB]
- Get:3 http://deb.debian.org/debian-security trixie-security InRelease [43.4 kB]
- Get:4 http://deb.debian.org/debian trixie/main amd64 Packages [9671 kB]
- Get:5 http://deb.debian.org/debian-security trixie-security/main amd64 Packages [111 kB]
- Fetched 10.0 MB in 1s (10.8 MB/s)
- Reading package lists...
-
2026-03-17 05:26.46 ---> using "2bbae9754f2da55382df5a713573b4f2579b518f80eaef97920d7868fdc429fa" from cache
/home/opam: (run (shell "opam pin add -k version -yn dune.3.22.0~alpha2 3.22.0~alpha2"))
dune is now pinned to version 3.22.0~alpha2
2026-03-17 05:26.46 ---> using "3b312e1ba2e2d3ce6c50234ba2e62c6d827f15439acf5c47c65286f0b2bce15a" from cache
/home/opam: (run (cache (opam-archives (target /home/opam/.opam/download-cache)))
(network host)
(shell "opam reinstall dune.3.22.0~alpha2;\
\n res=$?;\
\n test \"$res\" != 31 && exit \"$res\";\
\n export OPAMCLI=2.0;\
\n build_dir=$(opam var prefix)/.opam-switch/build;\
\n failed=$(ls \"$build_dir\");\
\n partial_fails=\"\";\
\n for pkg in $failed; do\
\n if opam show -f x-ci-accept-failures: \"$pkg\" | grep -qF \"\\\"debian-13\\\"\"; then\
\n echo \"A package failed and has been disabled for CI using the 'x-ci-accept-failures' field.\";\
\n fi;\
\n test \"$pkg\" != 'dune.3.22.0~alpha2' && partial_fails=\"$partial_fails $pkg\";\
\n done;\
\n test \"${partial_fails}\" != \"\" && echo \"opam-repo-ci detected dependencies failing: ${partial_fails}\";\
\n exit 1"))
dune.3.22.0~alpha2 is not installed. Install it? [Y/n] y
The following actions will be performed:
=== install 1 package
- install dune 3.22.0~alpha2 (pinned)
<><> Processing actions <><><><><><><><><><><><><><><><><><><><><><><><><><><><>
-> retrieved dune.3.22.0~alpha2 (cached)
-> installed dune.3.22.0~alpha2
Done.
# To update the current shell environment, run: eval $(opam env)
2026-03-17 05:26.46 ---> using "79a7862cc80cedc04a487927a5645f883e0c17c692a64a036ab827a7afe98a62" from cache
/home/opam: (run (cache (opam-archives (target /home/opam/.opam/download-cache)))
(network host)
(shell "opam reinstall dns.5.0.1;\
\n res=$?;\
\n test \"$res\" != 31 && exit \"$res\";\
\n export OPAMCLI=2.0;\
\n build_dir=$(opam var prefix)/.opam-switch/build;\
\n failed=$(ls \"$build_dir\");\
\n partial_fails=\"\";\
\n for pkg in $failed; do\
\n if opam show -f x-ci-accept-failures: \"$pkg\" | grep -qF \"\\\"debian-13\\\"\"; then\
\n echo \"A package failed and has been disabled for CI using the 'x-ci-accept-failures' field.\";\
\n fi;\
\n test \"$pkg\" != 'dns.5.0.1' && partial_fails=\"$partial_fails $pkg\";\
\n done;\
\n test \"${partial_fails}\" != \"\" && echo \"opam-repo-ci detected dependencies failing: ${partial_fails}\";\
\n exit 1"))
dns.5.0.1 is not installed. Install it? [Y/n] y
The following actions will be performed:
=== install 20 packages
- install astring 0.8.5 [required by dns]
- install bigarray-compat 1.1.0 [required by cstruct]
- install cstruct 6.0.1 [required by dns]
- install dns 5.0.1
- install domain-name 0.5.0 [required by dns]
- install duration 0.2.1 [required by dns]
- install fmt 0.11.0 [required by dns]
- install gmap 0.3.0 [required by dns]
- install ipaddr 5.6.2 [required by dns]
- install logs 0.10.0 [required by dns]
- install lru 0.3.1 [required by dns]
- install macaddr 5.6.2 [required by ipaddr]
- install metrics 0.5.0 [required by dns]
- install ocamlbuild 0.16.1 [required by ptime, fmt, astring, etc.]
- install ocamlfind 1.9.8 [required by ptime, fmt, astring, etc.]
- install psq 0.2.1 [required by lru]
- install ptime 1.2.0 [required by dns]
- install rresult 0.7.0 [required by dns]
- install seq base [required by psq]
- install topkg 1.1.1 [required by ptime, fmt, astring, etc.]
<><> Processing actions <><><><><><><><><><><><><><><><><><><><><><><><><><><><>
-> retrieved astring.0.8.5 (cached)
-> retrieved bigarray-compat.1.1.0 (cached)
-> retrieved cstruct.6.0.1 (cached)
-> retrieved dns.5.0.1 (cached)
-> retrieved domain-name.0.5.0 (cached)
-> retrieved duration.0.2.1 (cached)
-> retrieved fmt.0.11.0 (cached)
-> retrieved gmap.0.3.0 (cached)
-> retrieved ipaddr.5.6.2, macaddr.5.6.2 (cached)
-> retrieved logs.0.10.0 (cached)
-> retrieved lru.0.3.1 (cached)
-> retrieved metrics.0.5.0 (cached)
-> retrieved ocamlbuild.0.16.1 (cached)
-> installed bigarray-compat.1.1.0
-> installed duration.0.2.1
-> installed gmap.0.3.0
-> retrieved ocamlfind.1.9.8 (cached)
-> installed domain-name.0.5.0
-> retrieved psq.0.2.1 (cached)
-> retrieved ptime.1.2.0 (cached)
-> installed macaddr.5.6.2
-> retrieved rresult.0.7.0 (cached)
-> retrieved seq.base (cached)
-> installed seq.base
-> retrieved topkg.1.1.1 (cached)
-> installed cstruct.6.0.1
-> installed psq.0.2.1
-> installed ipaddr.5.6.2
-> installed lru.0.3.1
-> installed ocamlfind.1.9.8
-> installed ocamlbuild.0.16.1
-> installed topkg.1.1.1
-> installed rresult.0.7.0
-> installed fmt.0.11.0
-> installed ptime.1.2.0
-> installed metrics.0.5.0
-> installed astring.0.8.5
-> installed logs.0.10.0
-> installed dns.5.0.1
Done.
# To update the current shell environment, run: eval $(opam env)
2026-03-17 05:27.03 ---> saved as "9d52583d99897e8f5c209e958e275f6b8f375ef4cfc14e315081ed1c418d2816"
/home/opam: (run (network host)
(shell "(opam reinstall --with-test dns.5.0.1) || true"))
The following actions will be performed:
=== recompile 4 packages
- recompile dns 5.0.1
- recompile fmt 0.11.0 [uses cmdliner]
- recompile logs 0.10.0 [uses cmdliner]
- recompile metrics 0.5.0 [uses fmt]
=== install 6 packages
- install alcotest 1.9.1 [required by dns]
- install cmdliner 2.1.0 [required by alcotest]
- install ocaml-syntax-shims 1.0.0 [required by alcotest]
- install re 1.14.0 [required by alcotest]
- install stdlib-shims 0.3.0 [required by alcotest]
- install uutf 1.0.4 [required by alcotest]
<><> Processing actions <><><><><><><><><><><><><><><><><><><><><><><><><><><><>
-> retrieved alcotest.1.9.1 (https://opam.ocaml.org/cache)
-> retrieved cmdliner.2.1.0 (https://opam.ocaml.org/cache)
-> retrieved dns.5.0.1 (https://opam.ocaml.org/cache)
-> retrieved fmt.0.11.0 (https://opam.ocaml.org/cache)
-> retrieved logs.0.10.0 (https://opam.ocaml.org/cache)
-> retrieved metrics.0.5.0 (https://opam.ocaml.org/cache)
-> retrieved ocaml-syntax-shims.1.0.0 (https://opam.ocaml.org/cache)
-> retrieved re.1.14.0 (https://opam.ocaml.org/cache)
-> retrieved stdlib-shims.0.3.0 (https://opam.ocaml.org/cache)
-> retrieved uutf.1.0.4 (https://opam.ocaml.org/cache)
-> installed stdlib-shims.0.3.0
-> installed ocaml-syntax-shims.1.0.0
-> installed re.1.14.0
-> removed dns.5.0.1
-> removed logs.0.10.0
-> removed metrics.0.5.0
-> removed fmt.0.11.0
-> installed cmdliner.2.1.0
-> installed uutf.1.0.4
-> installed fmt.0.11.0
-> installed metrics.0.5.0
-> installed alcotest.1.9.1
-> installed logs.0.10.0
-> installed dns.5.0.1
Done.
# To update the current shell environment, run: eval $(opam env)
2026-03-17 05:27.15 ---> saved as "0a09bf00835e9324e8414fcd5227bab68dd116c42fd4563e25254c6ce101aa02"
/home/opam: (run (shell "opam reinstall --with-test --verbose dns.5.0.1;\
\n res=$?;\
\n test \"$res\" != 31 && exit \"$res\";\
\n export OPAMCLI=2.0;\
\n build_dir=$(opam var prefix)/.opam-switch/build;\
\n failed=$(ls \"$build_dir\");\
\n partial_fails=\"\";\
\n for pkg in $failed; do\
\n if opam show -f x-ci-accept-failures: \"$pkg\" | grep -qF \"\\\"debian-13\\\"\"; then\
\n echo \"A package failed and has been disabled for CI using the 'x-ci-accept-failures' field.\";\
\n fi;\
\n test \"$pkg\" != 'dns.5.0.1' && partial_fails=\"$partial_fails $pkg\";\
\n done;\
\n test \"${partial_fails}\" != \"\" && echo \"opam-repo-ci detected dependencies failing: ${partial_fails}\";\
\n exit 1"))
The following actions will be performed:
=== recompile 1 package
- recompile dns 5.0.1
<><> Processing actions <><><><><><><><><><><><><><><><><><><><><><><><><><><><>
Processing 1/4: [dns.5.0.1: extract]
-> retrieved dns.5.0.1 (cached)
Processing 2/4: [dns: dune build]
+ /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "dune" "build" "-p" "dns" "-j" "255" (CWD=/home/opam/.opam/4.14/.opam-switch/build/dns.5.0.1)
- (cd _build/default && /home/opam/.opam/4.14/bin/ocamlc.opt -w -40 -g -bin-annot -I cache/.dns_cache.objs/byte -I /home/opam/.opam/4.14/lib/astring -I /home/opam/.opam/4.14/lib/bigarray-compat -I /home/opam/.opam/4.14/lib/cstruct -I /home/opam/.opam/4.14/lib/domain-name -I /home/opam/.opam/4.14/lib/duration -I /home/opam/.opam/4.14/lib/fmt -I /home/opam/.opam/4.14/lib/gmap -I /home/opam/.opam/4.14/lib/ipaddr -I /home/opam/.opam/4.14/lib/logs -I /home/opam/.opam/4.14/lib/lru -I /home/opam/.opam/4.14/lib/macaddr -I /home/opam/.opam/4.14/lib/metrics -I /home/opam/.opam/4.14/lib/psq -I /home/opam/.opam/4.14/lib/ptime -I /home/opam/.opam/4.14/lib/rresult -I /home/opam/.opam/4.14/lib/seq -I src/.dns.objs/byte -intf-suffix .ml -no-alias-deps -o cache/.dns_cache.objs/byte/dns_cache.cmo -c -impl cache/dns_cache.ml)
- File "cache/dns_cache.ml", line 88, characters 24-28:
- 88 | Fmt.(list ~sep:(unit ";@,") (pair Rr_map.ppk pp_entry))
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "cache/dns_cache.ml", line 119, characters 32-36:
- 119 | let pp = LRU.pp Fmt.(pair ~sep:(unit ": ") Domain_name.pp Entry.pp)
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "cache/dns_cache.ml", line 137, characters 24-30:
- 137 | | `No_data ns -> Fmt.(prefix (unit "no data ") pp_ns) ppf ns
- ^^^^^^
- Alert deprecated: Fmt.prefix
- use Fmt.(++) instead.
- File "cache/dns_cache.ml", line 137, characters 32-36:
- 137 | | `No_data ns -> Fmt.(prefix (unit "no data ") pp_ns) ppf ns
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "cache/dns_cache.ml", line 138, characters 26-32:
- 138 | | `No_domain ns -> Fmt.(prefix (unit "no domain ") pp_ns) ppf ns
- ^^^^^^
- Alert deprecated: Fmt.prefix
- use Fmt.(++) instead.
- File "cache/dns_cache.ml", line 138, characters 34-38:
- 138 | | `No_domain ns -> Fmt.(prefix (unit "no domain ") pp_ns) ppf ns
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "cache/dns_cache.ml", line 139, characters 26-32:
- 139 | | `Serv_fail ns -> Fmt.(prefix (unit "serv fail ") pp_ns) ppf ns
- ^^^^^^
- Alert deprecated: Fmt.prefix
- use Fmt.(++) instead.
- File "cache/dns_cache.ml", line 139, characters 34-38:
- 139 | | `Serv_fail ns -> Fmt.(prefix (unit "serv fail ") pp_ns) ppf ns
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- (cd _build/default && /home/opam/.opam/4.14/bin/ocamlc.opt -w -40 -g -bin-annot -I src/.dns.objs/byte -I /home/opam/.opam/4.14/lib/astring -I /home/opam/.opam/4.14/lib/bigarray-compat -I /home/opam/.opam/4.14/lib/cstruct -I /home/opam/.opam/4.14/lib/domain-name -I /home/opam/.opam/4.14/lib/fmt -I /home/opam/.opam/4.14/lib/gmap -I /home/opam/.opam/4.14/lib/ipaddr -I /home/opam/.opam/4.14/lib/logs -I /home/opam/.opam/4.14/lib/macaddr -I /home/opam/.opam/4.14/lib/metrics -I /home/opam/.opam/4.14/lib/ptime -I /home/opam/.opam/4.14/lib/rresult -intf-suffix .ml -no-alias-deps -o src/.dns.objs/byte/dns.cmo -c -impl src/dns.ml)
- File "src/dns.ml", line 70, characters 41-49:
- 70 | | c -> Error (`Not_implemented (off, Fmt.strf "class %X" c))
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 108, characters 41-49:
- 108 | | x -> Error (`Not_implemented (off, Fmt.strf "opcode 0x%X" x))
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 166, characters 41-49:
- 166 | | x -> Error (`Not_implemented (off, Fmt.strf "rcode 0x%04X" x))
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 203, characters 50-58:
- 203 | | i when i >= 64 -> Error (`Malformed (off, Fmt.strf "label tag 0x%x" i)) (* bit patterns starting with 10 or 01 *)
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 295, characters 25-33:
- 295 | `Malformed (off, Fmt.strf "invalid hostname %a" Domain_name.pp name))
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 745, characters 34-42:
- 745 | (`Not_implemented (off + 2, Fmt.strf "dnskey protocol 0x%x" proto)) >>| fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 754, characters 13-24:
- 754 | let kl = Cstruct.len t.key in
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 796, characters 39-43:
- 796 | t.critical t.tag Fmt.(list ~sep:(unit "; ") string) t.value
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 811, characters 35-43:
- 811 | (`Not_implemented (succ off, Fmt.strf "caa tag 0x%x" tl)) >>= fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 961, characters 12-23:
- 961 | let l = Cstruct.len tlsa.data in
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1059, characters 12-23:
- 1059 | let l = Cstruct.len sshfp.fingerprint in
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1152, characters 17-25:
- 1152 | let m = Fmt.strf "algorithm name %a" Domain_name.pp b in
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1178, characters 30-38:
- 1178 | Error (`Malformed (off, Fmt.strf "timestamp does not fit in time range %Ld" s))
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1184, characters 44-52:
- 1184 | | None -> Error (`Malformed (off, Fmt.strf "span does not fit into timestamp %Ld" s))
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1186, characters 40-48:
- 1186 | | None -> Error (`Malformed (off, Fmt.strf "timestamp does not fit %Ld" s))
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1237, characters 25-29:
- 1237 | Fmt.(option ~none:(unit "none") (Ptime.pp_rfc3339 ())) t.other
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 1251, characters 11-22:
- 1251 | guard (Cstruct.len buf - off >= 6) `Partial >>= fun () ->
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1253, characters 39-47:
- 1253 | guard (ttl = 0l) (`Malformed (off, Fmt.strf "tsig ttl is not zero %lu" ttl)) >>= fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1256, characters 11-22:
- 1256 | guard (Cstruct.len buf - rdata_start >= len) `Partial >>= fun () ->
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1259, characters 11-22:
- 1259 | guard (Cstruct.len buf - off' >= 10) `Partial >>= fun () ->
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1264, characters 11-22:
- 1264 | guard (Cstruct.len buf - off' >= 10 + mac_len + 6) `Partial >>= fun () ->
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1272, characters 11-22:
- 1272 | guard (Cstruct.len buf >= rdata_end) `Partial >>= fun () ->
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1322, characters 18-29:
- 1322 | let mac_len = Cstruct.len t.mac in
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1380, characters 16-27:
- 1380 | let len = Cstruct.len t.mac in
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1390, characters 35-46:
- 1390 | Cstruct.BE.set_uint16 buf 0 (Cstruct.len rdata) ;
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1418, characters 70-74:
- 1418 | | Tcp_keepalive i -> Fmt.pf ppf "keepalive %a" Fmt.(option ~none:(unit "none") int) i
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 1465, characters 12-23:
- 1465 | let l = Cstruct.len v in
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1486, characters 46-54:
- 1486 | | _ -> Error (`Not_implemented (off, Fmt.strf "edns keepalive 0x%x" tl))
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1536, characters 23-27:
- 1536 | (list ~sep:(unit ", ") pp_extension) opt.extensions)
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 1553, characters 11-22:
- 1553 | guard (Cstruct.len buf - off >= 11) `Partial >>= fun () ->
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1916, characters 30-41:
- 1916 | let buf = Bytes.create (Cstruct.len cs * 2) in
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1917, characters 25-36:
- 1917 | for i = 0 to pred (Cstruct.len cs) do
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1945, characters 31-37:
- 1945 | let ttl_fmt = Fmt.(option (suffix (unit "\t") uint32)) in
- ^^^^^^
- Alert deprecated: Fmt.suffix
- use Fmt.(++) instead.
- File "src/dns.ml", line 1945, characters 39-43:
- 1945 | let ttl_fmt = Fmt.(option (suffix (unit "\t") uint32)) in
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 1950, characters 10-18:
- 1950 | [ Fmt.strf "%s\t%aCNAME\t%s" str_name ttl_fmt (ttl_opt ttl) (name alias) ]
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1953, characters 12-20:
- 1953 | Fmt.strf "%s\t%aMX\t%u\t%s" str_name ttl_fmt (ttl_opt ttl) preference (name mail_exchange) :: acc)
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1957, characters 12-20:
- 1957 | Fmt.strf "%s\t%aNS\t%s" str_name ttl_fmt (ttl_opt ttl) (name ns) :: acc)
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1960, characters 10-18:
- 1960 | [ Fmt.strf "%s\t%aPTR\t%s" str_name ttl_fmt (ttl_opt ttl) (name ptr) ]
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1962, characters 10-18:
- 1962 | [ Fmt.strf "%s\t%aSOA\t%s\t%s\t%lu\t%lu\t%lu\t%lu\t%lu" str_name
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1970, characters 12-20:
- 1970 | Fmt.strf "%s\t%aTXT\t\"%s\"" str_name ttl_fmt (ttl_opt ttl) txt :: acc)
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1974, characters 10-18:
- 1974 | Fmt.strf "%s\t%aA\t%s" str_name ttl_fmt (ttl_opt ttl) (Ipaddr.V4.to_string ip) :: acc)
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1978, characters 12-20:
- 1978 | Fmt.strf "%s\t%aAAAA\t%s" str_name ttl_fmt (ttl_opt ttl) (Ipaddr.V6.to_string ip) :: acc)
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1982, characters 12-20:
- 1982 | Fmt.strf "%s\t%aSRV\t%u\t%u\t%u\t%s"
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1989, characters 12-20:
- 1989 | Fmt.strf "%s%a\tDNSKEY\t%u\t3\t%d\t%s"
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1997, characters 12-20:
- 1997 | Fmt.strf "%s\t%aCAA\t%s\t%s\t\"%s\""
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2004, characters 12-20:
- 2004 | Fmt.strf "%s\t%aTLSA\t%u\t%u\t%u\t%s"
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2013, characters 12-20:
- 2013 | Fmt.strf "%s\t%aSSHFP\t%u\t%u\t%s" str_name ttl_fmt (ttl_opt ttl)
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2020, characters 12-20:
- 2020 | Fmt.strf "%s\t%aTYPE%d\t\\# %d %s" str_name ttl_fmt (ttl_opt ttl)
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2165, characters 11-22:
- 2165 | guard (Cstruct.len buf - off >= 6) `Partial >>= fun () ->
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 2171, characters 24-32:
- 2171 | (`Malformed (off, Fmt.strf "bad TTL (high bit set) %lu" ttl)) >>= fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2172, characters 11-22:
- 2172 | guard (Cstruct.len buf - rdata_start >= len) `Partial >>= fun () ->
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 2174, characters 28-36:
- 2174 | (`Malformed (off + 4, Fmt.strf "length %d exceeds maximum rdata size" len)) >>= fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2236, characters 24-28:
- 2236 | Fmt.(list ~sep:(unit "@.") string) ppf
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 2350, characters 24-28:
- 2350 | Fmt.(list ~sep:(unit ", ") Flag.pp) (Flags.elements flags)
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 2374, characters 13-24:
- 2374 | guard (Cstruct.len buf >= len) `Partial >>= fun () ->
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 2485, characters 11-22:
- 2485 | guard (Cstruct.len buf - off >= 4) `Partial >>= fun () ->
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 2542, characters 18-26:
- 2542 | let msg = Fmt.strf "bad RRTYp in question %a" Rr_map.pp_rr typ in
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2548, characters 40-48:
- 2548 | Error (`Not_implemented (off, Fmt.strf "bad class in question 0x%x" c))
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2567, characters 30-38:
- 2567 | (`Not_implemented (off, Fmt.strf "rr class not IN 0x%x" clas)) >>= fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2573, characters 36-44:
- 2573 | Error (`Not_implemented (off, Fmt.strf "unexpected RR typ %a"
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2608, characters 26-34:
- 2608 | (`Malformed (off, Fmt.strf "tsig class must be ANY 0x%x" clas)) >>= fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2613, characters 26-34:
- 2613 | (`Malformed (off, Fmt.strf "additional class must be IN 0x%x" clas)) >>= fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2616, characters 35-43:
- 2616 | | _ -> Error (`Malformed (off, Fmt.strf "decode additional, unexpected rr %a"
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2718, characters 24-32:
- 2718 | (`Malformed (6, Fmt.strf "AXFR needs at least one RRs in answer %d" ancount)) >>= fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2873, characters 24-32:
- 2873 | (`Malformed (6, Fmt.strf "IXFR needs at least one RRs in answer %d" ancount)) >>= fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2976, characters 13-24:
- 2976 | guard (Cstruct.len buf >= off') `Partial >>= fun () ->
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 2978, characters 41-49:
- 2978 | guard (ttl = 0l) (`Malformed (off, Fmt.strf "prereq TTL not zero %lu" ttl)) >>= fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2980, characters 54-62:
- 2980 | let r0 = guard (rlen = 0) (`Malformed (off + 4, Fmt.strf "prereq rdlength must be zero %d" rlen)) in
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2990, characters 37-45:
- 2990 | | _ -> Error (`Malformed (off, Fmt.strf "prereq bad class 0x%x or typ %a"
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 3045, characters 13-24:
- 3045 | guard (Cstruct.len buf >= off') `Partial >>= fun () ->
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 3048, characters 54-62:
- 3048 | let r0 = guard (rlen = 0) (`Malformed (off + 4, Fmt.strf "update rdlength must be zero %d" rlen)) in
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 3049, characters 52-60:
- 3049 | let ttl0 = guard (ttl = 0l) (`Malformed (off, Fmt.strf "update ttl must be zero %lu" ttl)) in
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 3067, characters 37-45:
- 3067 | | _ -> Error (`Malformed (off, Fmt.strf "bad update class 0x%x" cls))
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 3103, characters 24-28:
- 3103 | Fmt.(list ~sep:(unit ";@ ")
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 3104, characters 27-31:
- 3104 | (pair ~sep:(unit ":") Domain_name.pp
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 3105, characters 30-34:
- 3105 | (list ~sep:(unit ", ") pp_prereq)))
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 3107, characters 24-28:
- 3107 | Fmt.(list ~sep:(unit ";@ ")
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 3108, characters 27-31:
- 3108 | (pair ~sep:(unit ":") Domain_name.pp
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 3109, characters 30-34:
- 3109 | (list ~sep:(unit ", ") pp_update)))
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 3122, characters 26-34:
- 3122 | (`Malformed (off, Fmt.strf "update question not SOA %a" Rr_map.pp_rr (snd question))) >>= fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 3159, characters 63-67:
- 3159 | | `Notify soa -> Fmt.pf ppf "notify %a" Fmt.(option ~none:(unit "no") Soa.pp) soa
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 3206, characters 27-31:
- 3206 | Fmt.(option ~none:(unit "no data") Answer.pp) q
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 3277, characters 25-29:
- 3277 | Fmt.(option ~none:(unit "no") Edns.pp) t.edns
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 3278, characters 25-29:
- 3278 | Fmt.(option ~none:(unit "no") pp_tsig) t.tsig
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 3335, characters 10-21:
- 3335 | (if Cstruct.len buf > off then
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 3336, characters 17-28:
- 3336 | let n = Cstruct.len buf - off in
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 3395, characters 45-53:
- 3395 | | x -> Error (`Not_implemented (2, Fmt.strf "unsupported opcode %a" Opcode.pp x))
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 3402, characters 55-63:
- 3402 | guard (au_count = 0) (`Malformed (8, Fmt.strf "AXFR with aucount %d > 0" au_count)) >>= fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 3406, characters 55-63:
- 3406 | guard (au_count = 0) (`Malformed (8, Fmt.strf "IXFR with aucount %d > 0" au_count)) >>= fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 3421, characters 47-55:
- 3421 | | x -> Error (`Not_implemented (2, Fmt.strf "unsupported opcode %a"
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 3553, characters 10-21:
- 3553 | Cstruct.len buf, true
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 3601, characters 7-18:
- 3601 | if Cstruct.len buf < 12 then
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- (cd _build/default && /home/opam/.opam/4.14/bin/ocamlopt.opt -w -40 -g -I src/.dns.objs/byte -I src/.dns.objs/native -I /home/opam/.opam/4.14/lib/astring -I /home/opam/.opam/4.14/lib/bigarray-compat -I /home/opam/.opam/4.14/lib/cstruct -I /home/opam/.opam/4.14/lib/domain-name -I /home/opam/.opam/4.14/lib/fmt -I /home/opam/.opam/4.14/lib/gmap -I /home/opam/.opam/4.14/lib/ipaddr -I /home/opam/.opam/4.14/lib/logs -I /home/opam/.opam/4.14/lib/macaddr -I /home/opam/.opam/4.14/lib/metrics -I /home/opam/.opam/4.14/lib/ptime -I /home/opam/.opam/4.14/lib/rresult -intf-suffix .ml -no-alias-deps -o src/.dns.objs/native/dns.cmx -c -impl src/dns.ml)
- File "src/dns.ml", line 70, characters 41-49:
- 70 | | c -> Error (`Not_implemented (off, Fmt.strf "class %X" c))
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 108, characters 41-49:
- 108 | | x -> Error (`Not_implemented (off, Fmt.strf "opcode 0x%X" x))
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 166, characters 41-49:
- 166 | | x -> Error (`Not_implemented (off, Fmt.strf "rcode 0x%04X" x))
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 203, characters 50-58:
- 203 | | i when i >= 64 -> Error (`Malformed (off, Fmt.strf "label tag 0x%x" i)) (* bit patterns starting with 10 or 01 *)
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 295, characters 25-33:
- 295 | `Malformed (off, Fmt.strf "invalid hostname %a" Domain_name.pp name))
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 745, characters 34-42:
- 745 | (`Not_implemented (off + 2, Fmt.strf "dnskey protocol 0x%x" proto)) >>| fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 754, characters 13-24:
- 754 | let kl = Cstruct.len t.key in
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 796, characters 39-43:
- 796 | t.critical t.tag Fmt.(list ~sep:(unit "; ") string) t.value
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 811, characters 35-43:
- 811 | (`Not_implemented (succ off, Fmt.strf "caa tag 0x%x" tl)) >>= fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 961, characters 12-23:
- 961 | let l = Cstruct.len tlsa.data in
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1059, characters 12-23:
- 1059 | let l = Cstruct.len sshfp.fingerprint in
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1152, characters 17-25:
- 1152 | let m = Fmt.strf "algorithm name %a" Domain_name.pp b in
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1178, characters 30-38:
- 1178 | Error (`Malformed (off, Fmt.strf "timestamp does not fit in time range %Ld" s))
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1184, characters 44-52:
- 1184 | | None -> Error (`Malformed (off, Fmt.strf "span does not fit into timestamp %Ld" s))
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1186, characters 40-48:
- 1186 | | None -> Error (`Malformed (off, Fmt.strf "timestamp does not fit %Ld" s))
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1237, characters 25-29:
- 1237 | Fmt.(option ~none:(unit "none") (Ptime.pp_rfc3339 ())) t.other
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 1251, characters 11-22:
- 1251 | guard (Cstruct.len buf - off >= 6) `Partial >>= fun () ->
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1253, characters 39-47:
- 1253 | guard (ttl = 0l) (`Malformed (off, Fmt.strf "tsig ttl is not zero %lu" ttl)) >>= fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1256, characters 11-22:
- 1256 | guard (Cstruct.len buf - rdata_start >= len) `Partial >>= fun () ->
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1259, characters 11-22:
- 1259 | guard (Cstruct.len buf - off' >= 10) `Partial >>= fun () ->
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1264, characters 11-22:
- 1264 | guard (Cstruct.len buf - off' >= 10 + mac_len + 6) `Partial >>= fun () ->
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1272, characters 11-22:
- 1272 | guard (Cstruct.len buf >= rdata_end) `Partial >>= fun () ->
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1322, characters 18-29:
- 1322 | let mac_len = Cstruct.len t.mac in
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1380, characters 16-27:
- 1380 | let len = Cstruct.len t.mac in
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1390, characters 35-46:
- 1390 | Cstruct.BE.set_uint16 buf 0 (Cstruct.len rdata) ;
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1418, characters 70-74:
- 1418 | | Tcp_keepalive i -> Fmt.pf ppf "keepalive %a" Fmt.(option ~none:(unit "none") int) i
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 1465, characters 12-23:
- 1465 | let l = Cstruct.len v in
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1486, characters 46-54:
- 1486 | | _ -> Error (`Not_implemented (off, Fmt.strf "edns keepalive 0x%x" tl))
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1536, characters 23-27:
- 1536 | (list ~sep:(unit ", ") pp_extension) opt.extensions)
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 1553, characters 11-22:
- 1553 | guard (Cstruct.len buf - off >= 11) `Partial >>= fun () ->
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1916, characters 30-41:
- 1916 | let buf = Bytes.create (Cstruct.len cs * 2) in
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1917, characters 25-36:
- 1917 | for i = 0 to pred (Cstruct.len cs) do
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 1945, characters 31-37:
- 1945 | let ttl_fmt = Fmt.(option (suffix (unit "\t") uint32)) in
- ^^^^^^
- Alert deprecated: Fmt.suffix
- use Fmt.(++) instead.
- File "src/dns.ml", line 1945, characters 39-43:
- 1945 | let ttl_fmt = Fmt.(option (suffix (unit "\t") uint32)) in
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 1950, characters 10-18:
- 1950 | [ Fmt.strf "%s\t%aCNAME\t%s" str_name ttl_fmt (ttl_opt ttl) (name alias) ]
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1953, characters 12-20:
- 1953 | Fmt.strf "%s\t%aMX\t%u\t%s" str_name ttl_fmt (ttl_opt ttl) preference (name mail_exchange) :: acc)
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1957, characters 12-20:
- 1957 | Fmt.strf "%s\t%aNS\t%s" str_name ttl_fmt (ttl_opt ttl) (name ns) :: acc)
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1960, characters 10-18:
- 1960 | [ Fmt.strf "%s\t%aPTR\t%s" str_name ttl_fmt (ttl_opt ttl) (name ptr) ]
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1962, characters 10-18:
- 1962 | [ Fmt.strf "%s\t%aSOA\t%s\t%s\t%lu\t%lu\t%lu\t%lu\t%lu" str_name
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1970, characters 12-20:
- 1970 | Fmt.strf "%s\t%aTXT\t\"%s\"" str_name ttl_fmt (ttl_opt ttl) txt :: acc)
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1974, characters 10-18:
- 1974 | Fmt.strf "%s\t%aA\t%s" str_name ttl_fmt (ttl_opt ttl) (Ipaddr.V4.to_string ip) :: acc)
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1978, characters 12-20:
- 1978 | Fmt.strf "%s\t%aAAAA\t%s" str_name ttl_fmt (ttl_opt ttl) (Ipaddr.V6.to_string ip) :: acc)
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1982, characters 12-20:
- 1982 | Fmt.strf "%s\t%aSRV\t%u\t%u\t%u\t%s"
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1989, characters 12-20:
- 1989 | Fmt.strf "%s%a\tDNSKEY\t%u\t3\t%d\t%s"
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 1997, characters 12-20:
- 1997 | Fmt.strf "%s\t%aCAA\t%s\t%s\t\"%s\""
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2004, characters 12-20:
- 2004 | Fmt.strf "%s\t%aTLSA\t%u\t%u\t%u\t%s"
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2013, characters 12-20:
- 2013 | Fmt.strf "%s\t%aSSHFP\t%u\t%u\t%s" str_name ttl_fmt (ttl_opt ttl)
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2020, characters 12-20:
- 2020 | Fmt.strf "%s\t%aTYPE%d\t\\# %d %s" str_name ttl_fmt (ttl_opt ttl)
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2165, characters 11-22:
- 2165 | guard (Cstruct.len buf - off >= 6) `Partial >>= fun () ->
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 2171, characters 24-32:
- 2171 | (`Malformed (off, Fmt.strf "bad TTL (high bit set) %lu" ttl)) >>= fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2172, characters 11-22:
- 2172 | guard (Cstruct.len buf - rdata_start >= len) `Partial >>= fun () ->
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 2174, characters 28-36:
- 2174 | (`Malformed (off + 4, Fmt.strf "length %d exceeds maximum rdata size" len)) >>= fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2236, characters 24-28:
- 2236 | Fmt.(list ~sep:(unit "@.") string) ppf
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 2350, characters 24-28:
- 2350 | Fmt.(list ~sep:(unit ", ") Flag.pp) (Flags.elements flags)
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 2374, characters 13-24:
- 2374 | guard (Cstruct.len buf >= len) `Partial >>= fun () ->
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 2485, characters 11-22:
- 2485 | guard (Cstruct.len buf - off >= 4) `Partial >>= fun () ->
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 2542, characters 18-26:
- 2542 | let msg = Fmt.strf "bad RRTYp in question %a" Rr_map.pp_rr typ in
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2548, characters 40-48:
- 2548 | Error (`Not_implemented (off, Fmt.strf "bad class in question 0x%x" c))
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2567, characters 30-38:
- 2567 | (`Not_implemented (off, Fmt.strf "rr class not IN 0x%x" clas)) >>= fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2573, characters 36-44:
- 2573 | Error (`Not_implemented (off, Fmt.strf "unexpected RR typ %a"
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2608, characters 26-34:
- 2608 | (`Malformed (off, Fmt.strf "tsig class must be ANY 0x%x" clas)) >>= fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2613, characters 26-34:
- 2613 | (`Malformed (off, Fmt.strf "additional class must be IN 0x%x" clas)) >>= fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2616, characters 35-43:
- 2616 | | _ -> Error (`Malformed (off, Fmt.strf "decode additional, unexpected rr %a"
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2718, characters 24-32:
- 2718 | (`Malformed (6, Fmt.strf "AXFR needs at least one RRs in answer %d" ancount)) >>= fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2873, characters 24-32:
- 2873 | (`Malformed (6, Fmt.strf "IXFR needs at least one RRs in answer %d" ancount)) >>= fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2976, characters 13-24:
- 2976 | guard (Cstruct.len buf >= off') `Partial >>= fun () ->
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 2978, characters 41-49:
- 2978 | guard (ttl = 0l) (`Malformed (off, Fmt.strf "prereq TTL not zero %lu" ttl)) >>= fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2980, characters 54-62:
- 2980 | let r0 = guard (rlen = 0) (`Malformed (off + 4, Fmt.strf "prereq rdlength must be zero %d" rlen)) in
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 2990, characters 37-45:
- 2990 | | _ -> Error (`Malformed (off, Fmt.strf "prereq bad class 0x%x or typ %a"
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 3045, characters 13-24:
- 3045 | guard (Cstruct.len buf >= off') `Partial >>= fun () ->
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 3048, characters 54-62:
- 3048 | let r0 = guard (rlen = 0) (`Malformed (off + 4, Fmt.strf "update rdlength must be zero %d" rlen)) in
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 3049, characters 52-60:
- 3049 | let ttl0 = guard (ttl = 0l) (`Malformed (off, Fmt.strf "update ttl must be zero %lu" ttl)) in
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 3067, characters 37-45:
- 3067 | | _ -> Error (`Malformed (off, Fmt.strf "bad update class 0x%x" cls))
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 3103, characters 24-28:
- 3103 | Fmt.(list ~sep:(unit ";@ ")
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 3104, characters 27-31:
- 3104 | (pair ~sep:(unit ":") Domain_name.pp
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 3105, characters 30-34:
- 3105 | (list ~sep:(unit ", ") pp_prereq)))
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 3107, characters 24-28:
- 3107 | Fmt.(list ~sep:(unit ";@ ")
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 3108, characters 27-31:
- 3108 | (pair ~sep:(unit ":") Domain_name.pp
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 3109, characters 30-34:
- 3109 | (list ~sep:(unit ", ") pp_update)))
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 3122, characters 26-34:
- 3122 | (`Malformed (off, Fmt.strf "update question not SOA %a" Rr_map.pp_rr (snd question))) >>= fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 3159, characters 63-67:
- 3159 | | `Notify soa -> Fmt.pf ppf "notify %a" Fmt.(option ~none:(unit "no") Soa.pp) soa
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 3206, characters 27-31:
- 3206 | Fmt.(option ~none:(unit "no data") Answer.pp) q
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 3277, characters 25-29:
- 3277 | Fmt.(option ~none:(unit "no") Edns.pp) t.edns
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 3278, characters 25-29:
- 3278 | Fmt.(option ~none:(unit "no") pp_tsig) t.tsig
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "src/dns.ml", line 3335, characters 10-21:
- 3335 | (if Cstruct.len buf > off then
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 3336, characters 17-28:
- 3336 | let n = Cstruct.len buf - off in
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 3395, characters 45-53:
- 3395 | | x -> Error (`Not_implemented (2, Fmt.strf "unsupported opcode %a" Opcode.pp x))
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 3402, characters 55-63:
- 3402 | guard (au_count = 0) (`Malformed (8, Fmt.strf "AXFR with aucount %d > 0" au_count)) >>= fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 3406, characters 55-63:
- 3406 | guard (au_count = 0) (`Malformed (8, Fmt.strf "IXFR with aucount %d > 0" au_count)) >>= fun () ->
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 3421, characters 47-55:
- 3421 | | x -> Error (`Not_implemented (2, Fmt.strf "unsupported opcode %a"
- ^^^^^^^^
- Alert deprecated: Fmt.strf
- use Fmt.str instead.
- File "src/dns.ml", line 3553, characters 10-21:
- 3553 | Cstruct.len buf, true
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- File "src/dns.ml", line 3601, characters 7-18:
- 3601 | if Cstruct.len buf < 12 then
- ^^^^^^^^^^^
- Alert deprecated: Cstruct.len
- len is deprecated, you should use length instead.
- (cd _build/default && /home/opam/.opam/4.14/bin/ocamlopt.opt -w -40 -g -I cache/.dns_cache.objs/byte -I cache/.dns_cache.objs/native -I /home/opam/.opam/4.14/lib/astring -I /home/opam/.opam/4.14/lib/bigarray-compat -I /home/opam/.opam/4.14/lib/cstruct -I /home/opam/.opam/4.14/lib/domain-name -I /home/opam/.opam/4.14/lib/duration -I /home/opam/.opam/4.14/lib/fmt -I /home/opam/.opam/4.14/lib/gmap -I /home/opam/.opam/4.14/lib/ipaddr -I /home/opam/.opam/4.14/lib/logs -I /home/opam/.opam/4.14/lib/lru -I /home/opam/.opam/4.14/lib/macaddr -I /home/opam/.opam/4.14/lib/metrics -I /home/opam/.opam/4.14/lib/psq -I /home/opam/.opam/4.14/lib/ptime -I /home/opam/.opam/4.14/lib/rresult -I /home/opam/.opam/4.14/lib/seq -I src/.dns.objs/byte -I src/.dns.objs/native -intf-suffix .ml -no-alias-deps -o cache/.dns_cache.objs/native/dns_cache.cmx -c -impl cache/dns_cache.ml)
- File "cache/dns_cache.ml", line 88, characters 24-28:
- 88 | Fmt.(list ~sep:(unit ";@,") (pair Rr_map.ppk pp_entry))
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "cache/dns_cache.ml", line 119, characters 32-36:
- 119 | let pp = LRU.pp Fmt.(pair ~sep:(unit ": ") Domain_name.pp Entry.pp)
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "cache/dns_cache.ml", line 137, characters 24-30:
- 137 | | `No_data ns -> Fmt.(prefix (unit "no data ") pp_ns) ppf ns
- ^^^^^^
- Alert deprecated: Fmt.prefix
- use Fmt.(++) instead.
- File "cache/dns_cache.ml", line 137, characters 32-36:
- 137 | | `No_data ns -> Fmt.(prefix (unit "no data ") pp_ns) ppf ns
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "cache/dns_cache.ml", line 138, characters 26-32:
- 138 | | `No_domain ns -> Fmt.(prefix (unit "no domain ") pp_ns) ppf ns
- ^^^^^^
- Alert deprecated: Fmt.prefix
- use Fmt.(++) instead.
- File "cache/dns_cache.ml", line 138, characters 34-38:
- 138 | | `No_domain ns -> Fmt.(prefix (unit "no domain ") pp_ns) ppf ns
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
- File "cache/dns_cache.ml", line 139, characters 26-32:
- 139 | | `Serv_fail ns -> Fmt.(prefix (unit "serv fail ") pp_ns) ppf ns
- ^^^^^^
- Alert deprecated: Fmt.prefix
- use Fmt.(++) instead.
- File "cache/dns_cache.ml", line 139, characters 34-38:
- 139 | | `Serv_fail ns -> Fmt.(prefix (unit "serv fail ") pp_ns) ppf ns
- ^^^^
- Alert deprecated: Fmt.unit
- use Fmt.any instead.
Processing 2/4: [dns: dune runtest]
+ /home/opam/.opam/opam-init/hooks/sandbox.sh "build" "dune" "runtest" "-p" "dns" "-j" "255" (CWD=/home/opam/.opam/4.14/.opam-switch/build/dns.5.0.1)
- (cd _build/default/test && ./cache.exe)
- Testing `DNS cache tests'.
- This run has ID `FRJ0D0WD'.
-
- [OK] cache tests 0 empty cache.
- [OK] cache tests 1 cache with A.
- [OK] cache tests 2 cache nodata.
-
- Full test results in `~/.opam/4.14/.opam-switch/build/dns.5.0.1/_build/default/test/_build/_tests/DNS cache tests'.
- Test Successful in 0.000s. 3 tests run.
- (cd _build/default/test && ./tests.exe)
- Testing `DNS name and packet tests'.
- This run has ID `6J1R4QOJ'.
-
- [OK] Packet decode 0 bad query.
- [OK] Packet decode 1 regression0.
- [OK] Packet decode 2 regression1.
- [OK] Packet decode 3 regression2.
- [OK] Packet decode 4 regression4.
- [OK] Packet decode 5 regression5.
- [OK] Packet decode 6 regression6.
- [OK] Packet decode 7 regression7.
- [OK] Packet decode 8 regression8.
- [OK] Packet decode 9 regression9.
- [OK] Packet decode 10 regression10.
- [OK] Packet decode 11 regression11.
- [OK] Packet decode 12 regression12.
-
- Full test results in `~/.opam/4.14/.opam-switch/build/dns.5.0.1/_build/default/test/_build/_tests/DNS name and packet tests'.
- Test Successful in 0.003s. 13 tests run.
-> compiled dns.5.0.1
-> removed dns.5.0.1
-> installed dns.5.0.1
Done.
# To update the current shell environment, run: eval $(opam env)
2026-03-17 05:27.21 ---> saved as "7f3b866689f4693d4a8266a5d2bf4b5581a866762cb4f7fae7fec721d696ec6d"
Job succeeded
2026-03-17 05:27.29: Job succeeded