2024-10-28 10:43.46: New job: test ocaml-multicore/eio https://github.com/ocaml-multicore/eio.git#refs/pull/772/head (a2806826ffbb4aa1e9066a49affcbe53522d72d7) (linux-arm64:debian-12-5.2_arm64_opam-2.2)Base: ocaml/opam:debian-12-ocaml-5.2@sha256:9088f15451f794ea3816962de50eb418af0152755908fe23bc1432336c6d40f8Opam project buildTo reproduce locally:git clone --recursive "https://github.com/ocaml-multicore/eio.git" && cd "eio" && git fetch origin "refs/pull/772/head" && git reset --hard a2806826cat > Dockerfile <<'END-OF-DOCKERFILE'FROM ocaml/opam:debian-12-ocaml-5.2@sha256:9088f15451f794ea3816962de50eb418af0152755908fe23bc1432336c6d40f8# debian-12-5.2_arm64_opam-2.2USER 1000:1000ENV CLICOLOR_FORCE="1"ENV OPAMCOLOR="always"WORKDIR /srcRUN sudo ln -f /usr/bin/opam-2.2 /usr/bin/opamRUN opam init --reinit -niRUN uname -rs && opam exec -- ocaml -version && opam --versionWORKDIR /srcRUN sudo chown opam /srcRUN cd ~/opam-repository && (git cat-file -e b876d7d37014df697368765c088aa86d24dc8b6b || git fetch origin master) && git reset -q --hard b876d7d37014df697368765c088aa86d24dc8b6b && git log --no-decorate -n1 --oneline && opam update -uCOPY --chown=1000:1000 eio_windows.opam eio_posix.opam eio_main.opam eio_linux.opam eio.opam ./RUN opam pin add -yn eio_windows.dev './' && \opam pin add -yn eio_posix.dev './' && \opam pin add -yn eio_main.dev './' && \opam pin add -yn eio_linux.dev './' && \opam pin add -yn eio.dev './'ENV DEPS="afl-persistent.1.4 alcotest.1.8.0 astring.0.8.5 backoff.0.1.1 base-bigarray.base base-bytes.base base-domains.base base-nnp.base base-threads.base base-unix.base bigstringaf.0.10.0 camlp-streams.5.0.1 cmdliner.1.3.0 containers.3.14 cppo.1.7.0 crowbar.0.2.1 csexp.1.5.2 cstruct.6.2.0 domain-local-await.1.0.1 domain-local-timeout.1.0.1 dscheck.0.5.0 dune.3.16.0 dune-configurator.3.16.0 either.1.0.0 fmt.0.9.0 hmap.0.8.1 host-arch-arm64.1 host-system-other.1 iomux.0.3 kcas.0.7.0 logs.0.7.0 lwt-dllist.1.0.1 mdx.2.4.1 mtime.2.1.0 multicore-magic.2.3.0 ocaml.5.2.0 ocaml-base-compiler.5.2.0 ocaml-config.3 ocaml-options-vanilla.1 ocaml-syntax-shims.1.0.0 ocaml-version.3.6.9 ocamlbuild.0.15.0 ocamlfind.1.9.6 ocplib-endian.1.2 optint.0.3.0 oseq.0.5.1 psq.0.2.1 re.1.12.0 result.1.5 seq.base stdlib-shims.0.3.0 thread-table.1.0.0 topkg.1.0.7 tsort.2.1.0 uring.0.9 uutf.1.0.3 yojson.2.2.2"ENV CI="true"ENV OCAMLCI="true"RUN opam update --depexts && opam install --cli=2.2 --depext-only -y eio_windows.dev eio_posix.dev eio_main.dev eio_linux.dev eio.dev $DEPSRUN opam install $DEPSCOPY --chown=1000:1000 . /srcRUN opam exec -- dune build @install @check @runtest && rm -rf _buildEND-OF-DOCKERFILEdocker build .END-REPRO-BLOCK2024-10-28 10:43.46: Using cache hint "ocaml-multicore/eio-ocaml/opam:debian-12-ocaml-5.2@sha256:9088f15451f794ea3816962de50eb418af0152755908fe23bc1432336c6d40f8-debian-12-5.2_arm64_opam-2.2-f876418adf708fb3e7478a78acf6234c"2024-10-28 10:43.46: Using OBuilder spec:((from ocaml/opam:debian-12-ocaml-5.2@sha256:9088f15451f794ea3816962de50eb418af0152755908fe23bc1432336c6d40f8)(comment debian-12-5.2_arm64_opam-2.2)(user (uid 1000) (gid 1000))(env CLICOLOR_FORCE 1)(env OPAMCOLOR always)(workdir /src)(run (shell "sudo ln -f /usr/bin/opam-2.2 /usr/bin/opam"))(run (shell "opam init --reinit -ni"))(run (shell "uname -rs && opam exec -- ocaml -version && opam --version"))(workdir /src)(run (shell "sudo chown opam /src"))(run (cache (opam-archives (target /home/opam/.opam/download-cache)))(network host)(shell "cd ~/opam-repository && (git cat-file -e b876d7d37014df697368765c088aa86d24dc8b6b || git fetch origin master) && git reset -q --hard b876d7d37014df697368765c088aa86d24dc8b6b && git log --no-decorate -n1 --oneline && opam update -u"))(copy (src eio_windows.opam eio_posix.opam eio_main.opam eio_linux.opam eio.opam)(dst ./))(run (network host)(shell "opam pin add -yn eio_windows.dev './' && \\nopam pin add -yn eio_posix.dev './' && \\nopam pin add -yn eio_main.dev './' && \\nopam pin add -yn eio_linux.dev './' && \\nopam pin add -yn eio.dev './'"))(env DEPS "afl-persistent.1.4 alcotest.1.8.0 astring.0.8.5 backoff.0.1.1 base-bigarray.base base-bytes.base base-domains.base base-nnp.base base-threads.base base-unix.base bigstringaf.0.10.0 camlp-streams.5.0.1 cmdliner.1.3.0 containers.3.14 cppo.1.7.0 crowbar.0.2.1 csexp.1.5.2 cstruct.6.2.0 domain-local-await.1.0.1 domain-local-timeout.1.0.1 dscheck.0.5.0 dune.3.16.0 dune-configurator.3.16.0 either.1.0.0 fmt.0.9.0 hmap.0.8.1 host-arch-arm64.1 host-system-other.1 iomux.0.3 kcas.0.7.0 logs.0.7.0 lwt-dllist.1.0.1 mdx.2.4.1 mtime.2.1.0 multicore-magic.2.3.0 ocaml.5.2.0 ocaml-base-compiler.5.2.0 ocaml-config.3 ocaml-options-vanilla.1 ocaml-syntax-shims.1.0.0 ocaml-version.3.6.9 ocamlbuild.0.15.0 ocamlfind.1.9.6 ocplib-endian.1.2 optint.0.3.0 oseq.0.5.1 psq.0.2.1 re.1.12.0 result.1.5 seq.base stdlib-shims.0.3.0 thread-table.1.0.0 topkg.1.0.7 tsort.2.1.0 uring.0.9 uutf.1.0.3 yojson.2.2.2")(env CI true)(env OCAMLCI true)(run (cache (opam-archives (target /home/opam/.opam/download-cache)))(network host)(shell "opam update --depexts && opam install --cli=2.2 --depext-only -y eio_windows.dev eio_posix.dev eio_main.dev eio_linux.dev eio.dev $DEPS"))(run (cache (opam-archives (target /home/opam/.opam/download-cache)))(network host)(shell "opam install $DEPS"))(copy (src .) (dst /src))(run (shell "opam exec -- dune build @install @check @runtest && rm -rf _build")))2024-10-28 10:43.46: Waiting for resource in pool OCluster2024-10-28 10:43.46: Waiting for worker…2024-10-28 10:43.46: Got resource from pool OClusterBuilding on okypous.caelum.ci.devHEAD is now at 18b70d0 Removed <!-- $MDX os_type<>Win32 --> to get main test-suite running on WindowsHEAD is now at a280682 tests on the ``chmod`` for eio(from ocaml/opam:debian-12-ocaml-5.2@sha256:9088f15451f794ea3816962de50eb418af0152755908fe23bc1432336c6d40f8)Unable to find image 'ocaml/opam:debian-12-ocaml-5.2@sha256:9088f15451f794ea3816962de50eb418af0152755908fe23bc1432336c6d40f8' locallydocker.io/ocaml/opam@sha256:9088f15451f794ea3816962de50eb418af0152755908fe23bc1432336c6d40f8: Pulling from ocaml/opamc5f1513741f5: Pulling fs layerc5f1513741f5: Verifying Checksumc5f1513741f5: Download completec5f1513741f5: Pull completeDigest: sha256:9088f15451f794ea3816962de50eb418af0152755908fe23bc1432336c6d40f8Status: Downloaded newer image for ocaml/opam@sha256:9088f15451f794ea3816962de50eb418af0152755908fe23bc1432336c6d40f82024-10-28 10:43.47 ---> using "b2075ada1f1512e3dc366901f5a512e248cec3264776a3fcef5e7b7aebbdab89" from cache/: (comment debian-12-5.2_arm64_opam-2.2)/: (user (uid 1000) (gid 1000))/: (env CLICOLOR_FORCE 1)/: (env OPAMCOLOR always)/: (workdir /src)/src: (run (shell "sudo ln -f /usr/bin/opam-2.2 /usr/bin/opam"))2024-10-28 10:43.47 ---> using "3832e694099c86a69d6c26067e9e7b13b37e3eab09d9d348e890da8d2c90eb32" from cache/src: (run (shell "opam init --reinit -ni"))Configuring from /home/opam/.opamrc and then 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 development 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] yFormat upgrade done.<><> Updating repositories ><><><><><><><><><><><><><><><><><><><><><><><><><><>[default] synchronised from file:///home/opam/opam-repository2024-10-28 10:43.47 ---> using "c8659726a1207a3adb0015f332443cc7f50c6e7fffe3dc53b96afdf43ffc0770" from cache/src: (run (shell "uname -rs && opam exec -- ocaml -version && opam --version"))Linux 5.15.0-122-genericThe OCaml toplevel, version 5.2.02.2.12024-10-28 10:43.47 ---> using "4173e64776917270061ce17becc22d6928619be2f1aaa10978c823db9e3dfc3e" from cache/src: (workdir /src)/src: (run (shell "sudo chown opam /src"))2024-10-28 10:43.47 ---> using "26633aaaf11460716d5da24a3bd344ffdfcae4c7d289a47e01b1bfde65b20bf1" from cache/src: (run (cache (opam-archives (target /home/opam/.opam/download-cache)))(network host)(shell "cd ~/opam-repository && (git cat-file -e b876d7d37014df697368765c088aa86d24dc8b6b || git fetch origin master) && git reset -q --hard b876d7d37014df697368765c088aa86d24dc8b6b && git log --no-decorate -n1 --oneline && opam update -u"))From https://github.com/ocaml/opam-repository* branch master -> FETCH_HEAD75006f8c5e..1b4da5019e master -> origin/masterb876d7d370 Merge pull request #26641 from polytypic/release-backoff-0.1.1<><> Updating package repositories ><><><><><><><><><><><><><><><><><><><><><><>[default] synchronised from file:///home/opam/opam-repositoryEverything as up-to-date as possible (run with --verbose to show unavailable upgrades).However, you may "opam upgrade" these packages explicitly, which will ask permission to downgrade or uninstall the conflicting packages.Nothing to do.# Run eval $(opam env) to update the current shell environment2024-10-28 10:43.47 ---> using "5d7a7d70b62d77b789c9830efdfb493dfc7a3e219b704156f3dd5741b16d6786" from cache/src: (copy (src eio_windows.opam eio_posix.opam eio_main.opam eio_linux.opam eio.opam)(dst ./))2024-10-28 10:43.47 ---> using "272f25832355031a827bb27a48d8734f959da44c9aa80607d7c78d19cf1e2ea8" from cache/src: (run (network host)(shell "opam pin add -yn eio_windows.dev './' && \\nopam pin add -yn eio_posix.dev './' && \\nopam pin add -yn eio_main.dev './' && \\nopam pin add -yn eio_linux.dev './' && \\nopam pin add -yn eio.dev './'"))[eio_windows.dev] synchronised (file:///src)eio_windows is now pinned to file:///src (version dev)[eio_posix.dev] synchronised (file:///src)eio_posix is now pinned to file:///src (version dev)[eio_main.dev] synchronised (file:///src)eio_main is now pinned to file:///src (version dev)[eio_linux.dev] synchronised (file:///src)eio_linux is now pinned to file:///src (version dev)[eio.dev] synchronised (file:///src)eio is now pinned to file:///src (version dev)2024-10-28 10:43.47 ---> using "048b111a0d8a630fae7ddcb983b816dcd091126bb1b3c2fbe9abca76f36bdfcb" from cache/src: (env DEPS "afl-persistent.1.4 alcotest.1.8.0 astring.0.8.5 backoff.0.1.1 base-bigarray.base base-bytes.base base-domains.base base-nnp.base base-threads.base base-unix.base bigstringaf.0.10.0 camlp-streams.5.0.1 cmdliner.1.3.0 containers.3.14 cppo.1.7.0 crowbar.0.2.1 csexp.1.5.2 cstruct.6.2.0 domain-local-await.1.0.1 domain-local-timeout.1.0.1 dscheck.0.5.0 dune.3.16.0 dune-configurator.3.16.0 either.1.0.0 fmt.0.9.0 hmap.0.8.1 host-arch-arm64.1 host-system-other.1 iomux.0.3 kcas.0.7.0 logs.0.7.0 lwt-dllist.1.0.1 mdx.2.4.1 mtime.2.1.0 multicore-magic.2.3.0 ocaml.5.2.0 ocaml-base-compiler.5.2.0 ocaml-config.3 ocaml-options-vanilla.1 ocaml-syntax-shims.1.0.0 ocaml-version.3.6.9 ocamlbuild.0.15.0 ocamlfind.1.9.6 ocplib-endian.1.2 optint.0.3.0 oseq.0.5.1 psq.0.2.1 re.1.12.0 result.1.5 seq.base stdlib-shims.0.3.0 thread-table.1.0.0 topkg.1.0.7 tsort.2.1.0 uring.0.9 uutf.1.0.3 yojson.2.2.2")/src: (env CI true)/src: (env OCAMLCI true)/src: (run (cache (opam-archives (target /home/opam/.opam/download-cache)))(network host)(shell "opam update --depexts && opam install --cli=2.2 --depext-only -y eio_windows.dev eio_posix.dev eio_main.dev eio_linux.dev eio.dev $DEPS"))+ /usr/bin/sudo "apt-get" "update"- Hit:1 http://deb.debian.org/debian bookworm InRelease- Get:2 http://deb.debian.org/debian bookworm-updates InRelease [55.4 kB]- Get:3 http://deb.debian.org/debian-security bookworm-security InRelease [48.0 kB]- Get:4 http://deb.debian.org/debian-security bookworm-security/main arm64 Packages [182 kB]- Fetched 286 kB in 0s (682 kB/s)- Reading package lists...-<><> Synchronising pinned packages ><><><><><><><><><><><><><><><><><><><><><><>[eio_main.dev] synchronised (no changes)[eio.dev] synchronised (no changes)[eio_linux.dev] synchronised (no changes)[eio_posix.dev] synchronised (no changes)[eio_windows.dev] synchronised (no changes)[NOTE] Package ocaml-options-vanilla is already installed (current version is 1).[NOTE] Package ocaml-config is already installed (current version is 3).[NOTE] Package ocaml-base-compiler is already installed (current version is 5.2.0).[NOTE] Package ocaml is already installed (current version is 5.2.0).[NOTE] Package host-system-other is already installed (current version is 1).[NOTE] Package host-arch-arm64 is already installed (current version is 1).[NOTE] Package base-unix is already installed (current version is base).[NOTE] Package base-threads is already installed (current version is base).[NOTE] Package base-nnp is already installed (current version is base).[NOTE] Package base-domains is already installed (current version is base).[NOTE] Package base-bigarray is already installed (current version is base).2024-10-28 10:43.47 ---> using "f3d10920f82c9f356e22f3761ed4b75133f9fe4a3c397d08d763b976e1a2cd69" from cache/src: (run (cache (opam-archives (target /home/opam/.opam/download-cache)))(network host)(shell "opam install $DEPS"))[NOTE] Package ocaml-options-vanilla is already installed (current version is 1).[NOTE] Package ocaml-config is already installed (current version is 3).[NOTE] Package ocaml-base-compiler is already installed (current version is 5.2.0).[NOTE] Package ocaml is already installed (current version is 5.2.0).[NOTE] Package host-system-other is already installed (current version is 1).[NOTE] Package host-arch-arm64 is already installed (current version is 1).[NOTE] Package base-unix is already installed (current version is base).[NOTE] Package base-threads is already installed (current version is base).[NOTE] Package base-nnp is already installed (current version is base).[NOTE] Package base-domains is already installed (current version is base).[NOTE] Package base-bigarray is already installed (current version is base).The following actions will be performed:=== install 46 packages- install afl-persistent 1.4- install alcotest 1.8.0- install astring 0.8.5- install backoff 0.1.1- install base-bytes base- install bigstringaf 0.10.0- install camlp-streams 5.0.1- install cmdliner 1.3.0- install containers 3.14- install cppo 1.7.0- install crowbar 0.2.1- install csexp 1.5.2- install cstruct 6.2.0- install domain-local-await 1.0.1- install domain-local-timeout 1.0.1- install dscheck 0.5.0- install dune 3.16.0- install dune-configurator 3.16.0- install either 1.0.0- install fmt 0.9.0- install hmap 0.8.1- install iomux 0.3- install kcas 0.7.0- install logs 0.7.0- install lwt-dllist 1.0.1- install mdx 2.4.1- install mtime 2.1.0- install multicore-magic 2.3.0- install ocaml-syntax-shims 1.0.0- install ocaml-version 3.6.9- install ocamlbuild 0.15.0- install ocamlfind 1.9.6- install ocplib-endian 1.2- install optint 0.3.0- install oseq 0.5.1- install psq 0.2.1- install re 1.12.0- install result 1.5- install seq base- install stdlib-shims 0.3.0- install thread-table 1.0.0- install topkg 1.0.7- install tsort 2.1.0- install uring 0.9- install uutf 1.0.3- install yojson 2.2.2<><> Processing actions <><><><><><><><><><><><><><><><><><><><><><><><><><><><>-> retrieved afl-persistent.1.4 (cached)-> retrieved backoff.0.1.1 (cached)-> retrieved astring.0.8.5 (cached)-> retrieved bigstringaf.0.10.0 (cached)-> retrieved camlp-streams.5.0.1 (cached)-> retrieved alcotest.1.8.0 (cached)-> retrieved cmdliner.1.3.0 (cached)-> retrieved containers.3.14 (cached)-> retrieved cppo.1.7.0 (cached)-> retrieved crowbar.0.2.1 (cached)-> retrieved csexp.1.5.2 (cached)-> retrieved domain-local-await.1.0.1 (cached)-> retrieved domain-local-timeout.1.0.1 (cached)-> retrieved cstruct.6.2.0 (cached)-> retrieved dscheck.0.5.0 (cached)-> retrieved either.1.0.0 (cached)-> retrieved fmt.0.9.0 (cached)-> retrieved hmap.0.8.1 (cached)-> retrieved iomux.0.3 (cached)-> retrieved kcas.0.7.0 (cached)-> retrieved logs.0.7.0 (cached)-> retrieved lwt-dllist.1.0.1 (cached)-> retrieved mdx.2.4.1 (cached)-> retrieved mtime.2.1.0 (cached)-> retrieved multicore-magic.2.3.0 (cached)-> retrieved ocaml-syntax-shims.1.0.0 (cached)-> retrieved ocaml-version.3.6.9 (cached)-> retrieved ocamlbuild.0.15.0 (cached)-> retrieved ocamlfind.1.9.6 (cached)-> retrieved ocplib-endian.1.2 (cached)-> retrieved optint.0.3.0 (cached)-> retrieved oseq.0.5.1 (cached)-> retrieved psq.0.2.1 (cached)-> retrieved result.1.5 (cached)-> retrieved seq.base (cached)-> installed seq.base-> retrieved re.1.12.0 (cached)-> retrieved stdlib-shims.0.3.0 (cached)-> retrieved thread-table.1.0.0 (cached)-> retrieved dune.3.16.0, dune-configurator.3.16.0 (cached)-> retrieved topkg.1.0.7 (cached)-> retrieved tsort.2.1.0 (cached)-> retrieved uring.0.9 (cached)-> retrieved uutf.1.0.3 (cached)-> retrieved yojson.2.2.2 (cached)-> installed cmdliner.1.3.0-> installed ocamlbuild.0.15.0-> installed ocamlfind.1.9.6-> installed base-bytes.base-> installed topkg.1.0.7-> installed hmap.0.8.1-> installed uutf.1.0.3-> installed mtime.2.1.0-> installed fmt.0.9.0-> installed astring.0.8.5-> installed logs.0.7.0-> installed dune.3.16.0-> installed csexp.1.5.2-> installed backoff.0.1.1-> installed camlp-streams.5.0.1-> installed cppo.1.7.0-> installed cstruct.6.2.0-> installed either.1.0.0-> installed lwt-dllist.1.0.1-> installed multicore-magic.2.3.0-> installed ocaml-syntax-shims.1.0.0-> installed ocaml-version.3.6.9-> installed optint.0.3.0-> installed oseq.0.5.1-> installed psq.0.2.1-> installed re.1.12.0-> installed result.1.5-> installed stdlib-shims.0.3.0-> installed thread-table.1.0.0-> installed tsort.2.1.0-> installed yojson.2.2.2-> installed ocplib-endian.1.2-> installed afl-persistent.1.4-> installed domain-local-timeout.1.0.1-> installed domain-local-await.1.0.1-> installed crowbar.0.2.1-> installed kcas.0.7.0-> installed alcotest.1.8.0-> installed dune-configurator.3.16.0-> installed bigstringaf.0.10.0-> installed mdx.2.4.1-> installed iomux.0.3-> installed containers.3.14-> installed uring.0.9-> installed dscheck.0.5.0Done.<><> afl-persistent.1.4 installed successfully ><><><><><><><><><><><><><><><><>=> afl-persistent is installed, but since the current OCaml compiler doesnot enable AFL instrumentation by default, most packages will not beinstrumented and fuzzing with afl-fuzz may not be effective.To globally enable AFL instrumentation, create an OCaml switch like:opam switch create 5.2.0+afl ocaml-variants.5.2.0+options ocaml-option-afl# Run eval $(opam env) to update the current shell environment2024-10-28 10:43.47 ---> using "e094f689369e70dc6bf20830e012cfc4f04d7f4c3a09605718d2d562fc2566ad" from cache/src: (copy (src .) (dst /src))2024-10-28 10:43.47 ---> saved as "e9687f162b68841aecf9ac2e23d3c4df93121e9bf40e856dd4ab9c00d5208d7e"/src: (run (shell "opam exec -- dune build @install @check @runtest && rm -rf _build"))(cd _build/default/fuzz && ./fuzz_inherit_fds.exe)inherit_fds: PASS(cd _build/default/fuzz && ./fuzz_buf_write.exe)random ops: PASS(cd _build/default/fuzz && ./fuzz_buf_read.exe)random ops: PASS(cd _build/default/lib_eio_linux/tests && ./test.exe)Testing `eio_linux'.This run has ID `Z7ZFH1QJ'.[OK] io 0 copy.[OK] io 1 direct_copy.[OK] io 2 poll_add.[OK] io 3 poll_add_busy.[OK] io 4 iovec.[OK] io 5 no_sqe.[OK] io 6 read_exact.[OK] io 7 expose_backend.[OK] io 8 statx.[OK] io 9 signal_race.[OK] io 10 alloc-fixed-or-wait.Full test results in `/src/_build/default/lib_eio_linux/tests/_build/_tests/eio_linux'.Test Successful in 0.006s. 11 tests run.File "tests/fs.md", line 1, characters 0-0:/usr/bin/git --no-pager diff --no-index --color=always -u _build/default/tests/fs.md _build/default/tests/.mdx/fs.md.correcteddiff --git a/_build/default/tests/fs.md b/_build/default/tests/.mdx/fs.md.correctedindex 740553c..1618b51 100644--- a/_build/default/tests/fs.md+++ b/_build/default/tests/.mdx/fs.md.corrected@@ -101,6 +101,11 @@ let try_chmod ~perm path =| exception ex -> Eio.traceln "@[<h>%a@]" Eio.Exn.pp ex```+```mdx-error+Line 91, characters 7-9:+Error: This pattern should not be a unit literal, the expected type is+ follow:bool -> unit+```# Basic test cases@@ -111,16 +116,15 @@ Creating a file and reading it back:let cwd = Eio.Stdenv.cwd env inPath.save ~create:(`Exclusive 0o666) (cwd / "test-file") "my-data";traceln "Got %S" @@ Path.load (cwd / "test-file");;-+Got "my-data"-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```Check the file got the correct permissions (subject to the umask set above):```ocaml# Printf.printf "Perm = %o\n" ((Unix.stat "test-file").st_perm);;-Perm = 644-- : unit = ()+Exception: Unix.Unix_error(Unix.ENOENT, "stat", "test-file")```# Sandboxing@@ -132,8 +136,8 @@ Trying to use cwd to access a file outside of that subtree fails:let cwd = Eio.Stdenv.cwd env inPath.save ~create:(`Exclusive 0o666) (cwd / "../test-file") "my-data";failwith "Should have failed";;-Exception: Eio.Io Fs Permission_denied _,- opening <cwd:../test-file>+Line 1, characters 1-4:+Error: Unbound value run```Trying to use cwd to access an absolute path fails:@@ -143,8 +147,8 @@ Trying to use cwd to access an absolute path fails:let cwd = Eio.Stdenv.cwd env inPath.save ~create:(`Exclusive 0o666) (cwd / "/tmp/test-file") "my-data";failwith "Should have failed";;-Exception: Eio.Io Fs Permission_denied _,- opening <cwd:/tmp/test-file>+Line 1, characters 1-4:+Error: Unbound value run```# Creation modes@@ -157,8 +161,8 @@ Exclusive create fails if already exists:Path.save ~create:(`Exclusive 0o666) (cwd / "test-file") "first-write";Path.save ~create:(`Exclusive 0o666) (cwd / "test-file") "first-write";failwith "Should have failed";;-Exception: Eio.Io Fs Already_exists _,- opening <cwd:test-file>+Line 1, characters 1-4:+Error: Unbound value run```If-missing create succeeds if already exists:@@ -170,8 +174,8 @@ If-missing create succeeds if already exists:Path.save ~create:(`If_missing 0o666) test_file "1st-write-original";Path.save ~create:(`If_missing 0o666) test_file "2nd-write";traceln "Got %S" @@ Path.load test_file;;-+Got "2nd-write-original"-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```Truncate create succeeds if already exists, and truncates:@@ -183,10 +187,10 @@ Truncate create succeeds if already exists, and truncates:Path.save ~create:(`Or_truncate 0o666) test_file "1st-write-original";Path.save ~create:(`Or_truncate 0o666) test_file "2nd-write";traceln "Got %S" @@ Path.load test_file;;-+Got "2nd-write"-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run# Unix.unlink "test-file";;-- : unit = ()+Exception: Unix.Unix_error(Unix.ENOENT, "unlink", "test-file")```Error if no create and doesn't exist:@@ -197,8 +201,8 @@ Error if no create and doesn't exist:let test_file = (cwd / "test-file") inPath.save ~create:`Never test_file "1st-write-original";traceln "Got %S" @@ Path.load test_file;;-Exception: Eio.Io Fs Not_found _,- opening <cwd:test-file>+Line 1, characters 1-4:+Error: Unbound value run```Appending to an existing file:@@ -210,10 +214,10 @@ Appending to an existing file:Path.save ~create:(`Or_truncate 0o666) test_file "1st-write-original";Path.save ~create:`Never ~append:true test_file "2nd-write";traceln "Got %S" @@ Path.load test_file;;-+Got "1st-write-original2nd-write"-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run# Unix.unlink "test-file";;-- : unit = ()+Exception: Unix.Unix_error(Unix.ENOENT, "unlink", "test-file")```# Mkdir@@ -225,13 +229,12 @@ Appending to an existing file:try_mkdir (cwd / "subdir/nested");Path.save ~create:(`Exclusive 0o600) (cwd / "subdir/nested/test-file") "data";();;-+mkdir <cwd:subdir> -> ok-+mkdir <cwd:subdir/nested> -> ok-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run# Unix.unlink "subdir/nested/test-file";Unix.rmdir "subdir/nested";Unix.rmdir "subdir";;-- : unit = ()+Exception: Unix.Unix_error(Unix.ENOENT, "unlink", "subdir/nested/test-file")```Creating directories with nesting, symlinks, etc:@@ -249,13 +252,8 @@ Creating directories with nesting, symlinks, etc:try_mkdir (cwd / "to-subdir");try_mkdir (cwd / "dangle/foo");();;-+mkdir <cwd:subdir> -> ok-+mkdir <cwd:to-subdir/nested> -> ok-+Eio.Io Fs Permission_denied _, creating directory <cwd:to-root/tmp/foo>-+Eio.Io Fs Permission_denied _, creating directory <cwd:../foo>-+Eio.Io Fs Already_exists _, creating directory <cwd:to-subdir>-+Eio.Io Fs Not_found _, creating directory <cwd:dangle/foo>-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```# Split@@ -264,40 +262,55 @@ Creating directories with nesting, symlinks, etc:let fake_dir : Eio.Fs.dir_ty r = Eio.Resource.T ((), Eio.Resource.handler [])let split path = Eio.Path.split (fake_dir, path) |> Option.map (fun ((_, dirname), basename) -> dirname, basename)```+```mdx-error+Line 1, characters 30-31:+Error: Unbound type constructor r+``````ocaml# split "foo/bar";-- : (string * string) option = Some ("foo", "bar")+Line 1, characters 1-6:+Error: Unbound value split# split "/foo/bar";-- : (string * string) option = Some ("/foo", "bar")+Line 1, characters 1-6:+Error: Unbound value split# split "/foo/bar/baz";-- : (string * string) option = Some ("/foo/bar", "baz")+Line 1, characters 1-6:+Error: Unbound value split# split "/foo/bar//baz/";-- : (string * string) option = Some ("/foo/bar", "baz")+Line 1, characters 1-6:+Error: Unbound value split# split "bar";-- : (string * string) option = Some ("", "bar")+Line 1, characters 1-6:+Error: Unbound value split# split "/bar";-- : (string * string) option = Some ("/", "bar")+Line 1, characters 1-6:+Error: Unbound value split# split ".";-- : (string * string) option = Some ("", ".")+Line 1, characters 1-6:+Error: Unbound value split# split "./";-- : (string * string) option = Some ("", ".")+Line 1, characters 1-6:+Error: Unbound value split# split "";-- : (string * string) option = None+Line 1, characters 1-6:+Error: Unbound value split# split "/";-- : (string * string) option = None+Line 1, characters 1-6:+Error: Unbound value split# split "///";-- : (string * string) option = None+Line 1, characters 1-6:+Error: Unbound value split```# Mkdirs@@ -316,12 +329,8 @@ Recursively creating directories with `mkdirs`.try_mkdirs one_more;assert (Eio.Path.is_directory one_more);try_mkdirs (cwd / ".." / "outside");-+mkdirs <cwd:subdir1/subdir2/subdir3> -> ok-+mkdirs <cwd:subdir1/subdir2/subdir3/subdir4> -> ok-+mkdirs <cwd:subdir1/subdir2/subdir3/subdir4> -> ok-+Eio.Io Fs Already_exists _, creating directory <cwd:subdir1/subdir2/subdir3/subdir4>-+Eio.Io Fs Permission_denied _, examining <cwd:..>, creating directory <cwd:../outside>-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```Some edge cases for `mkdirs`.@@ -335,11 +344,8 @@ Some edge cases for `mkdirs`.try_mkdirs (cwd / lots_of_slashes);assert (Eio.Path.is_directory (cwd / lots_of_slashes));try_mkdirs (cwd / "..");;-+Eio.Io Fs Already_exists _, creating directory <cwd:.>-+Eio.Io Fs Already_exists _, creating directory <cwd:././>-+mkdirs <cwd:./test//////////////test> -> ok-+Eio.Io Fs Permission_denied _, creating directory <cwd:..>-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```# Unlink@@ -363,16 +369,8 @@ You can remove a file using unlink:try_write_file ~create:(`Exclusive 0o600) (cwd / "subdir/file2") "data2";try_unlink (cwd / "to-subdir/file2");try_read_file (cwd / "subdir/file2");;-+read <cwd:file> -> "data"-+read <cwd:subdir/file2> -> "data2"-+unlink <cwd:file> -> ok-+unlink <cwd:subdir/file2> -> ok-+Eio.Io Fs Not_found _, opening <cwd:file>-+Eio.Io Fs Not_found _, opening <cwd:subdir/file2>-+write <cwd:subdir/file2> -> ok-+unlink <cwd:to-subdir/file2> -> ok-+Eio.Io Fs Not_found _, opening <cwd:subdir/file2>-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```Removing something that doesn't exist or is out of scope:@@ -385,11 +383,8 @@ Removing something that doesn't exist or is out of scope:try_unlink (cwd / "../foo");try_unlink (cwd / "to-subdir/foo");try_unlink (cwd / "to-root/foo");;-+Eio.Io Fs Not_found _, removing file <cwd:missing>-+Eio.Io Fs Permission_denied _, removing file <cwd:../foo>-+Eio.Io Fs Not_found _, removing file <cwd:to-subdir/foo>-+Eio.Io Fs Permission_denied _, removing file <cwd:to-root/foo>-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```Reads and writes follow symlinks, but unlink operates on the symlink itself:@@ -429,22 +424,8 @@ Reads and writes follow symlinks, but unlink operates on the symlink itself:Path.unlink (cwd / "link1");Path.unlink (cwd / "linkdir");Path.unlink (cwd / "linkroot")-+mkdir <cwd:dir1> -> ok-+write <cwd:dir1/file1> -> ok-+write <cwd:file2> -> ok-+read <cwd:dir1/file1> -> "data1"-+read <cwd:link1> -> "data1"-+read <cwd:linkdir/file1> -> "data1"-+<cwd:dir1/file1> -> regular file-+<cwd:link1> -> symbolic link / regular file-+<cwd:linkdir> -> symbolic link / directory-+<cwd:linkroot> -> symbolic link / Fs Permission_denied _-+<fs:linkroot> -> symbolic link / directory-+chdir "dir1"-+read <cwd:file1> -> "data1"-+chdir ".."-+read <cwd:file2> -> "data2"-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```# Rmdir@@ -466,18 +447,8 @@ Similar to `unlink`, but works on directories:try_mkdir (cwd / "subdir/d3");try_rmdir (cwd / "to-subdir/d3");try_read_dir (cwd / "subdir/d3");;-+mkdir <cwd:d1> -> ok-+mkdir <cwd:subdir/d2> -> ok-+read_dir <cwd:d1> -> []-+read_dir <cwd:subdir/d2> -> []-+rmdir <cwd:d1> -> ok-+rmdir <cwd:subdir/d2> -> ok-+Eio.Io Fs Not_found _, reading directory <cwd:d1>-+Eio.Io Fs Not_found _, reading directory <cwd:subdir/d2>-+mkdir <cwd:subdir/d3> -> ok-+rmdir <cwd:to-subdir/d3> -> ok-+Eio.Io Fs Not_found _, reading directory <cwd:subdir/d3>-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```Removing something that doesn't exist or is out of scope:@@ -490,11 +461,8 @@ Removing something that doesn't exist or is out of scope:try_rmdir (cwd / "../foo");try_rmdir (cwd / "to-subdir/foo");try_rmdir (cwd / "to-root/foo");;-+Eio.Io Fs Not_found _, removing directory <cwd:missing>-+Eio.Io Fs Permission_denied _, removing directory <cwd:../foo>-+Eio.Io Fs Not_found _, removing directory <cwd:to-subdir/foo>-+Eio.Io Fs Permission_denied _, removing directory <cwd:to-root/foo>-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```# Recursive removal@@ -512,14 +480,8 @@ Removing something that doesn't exist or is out of scope:try_rmtree ~missing_ok:true foo;traceln "But not without:";try_rmtree ~missing_ok:false foo;-+mkdirs <cwd:foo/bar/baz> -> ok-+write <cwd:foo/bar/file1> -> ok-+rmtree <cwd:foo> -> ok-+A second rmtree is OK with missing_ok:-+rmtree <cwd:foo> -> ok-+But not without:-+Eio.Io Fs Not_found _, removing file <cwd:foo>-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```# Limiting to a subdirectory@@ -535,10 +497,8 @@ Create a sandbox, write a file with it, then read it from outside:Path.save ~create:(`Exclusive 0o600) (subdir / "test-file") "data";try_mkdir (subdir / "../new-sandbox");traceln "Got %S" @@ Path.load (cwd / "sandbox/test-file");;-+mkdir <cwd:sandbox> -> ok-+Eio.Io Fs Permission_denied _, creating directory <sandbox:../new-sandbox>-+Got "data"-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run``````ocaml@@ -568,17 +528,8 @@ Create a sandbox, write a file with it, then read it from outside:Path.symlink ~link_to:"/" (cwd / "foo/root");reject (cwd / "foo/root/..");reject (cwd / "missing");-+open_dir <cwd:foo/bar> -> OK-+Eio.Io Fs Permission_denied _, opening directory <cwd:..>-+open_dir <cwd:.> -> OK-+Eio.Io Fs Permission_denied _, opening directory <cwd:/>-+open_dir <cwd:foo/bar/..> -> OK-+open_dir <fs:foo/bar> -> OK-+open_dir <cwd:foo/up/foo/bar> -> OK-+Eio.Io Fs Permission_denied _, opening directory <cwd:foo/up/../bar>-+Eio.Io Fs Permission_denied _, opening directory <cwd:foo/root/..>-+Eio.Io Fs Not_found _, opening directory <cwd:missing>-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run# Eio.Exn.Backend.show := false- : unit = ()@@ -603,14 +554,8 @@ Using `cwd` we can't access the parent, but using `fs` we can:);Unix.unlink "test-file";Unix.rmdir "outside-cwd";;-+mkdir <cwd:fs-test> -> ok-+chdir "fs-test"-+Eio.Io Fs Permission_denied _, creating directory <cwd:../outside-cwd>-+Eio.Io Fs Permission_denied _, opening <cwd:../test-file>-+mkdir <fs:../outside-cwd> -> ok-+write <fs:../test-file> -> ok-+chdir ".."-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```Reading directory entries under `cwd` and outside of `cwd`.@@ -629,16 +574,8 @@ Reading directory entries under `cwd` and outside of `cwd`.try_read_dir (tmpdir / "test-3");Path.symlink ~link_to:"test-1" (cwd / "readdir/link-1");try_read_dir (tmpdir / "link-1");-+mkdir <cwd:readdir> -> ok-+mkdir <readdir:test-1> -> ok-+mkdir <readdir:test-2> -> ok-+write <readdir:test-1/file> -> ok-+read_dir <readdir> -> ["test-1"; "test-2"]-+read_dir <readdir:.> -> ["test-1"; "test-2"]-+Eio.Io Fs Permission_denied _, reading directory <readdir:..>-+Eio.Io Fs Not_found _, reading directory <readdir:test-3>-+read_dir <readdir:link-1> -> ["file"]-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```An error from the underlying directory, not the sandbox:@@ -646,14 +583,15 @@ An error from the underlying directory, not the sandbox:```ocaml# run ~clear:["test-no-access"] @@ fun env ->Unix.mkdir "test-no-access" 0;;-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run# run @@ fun env ->let cwd = Eio.Stdenv.cwd env intry_read_dir (cwd / "test-no-access");;-+Eio.Io Fs Permission_denied _, reading directory <cwd:test-no-access>-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run# Unix.chmod "test-no-access" 0o700;;-- : unit = ()+Exception: Unix.Unix_error(Unix.ENOENT, "chmod", "test-no-access")```Can use `fs` to access absolute paths:@@ -667,10 +605,8 @@ Can use `fs` to access absolute paths:traceln "Read %S and got %S" Filename.null (Buffer.contents b);traceln "Trying with cwd instead fails:";Path.with_open_in (cwd / Filename.null) (fun flow -> Eio.Flow.copy flow (Eio.Flow.buffer_sink b));;;-+Read "/dev/null" and got ""-+Trying with cwd instead fails:-Exception: Eio.Io Fs Permission_denied _,- opening <cwd:/dev/null>+Line 1, characters 1-4:+Error: Unbound value run```Symlinking and sandboxing:@@ -686,14 +622,8 @@ Symlinking and sandboxing:try_symlink ~link_to:"hello.txt" (cwd / "world.txt");try_symlink ~link_to:"/" (cwd / "root");try_read_dir (cwd / "root");;-+Eio.Io Fs Permission_denied _, creating symlink <cwd:../world.txt> -> hello.txt-+Eio.Io Fs Permission_denied _, creating symlink <cwd:/world.txt> -> hello.txt-+symlink <cwd:world.txt> -> "hello.txt"-+world.txt -> hello.txt: Hello World!-+Eio.Io Fs Already_exists _, creating symlink <cwd:world.txt> -> hello.txt-+symlink <cwd:root> -> "/"-+Eio.Io Fs Permission_denied _, reading directory <cwd:root>-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```## Streamling lines@@ -705,10 +635,8 @@ Symlinking and sandboxing:Path.with_lines (cwd / "test-data") (fun lines ->Seq.iter (traceln "Line: %s") lines);;-+Line: one-+Line: two-+Line: three-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```# Unix interop@@ -726,8 +654,8 @@ We can get the Unix FD from the flow and use it directly:let got = Unix.read fd (Bytes.create 10) 0 10 intraceln "Read %d bytes from null device" got);;-+Read 0 bytes from null device-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```We can also remove it from the flow completely and take ownership of it.@@ -742,8 +670,8 @@ In that case, `with_open_in` will no longer close it on exit:let got = Unix.read fd (Bytes.create 10) 0 10 intraceln "Read %d bytes from null device" got;Unix.close fd;;-+Read 0 bytes from null device-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```# Use after close@@ -754,8 +682,8 @@ In that case, `with_open_in` will no longer close it on exit:tryfailwith (Path.read_dir closed |> String.concat ",")with Invalid_argument _ -> traceln "Got Invalid_argument for closed FD";;-+Got Invalid_argument for closed FD-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```# Rename@@ -774,35 +702,25 @@ let try_rename t =try_rename (t / "../foo") (t / "foo");Unix.chdir ".."```+```mdx-error+Line 2, characters 5-14:+Error: Unbound value try_mkdir+```Confined:```ocaml# run ~clear:["tmp"; "dir"; "foo"] @@ fun env -> try_rename env#cwd;;-+mkdir <cwd:tmp> -> ok-+rename <cwd:tmp> to <cwd:dir> -> ok-+write <cwd:foo> -> ok-+rename <cwd:foo> to <cwd:dir/bar> -> ok-+read <cwd:dir/bar> -> "FOO"-+rename <dir:bar> to <cwd:foo> -> ok-+read <cwd:foo> -> "FOO"-+Eio.Io Fs Permission_denied _, renaming <cwd:../foo> to <cwd:foo>-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```Unconfined:```ocaml# run @@ fun env -> try_rename env#fs;;-+mkdir <fs:tmp> -> ok-+rename <fs:tmp> to <fs:dir> -> ok-+Eio.Io Fs Already_exists _, opening <fs:foo>-+rename <fs:foo> to <fs:dir/bar> -> ok-+read <fs:dir/bar> -> "FOO"-+rename <dir:bar> to <fs:foo> -> ok-+read <fs:foo> -> "FOO"-+rename <fs:../foo> to <fs:foo> -> ok-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```# Stat@@ -815,9 +733,8 @@ Unconfined:assert (Eio.Path.is_directory (cwd / "stat_subdir"));try_write_file (cwd / "stat_reg") "kingbula" ~create:(`Exclusive 0o600);assert (Eio.Path.is_file (cwd / "stat_reg"));-+mkdir <cwd:stat_subdir> -> ok-+write <cwd:stat_reg> -> ok-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```# Fstatat:@@ -838,16 +755,8 @@ Unconfined:Path.symlink ~link_to:".." (cwd / "parent-symlink");try_stat (cwd / "parent-symlink");try_stat (cwd / "missing1" / "missing2");-+mkdir <cwd:stat_subdir2> -> ok-+<cwd:stat_subdir2> -> directory-+<cwd:symlink> -> symbolic link / directory-+<cwd:broken-symlink> -> symbolic link / Fs Not_found _-+<cwd> -> directory-+<cwd:..> -> Fs Permission_denied _-+<cwd:stat_subdir2/..> -> directory-+<cwd:parent-symlink> -> symbolic link / Fs Permission_denied _-+<cwd:missing1/missing2> -> Fs Not_found _-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```# read_link@@ -863,12 +772,8 @@ Unconfined:try_write_file (cwd / "file") "data" ~create:(`Exclusive 0o600);try_read_link (cwd / "file");try_read_link (cwd / "../unknown");-+read_link <cwd:symlink> -> "file"-+read_link <fs:symlink> -> "file"-+write <cwd:file> -> ok-+Eio.Io _, reading target of symlink <cwd:file>-+Eio.Io Fs Permission_denied _, reading target of symlink <cwd:../unknown>-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```# pread/pwrite@@ -886,8 +791,8 @@ Check reading and writing vectors at arbitrary offsets:let buf2 = Cstruct.create 4 inEio.File.pread_exact file ~file_offset:(Int63.of_int 1) [buf1; buf2];traceln" %S/%S" (Cstruct.to_string buf1) (Cstruct.to_string buf2);;-+ "-ab"/"c123"-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```Reading at the end of a file:@@ -906,9 +811,8 @@ Reading at the end of a file:assert falsewith End_of_file ->traceln "End-of-file";;-+Read "abc"-+End-of-file-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```# Cancelling while readable@@ -924,7 +828,8 @@ Ensure reads can be cancelled promptly, even if there is no need to wait:for _ = 1 to 10 do Eio.Flow.read_exact null buf done;assert false)(fun () -> failwith "Simulated error");;-Exception: Failure "Simulated error".+Line 1, characters 1-4:+Error: Unbound value run```# Native paths@@ -957,19 +862,8 @@ Exception: Failure "Simulated error".test (sub / ".");test (sub / "..");test (sub / "/etc/passwd");-+<fs> -> Some .-+<fs:/> -> Some /-+<fs:/etc/hosts> -> Some /etc/hosts-+<fs:.> -> Some .-+<fs:foo/bar> -> Some ./foo/bar-+<cwd> -> Some .-+<cwd:..> -> Some ./..-+<native-sub> -> Some ./native-sub/-+<native-sub:foo.txt> -> Some ./native-sub/foo.txt-+<native-sub:.> -> Some ./native-sub/.-+<native-sub:..> -> Some ./native-sub/..-+<native-sub:/etc/passwd> -> Some /etc/passwd-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```# Seek, truncate and sync@@ -986,10 +880,8 @@ Exception: Failure "Simulated error".let pos = Eio.File.seek file (Int63.of_int (-1)) `End intraceln "seek from end: %a" Int63.pp pos;Eio.File.sync file; (* (no way to check if this actually worked, but ensure it runs) *)-+seek from start: 3-+relative seek: 5-+seek from end: 9-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```# Extending paths@@ -1007,15 +899,8 @@ Exception: Failure "Simulated error"."", "bar";"/", "";]-+"foo" / "bar" = "foo/bar"-+"foo/" / "bar" = "foo/bar"-+"foo" / "/bar" = "/bar"-+"foo" / "" = "foo/"-+"foo/" / "" = "foo/"-+"" / "" = ""-+"" / "bar" = "bar"-+"/" / "" = "/"-- : unit = ()+Line 1, characters 1-4:+Error: Unbound value run```# Testing ``chmod``@@ -1046,4 +931,8 @@ let () =chmod_test_directory ();Printf.printf "chmod tests completed successfully.\n"-```\ No newline at end of file+```+```mdx-error+Line 2, characters 5-8:+Error: Unbound value run+```"/usr/bin/env" "bash" "-c" "opam exec -- dune build @install @check @runtest && rm -rf _build" failed with exit status 12024-10-28 10:43.54: Job failed: Failed: Build failed