2024-10-31 09:13.13: New job: test ocaml-multicore/eio https://github.com/ocaml-multicore/eio.git#refs/pull/772/head (122b1d13147cddbb0aece09b792e11dc02b14da9) (linux-x86_64:fedora-39-5.2_opam-2.2)Base: ocaml/opam:fedora-39-ocaml-5.2@sha256:a468e96eeef78cc210254eb170161252bada099c6f923d448054a6a5c2d5e6d3Opam 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 122b1d13cat > Dockerfile <<'END-OF-DOCKERFILE'FROM ocaml/opam:fedora-39-ocaml-5.2@sha256:a468e96eeef78cc210254eb170161252bada099c6f923d448054a6a5c2d5e6d3# fedora-39-5.2_opam-2.2USER 1000:1000ENV CLICOLOR_FORCE="1"ENV OPAMCOLOR="always"WORKDIR /srcRUN sudo dnf install -y findutilsRUN 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-x86_64.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-31 09:13.13: Using cache hint "ocaml-multicore/eio-ocaml/opam:fedora-39-ocaml-5.2@sha256:a468e96eeef78cc210254eb170161252bada099c6f923d448054a6a5c2d5e6d3-fedora-39-5.2_opam-2.2-6fe78b3be14f8858307ce0c1b92bd107"2024-10-31 09:13.13: Using OBuilder spec:((from ocaml/opam:fedora-39-ocaml-5.2@sha256:a468e96eeef78cc210254eb170161252bada099c6f923d448054a6a5c2d5e6d3)(comment fedora-39-5.2_opam-2.2)(user (uid 1000) (gid 1000))(env CLICOLOR_FORCE 1)(env OPAMCOLOR always)(workdir /src)(run (network host)(shell "sudo dnf install -y findutils"))(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-x86_64.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-31 09:13.13: Waiting for resource in pool OCluster2024-10-31 09:13.13: Waiting for worker…2024-10-31 09:14.55: Got resource from pool OClusterBuilding on x86-bm-c12.sw.ocaml.orgHEAD is now at 953f3de Update fs.mdHEAD is now at 122b1d1 Update fs.md(from ocaml/opam:fedora-39-ocaml-5.2@sha256:a468e96eeef78cc210254eb170161252bada099c6f923d448054a6a5c2d5e6d3)2024-10-31 09:14.56 ---> using "322a4b18875a999662892805947820ffc1be17ea7b916b9e4aedba06fb28c617" from cache/: (comment fedora-39-5.2_opam-2.2)/: (user (uid 1000) (gid 1000))/: (env CLICOLOR_FORCE 1)/: (env OPAMCOLOR always)/: (workdir /src)/src: (run (network host)(shell "sudo dnf install -y findutils"))Fedora 39 - x86_64 140 kB/s | 28 kB 00:00Fedora 39 openh264 (From Cisco) - x86_64 13 kB/s | 989 B 00:00Fedora 39 - x86_64 - Updates 170 kB/s | 13 kB 00:00Fedora 39 - x86_64 - Updates 2.9 MB/s | 17 MB 00:05Package findutils-1:4.9.0-6.fc39.x86_64 is already installed.Dependencies resolved.Nothing to do.Complete!2024-10-31 09:14.56 ---> using "c1fa2a9d06912c993fc056203200416a6f7d6d043ce756afaaa81028074be5f1" from cache/src: (run (shell "sudo ln -f /usr/bin/opam-2.2 /usr/bin/opam"))2024-10-31 09:14.56 ---> using "d524194a579f82caf70b9a31677040d65b58774af2260d76d3da7aecd5363df3" 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] y[NOTE] The 'jobs' option was reset, its value was 31 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=31 --globalFormat upgrade done.<><> Updating repositories ><><><><><><><><><><><><><><><><><><><><><><><><><><>[default] synchronised from file:///home/opam/opam-repository2024-10-31 09:14.56 ---> using "cdf0cebc285ad78651c613222f5241ac4ee63a10db9f4cc3d5564525960cfd11" 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-31 09:14.56 ---> using "076dcb3d93aff1deec4c1a8c350782d6b490682aa970805a76ffd2510da57929" from cache/src: (workdir /src)/src: (run (shell "sudo chown opam /src"))2024-10-31 09:14.56 ---> using "77c6d7b8c9e05dedf5eab46d67e88ee5ec80cc0363ce80c10944de7c3aaffbea" 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..d872638bdf 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-31 09:14.56 ---> using "3e149a7b4b20022015e49c9e1b010e4c041f67af1bef62b3009e1094d62bd80a" from cache/src: (copy (src eio_windows.opam eio_posix.opam eio_main.opam eio_linux.opam eio.opam)(dst ./))2024-10-31 09:14.56 ---> using "1d613aa1fa288b497757f22cb4b112f97b34583a15940000508ff19f23b0d192" 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-31 09:14.56 ---> using "45e9d62fcb69f91eafc95d4e454d2341675990980a6b78bed065e4e34c3343cf" 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-x86_64.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 "yum" "makecache"- Fedora 39 - x86_64 308 kB/s | 28 kB 00:00- Fedora 39 openh264 (From Cisco) - x86_64 14 kB/s | 989 B 00:00- Fedora 39 - x86_64 - Updates 170 kB/s | 13 kB 00:00- Metadata cache created.<><> Synchronising pinned packages ><><><><><><><><><><><><><><><><><><><><><><>[eio.dev] synchronised (no changes)[eio_linux.dev] synchronised (no changes)[eio_main.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-x86_64 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-31 09:14.56 ---> using "849dfe0dfe20aaebc64cc6214dcdf3aa842d9fe30bd535387193a1b5faeec0bd" 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-x86_64 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 alcotest.1.8.0 (cached)-> retrieved bigstringaf.0.10.0 (cached)-> retrieved camlp-streams.5.0.1 (cached)-> retrieved cmdliner.1.3.0 (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 containers.3.14 (cached)-> retrieved cstruct.6.2.0 (cached)-> retrieved dscheck.0.5.0 (cached)-> retrieved either.1.0.0 (cached)-> retrieved hmap.0.8.1 (cached)-> retrieved fmt.0.9.0 (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 mtime.2.1.0 (cached)-> retrieved multicore-magic.2.3.0 (cached)-> retrieved ocaml-syntax-shims.1.0.0 (cached)-> retrieved mdx.2.4.1 (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 stdlib-shims.0.3.0 (cached)-> retrieved re.1.12.0 (cached)-> retrieved thread-table.1.0.0 (cached)-> retrieved tsort.2.1.0 (cached)-> retrieved topkg.1.0.7 (cached)-> retrieved uutf.1.0.3 (cached)-> retrieved yojson.2.2.2 (cached)-> retrieved dune.3.16.0, dune-configurator.3.16.0 (cached)-> retrieved uring.0.9 (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 lwt-dllist.1.0.1-> 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 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 afl-persistent.1.4-> installed ocplib-endian.1.2-> 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 dscheck.0.5.0-> installed uring.0.9Done.<><> 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-31 09:14.56 ---> using "01347085ee508ee88481790d5246b224de7ce35482b7fc9aa434bc7cb43ddabc" from cache/src: (copy (src .) (dst /src))2024-10-31 09:14.56 ---> saved as "1fb8badb850e2babef680cf4784b513eafa3f0106d1849a655fee47d61f1ceac"/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 `L01WGFX4'.[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.005s. 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 f29b53f..2627360 100644--- a/_build/default/tests/fs.md+++ b/_build/default/tests/.mdx/fs.md.corrected@@ -103,6 +103,16 @@ let try_chmod ~context ~follow ~perm path =Eio.Std.traceln "@[<h>%a@]" Eio.Exn.pp ex```+```mdx-error+Line 91, characters 7-48:+Error: The function Eio.Path.chmod has type+ follow:bool -> perm:int -> [> Eio__.Fs.dir_ty ] Eio.Path.t -> unit+ It is applied to too many arguments+Line 91, characters 28-30:+ Hint: Did you forget a ';'?+Line 91, characters 44-48:+ This extra argument is not expected.+```# Basic test cases@@ -113,16 +123,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@@ -134,8 +143,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:@@ -145,8 +154,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@@ -159,8 +168,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:@@ -172,8 +181,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:@@ -185,10 +194,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:@@ -199,8 +208,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:@@ -212,10 +221,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@@ -227,13 +236,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:@@ -251,13 +259,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@@ -266,40 +269,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@@ -318,12 +336,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`.@@ -337,11 +351,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@@ -365,16 +376,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:@@ -387,11 +390,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:@@ -431,22 +431,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@@ -468,18 +454,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:@@ -492,11 +468,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@@ -514,14 +487,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@@ -537,10 +504,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@@ -570,17 +535,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 = ()@@ -605,14 +561,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`.@@ -631,16 +581,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:@@ -648,14 +590,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:@@ -669,10 +612,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:@@ -688,14 +629,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@@ -707,10 +642,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@@ -728,8 +661,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.@@ -744,8 +677,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@@ -756,8 +689,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@@ -776,35 +709,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@@ -817,9 +740,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:@@ -840,16 +762,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```@@ -866,12 +780,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@@ -889,8 +799,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:@@ -909,9 +819,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@@ -927,7 +836,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@@ -960,19 +870,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@@ -989,10 +888,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@@ -1010,15 +907,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``````ocaml"/usr/bin/env" "bash" "-c" "opam exec -- dune build @install @check @runtest && rm -rf _build" failed with exit status 12024-10-31 09:15.04: Job failed: Failed: Build failed