2025-05-15 13:38.49: New job: test ocaml-multicore/eio https://github.com/ocaml-multicore/eio.git#refs/pull/796/head (654ca6c40a5309fef22390488a955a84e099c2b9) (freebsd-x86_64:freebsd-14.2-5.3_opam-2.3) Base: freebsd-14.2-ocaml-5.3 Opam project build To reproduce locally: git clone --recursive "https://github.com/ocaml-multicore/eio.git" && cd "eio" && git fetch origin "refs/pull/796/head" && git reset --hard 654ca6c4 cat > Dockerfile <<'END-OF-DOCKERFILE' FROM freebsd-14.2-ocaml-5.3 # freebsd-14.2-5.3_opam-2.3 USER 1000:1000 ENV CLICOLOR_FORCE="1" ENV OPAMCOLOR="always" WORKDIR /src RUN sudo ln -f /usr/local/bin/opam-2.3 /usr/local/bin/opam RUN opam init --reinit -ni RUN uname -rs && opam exec -- ocaml -version && opam --version WORKDIR /src RUN sudo chown opam /src RUN cd ~/opam-repository && (git cat-file -e 43251244857e0b885b9fce935584448f4fca0dcb || git fetch origin master) && git reset -q --hard 43251244857e0b885b9fce935584448f4fca0dcb && git log --no-decorate -n1 --oneline && opam update -u COPY --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 './' RUN echo '(lang dune 3.0)' > './dune-project' ENV DEPS="afl-persistent.1.4 alcotest.1.9.0 astring.0.8.5 backoff.0.1.1 base-bigarray.base base-bytes.base base-domains.base base-effects.base base-nnp.base base-threads.base base-unix.base bigstringaf.0.10.0 camlp-streams.5.0.1 cmdliner.1.3.0 conf-bash.1 containers.3.15 cppo.1.8.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.18.2 dune-configurator.3.18.2 either.1.0.0 fmt.0.10.0 hmap.0.8.1 iomux.0.3 kcas.0.7.0 logs.0.8.0 lwt-dllist.1.1.0 mdx.2.5.0 mtime.2.1.0 multicore-magic.2.3.1 ocaml.5.3.0 ocaml-base-compiler.5.3.0 ocaml-compiler.5.3.0 ocaml-config.3 ocaml-options-vanilla.1 ocaml-syntax-shims.1.0.0 ocaml-version.4.0.0 ocamlbuild.0.16.1 ocamlfind.1.9.8 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.8 tsort.2.2.0 uutf.1.0.4 yojson.2.2.2" ENV CI="true" ENV OCAMLCI="true" RUN opam update --depexts && opam install --cli=2.3 --depext-only -y eio_windows.dev eio_posix.dev eio_main.dev eio.dev $DEPS RUN opam install $DEPS COPY --chown=1000:1000 . /src RUN opam exec -- dune build --only-packages=eio_windows,eio_posix,eio_main,eio @install @check @runtest && rm -rf _build END-OF-DOCKERFILE docker build . END-REPRO-BLOCK 2025-05-15 13:38.49: Using cache hint "ocaml-multicore/eio-freebsd-14.2-ocaml-5.3-freebsd-14.2-5.3_opam-2.3-09def6b983cc0df4782e7973eb74e507" 2025-05-15 13:38.49: Using OBuilder spec: ((from freebsd-14.2-ocaml-5.3) (comment freebsd-14.2-5.3_opam-2.3) (user (uid 1000) (gid 1000)) (env CLICOLOR_FORCE 1) (env OPAMCOLOR always) (workdir /src) (run (shell "sudo ln -f /usr/local/bin/opam-2.3 /usr/local/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 43251244857e0b885b9fce935584448f4fca0dcb || git fetch origin master) && git reset -q --hard 43251244857e0b885b9fce935584448f4fca0dcb && 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 './'")) (run (network host) (shell "echo '(lang dune 3.0)' > './dune-project'")) (env DEPS "afl-persistent.1.4 alcotest.1.9.0 astring.0.8.5 backoff.0.1.1 base-bigarray.base base-bytes.base base-domains.base base-effects.base base-nnp.base base-threads.base base-unix.base bigstringaf.0.10.0 camlp-streams.5.0.1 cmdliner.1.3.0 conf-bash.1 containers.3.15 cppo.1.8.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.18.2 dune-configurator.3.18.2 either.1.0.0 fmt.0.10.0 hmap.0.8.1 iomux.0.3 kcas.0.7.0 logs.0.8.0 lwt-dllist.1.1.0 mdx.2.5.0 mtime.2.1.0 multicore-magic.2.3.1 ocaml.5.3.0 ocaml-base-compiler.5.3.0 ocaml-compiler.5.3.0 ocaml-config.3 ocaml-options-vanilla.1 ocaml-syntax-shims.1.0.0 ocaml-version.4.0.0 ocamlbuild.0.16.1 ocamlfind.1.9.8 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.8 tsort.2.2.0 uutf.1.0.4 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.3 --depext-only -y eio_windows.dev eio_posix.dev eio_main.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 --only-packages=eio_windows,eio_posix,eio_main,eio @install @check @runtest && rm -rf _build")) ) 2025-05-15 13:38.49: Waiting for resource in pool OCluster 2025-05-15 13:38.49: Waiting for worker… 2025-05-15 13:38.49: Got resource from pool OCluster Building on rosemary All commits already cached HEAD is now at 654ca6c Introduce Buf_write.of_flow (from freebsd-14.2-ocaml-5.3) 2025-05-15 13:38.51 ---> using "47c9a03b962be450225081ed69acde1f5c6dadb6d1106d9b1a8b4fd61c2defa6" from cache /: (comment freebsd-14.2-5.3_opam-2.3) /: (user (uid 1000) (gid 1000)) /: (env CLICOLOR_FORCE 1) /: (env OPAMCOLOR always) /: (workdir /src) /src: (run (shell "sudo ln -f /usr/local/bin/opam-2.3 /usr/local/bin/opam")) 2025-05-15 13:38.51 ---> using "6c919feff42b8acbece064f547886f17e62a0f8c652c95803d5cc1a0edc05bf0" from cache /src: (run (shell "opam init --reinit -ni")) No configuration file found, using 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.1 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 1 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=1 --global Format upgrade done. <><> Updating repositories ><><><><><><><><><><><><><><><><><><><><><><><><><><> [default] no changes from git+file:///home/opam/opam-repository 2025-05-15 13:38.52 ---> using "ef1aecc2d79e0d6d7a69975e03fbee48aae321cc5ded967c4b85817abcd33408" from cache /src: (run (shell "uname -rs && opam exec -- ocaml -version && opam --version")) FreeBSD 14.2-RELEASE-p1 The OCaml toplevel, version 5.3.0 2.3.0 2025-05-15 13:38.52 ---> using "b81c61e28dd398a2621aef3fc778c808fda4399fe66dbfb28a40b55bd44ce32a" from cache /src: (workdir /src) /src: (run (shell "sudo chown opam /src")) 2025-05-15 13:38.52 ---> using "46859cd3f1ed5f6081f98d282b27cc9fcab2b0b04b4be45ac52d723eb6d8a59e" from cache /src: (run (cache (opam-archives (target /home/opam/.opam/download-cache))) (network host) (shell "cd ~/opam-repository && (git cat-file -e 43251244857e0b885b9fce935584448f4fca0dcb || git fetch origin master) && git reset -q --hard 43251244857e0b885b9fce935584448f4fca0dcb && git log --no-decorate -n1 --oneline && opam update -u")) From https://github.com/ocaml/opam-repository * branch master -> FETCH_HEAD 0d013e603b..8efeb9aa26 master -> origin/master 4325124485 Merge pull request #27868 from shonfeder/mark-iomux-unavailable-on-windows <><> Updating package repositories ><><><><><><><><><><><><><><><><><><><><><><> [default] synchronised from git+file:///home/opam/opam-repository Everything as up-to-date as possible (run with --verbose to show unavailable upgrades). The following packages are not being upgraded because the new versions conflict with other installed packages: - ocaml.5.5.0 - ocaml-compiler.5.5 ∗ ocaml-base-compiler.5.3.0 is installed and requires ocaml-compiler = 5.3.0 However, you may "opam upgrade" these packages explicitly, which will ask permission to downgrade or uninstall the conflicting packages. Nothing to do. 2025-05-15 13:38.53 ---> using "3b9ed6be915b17727d610ba8080a4bd5a4bc17b79dae45d38a3641316dd81817" from cache /src: (copy (src eio_windows.opam eio_posix.opam eio_main.opam eio_linux.opam eio.opam) (dst ./)) 2025-05-15 13:38.53 ---> using "cb5b67fed0bab569530c6e16d25189f32675a9732e65746b2d364a77b4d5f0c8" 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) 2025-05-15 13:38.53 ---> using "4eda1037b5306e16426855f663aefd7fae45ec3d67f3c03a3b5b018894adb5f8" from cache /src: (run (network host) (shell "echo '(lang dune 3.0)' > './dune-project'")) 2025-05-15 13:38.54 ---> using "9af2f6561984551a228969707fbaedef99dfa6635cf05980b0eed8c70acf6364" from cache /src: (env DEPS "afl-persistent.1.4 alcotest.1.9.0 astring.0.8.5 backoff.0.1.1 base-bigarray.base base-bytes.base base-domains.base base-effects.base base-nnp.base base-threads.base base-unix.base bigstringaf.0.10.0 camlp-streams.5.0.1 cmdliner.1.3.0 conf-bash.1 containers.3.15 cppo.1.8.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.18.2 dune-configurator.3.18.2 either.1.0.0 fmt.0.10.0 hmap.0.8.1 iomux.0.3 kcas.0.7.0 logs.0.8.0 lwt-dllist.1.1.0 mdx.2.5.0 mtime.2.1.0 multicore-magic.2.3.1 ocaml.5.3.0 ocaml-base-compiler.5.3.0 ocaml-compiler.5.3.0 ocaml-config.3 ocaml-options-vanilla.1 ocaml-syntax-shims.1.0.0 ocaml-version.4.0.0 ocamlbuild.0.16.1 ocamlfind.1.9.8 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.8 tsort.2.2.0 uutf.1.0.4 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.3 --depext-only -y eio_windows.dev eio_posix.dev eio_main.dev eio.dev $DEPS")) [WARNING] Unknown update command for bsd, skipping system update <><> Synchronising pinned packages ><><><><><><><><><><><><><><><><><><><><><><> [eio.dev] synchronised (file:///src) [eio_posix.dev] synchronised (file:///src) [eio_main.dev] synchronised (file:///src) [eio_windows.dev] synchronised (file:///src) [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-compiler is already installed (current version is 5.3.0). [NOTE] Package ocaml-base-compiler is already installed (current version is 5.3.0). [NOTE] Package ocaml is already installed (current version is 5.3.0). [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-effects 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). 2025-05-15 13:38.54 ---> using "d745fc7b31edc493144011b484e06cd9b958e922466a3d6c34125172e861e1f2" 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-compiler is already installed (current version is 5.3.0). [NOTE] Package ocaml-base-compiler is already installed (current version is 5.3.0). [NOTE] Package ocaml is already installed (current version is 5.3.0). [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-effects 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 ∗ afl-persistent 1.4 ∗ alcotest 1.9.0 ∗ astring 0.8.5 ∗ backoff 0.1.1 ∗ base-bytes base ∗ bigstringaf 0.10.0 ∗ camlp-streams 5.0.1 ∗ cmdliner 1.3.0 ∗ conf-bash 1 ∗ containers 3.15 ∗ cppo 1.8.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.18.2 ∗ dune-configurator 3.18.2 ∗ either 1.0.0 ∗ fmt 0.10.0 ∗ hmap 0.8.1 ∗ iomux 0.3 ∗ kcas 0.7.0 ∗ logs 0.8.0 ∗ lwt-dllist 1.1.0 ∗ mdx 2.5.0 ∗ mtime 2.1.0 ∗ multicore-magic 2.3.1 ∗ ocaml-syntax-shims 1.0.0 ∗ ocaml-version 4.0.0 ∗ ocamlbuild 0.16.1 ∗ ocamlfind 1.9.8 ∗ 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.8 ∗ tsort 2.2.0 ∗ uutf 1.0.4 ∗ 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) ∗ installed conf-bash.1 ⬇ retrieved cmdliner.1.3.0 (cached) ⬇ retrieved alcotest.1.9.0 (cached) ⬇ retrieved cppo.1.8.0 (cached) ⬇ retrieved crowbar.0.2.1 (cached) ⬇ retrieved csexp.1.5.2 (cached) ⬇ retrieved containers.3.15 (cached) ⬇ retrieved domain-local-await.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.10.0 (cached) ⬇ retrieved hmap.0.8.1 (cached) ⬇ retrieved iomux.0.3 (cached) ⬇ retrieved domain-local-timeout.1.0.1 (https://github.com/ocaml-multicore/domain-local-timeout/releases/download/1.0.1/domain-local-timeout-1.0.1.tbz) ⬇ retrieved logs.0.8.0 (cached) ⬇ retrieved lwt-dllist.1.1.0 (cached) ⬇ retrieved kcas.0.7.0 (https://github.com/ocaml-multicore/kcas/archive/refs/tags/0.7.0.tar.gz) ⬇ retrieved mdx.2.5.0 (cached) ⬇ retrieved mtime.2.1.0 (cached) ⬇ retrieved multicore-magic.2.3.1 (cached) ⬇ retrieved ocaml-syntax-shims.1.0.0 (cached) ⬇ retrieved ocaml-version.4.0.0 (cached) ⬇ retrieved ocamlfind.1.9.8 (cached) ⬇ retrieved ocplib-endian.1.2 (cached) ⬇ retrieved ocamlbuild.0.16.1 (cached) ⬇ retrieved oseq.0.5.1 (cached) ⬇ retrieved optint.0.3.0 (cached) ⬇ retrieved psq.0.2.1 (cached) ⬇ retrieved re.1.12.0 (cached) ⬇ retrieved seq.base (cached) ∗ installed seq.base ⬇ retrieved stdlib-shims.0.3.0 (cached) ⬇ retrieved result.1.5 (cached) ⬇ retrieved thread-table.1.0.0 (cached) ⬇ retrieved tsort.2.2.0 (cached) ⬇ retrieved uutf.1.0.4 (cached) ⬇ retrieved topkg.1.0.8 (cached) ⬇ retrieved yojson.2.2.2 (cached) ⬇ retrieved dune.3.18.2, dune-configurator.3.18.2 (cached) ∗ installed cmdliner.1.3.0 ∗ installed ocamlbuild.0.16.1 ∗ installed ocamlfind.1.9.8 ∗ installed base-bytes.base ∗ installed topkg.1.0.8 ∗ installed hmap.0.8.1 ∗ installed mtime.2.1.0 ∗ installed uutf.1.0.4 ∗ installed fmt.0.10.0 ∗ installed astring.0.8.5 ∗ installed logs.0.8.0 ∗ installed dune.3.18.2 ∗ installed tsort.2.2.0 ∗ installed thread-table.1.0.0 ∗ installed stdlib-shims.0.3.0 ∗ installed result.1.5 ∗ installed psq.0.2.1 ∗ installed oseq.0.5.1 ∗ installed optint.0.3.0 ∗ installed ocaml-version.4.0.0 ∗ installed ocaml-syntax-shims.1.0.0 ∗ installed multicore-magic.2.3.1 ∗ installed lwt-dllist.1.1.0 ∗ installed either.1.0.0 ∗ installed cstruct.6.2.0 ∗ installed csexp.1.5.2 ∗ installed domain-local-timeout.1.0.1 ∗ installed domain-local-await.1.0.1 ∗ installed yojson.2.2.2 ∗ installed re.1.12.0 ∗ installed cppo.1.8.0 ∗ installed camlp-streams.5.0.1 ∗ installed ocplib-endian.1.2 ∗ installed backoff.0.1.1 ∗ installed afl-persistent.1.4 ∗ installed kcas.0.7.0 ∗ installed dune-configurator.3.18.2 ∗ installed alcotest.1.9.0 ∗ installed crowbar.0.2.1 ∗ installed bigstringaf.0.10.0 ∗ installed iomux.0.3 ∗ installed mdx.2.5.0 ∗ installed containers.3.15 ∗ installed dscheck.0.5.0 Done. <><> afl-persistent.1.4 installed successfully ><><><><><><><><><><><><><><><><> => afl-persistent is installed, but since the current OCaml compiler does not enable AFL instrumentation by default, most packages will not be instrumented and fuzzing with afl-fuzz may not be effective. To globally enable AFL instrumentation, create an OCaml switch like: opam switch create 5.3.0+afl ocaml-variants.5.3.0+options ocaml-option-afl 2025-05-15 13:40.27 ---> saved as "446e3c395bec86013beaa43eb99f4f6b1d930aadbd284530a00ed2934c89e462" /src: (copy (src .) (dst /src)) 2025-05-15 13:40.28 ---> saved as "d40584378c0a2c0444afdb2c02c0654597dbf73c0f6363637246b9db46d460c6" /src: (run (shell "opam exec -- dune build --only-packages=eio_windows,eio_posix,eio_main,eio @install @check @runtest && rm -rf _build")) File "fuzz/dune", line 4, characters 23-37: 4 | (names fuzz_buf_read fuzz_buf_write fuzz_inherit_fds)) ^^^^^^^^^^^^^^ (cd _build/default/fuzz && ./fuzz_buf_write.exe) random ops: FAIL When given the input: [[#2 schedule_cstruct:""]; false] the test threw an exception: Eio_mock__Backend.Deadlock_detected Raised at Eio_mock__Backend.run_full in file "lib_eio/mock/backend.ml", line 112, characters 12-35 Called from Crowbar.gen_apply.go.(fun) in file "src/crowbar.ml", line 325, characters 16-19 (cd _build/default/fuzz && ./fuzz_inherit_fds.exe) inherit_fds: PASS (cd _build/default/fuzz && ./fuzz_buf_read.exe) random ops: PASS File "tests/buf_write.md", line 1, characters 0-0: /usr/local/bin/git --no-pager diff --no-index --color=always -u _build/default/tests/buf_write.md _build/default/tests/.mdx/buf_write.md.corrected diff --git a/_build/default/tests/buf_write.md b/_build/default/tests/.mdx/buf_write.md.corrected index a5855d7..13e02ea 100644 --- a/_build/default/tests/buf_write.md +++ b/_build/default/tests/.mdx/buf_write.md.corrected @@ -17,7 +17,7 @@ let flow = Eio_mock.Flow.make "flow" Write.with_flow flow @@ fun w -> Write.string w "Hello"; Write.char w ' '; Write.string w "world";; +flow: wrote "Hello world" -- : unit = () +Exception: Eio_mock__Backend.Deadlock_detected. ``` ## Auto-commit @@ -32,7 +32,7 @@ If we yield then we flush the data so far: Write.string w "world";; +flow: wrote "Hello " +flow: wrote "world" -- : unit = () +Exception: Eio_mock__Backend.Deadlock_detected. ``` ## Read source buffer @@ -47,7 +47,7 @@ If supported by the flow, we can avoid copying: Write.schedule_cstruct w (Cstruct.of_string "world"); Write.char w '!';; +flow: wrote ["Hello "; "world"; "!"] -- : unit = () +Exception: Eio_mock__Backend.Deadlock_detected. ``` ## Pausing @@ -62,7 +62,7 @@ Without pausing: Write.string w "world";; +flow: wrote "Hello... " +flow: wrote "world" -- : unit = () +Exception: Eio_mock__Backend.Deadlock_detected. ``` With pausing @@ -76,7 +76,7 @@ With pausing Write.unpause w; Write.string w "world";; +flow: wrote ["Hello... "; "world"] -- : unit = () +Exception: Eio_mock__Backend.Deadlock_detected. ``` ## Empty writes @@ -88,7 +88,7 @@ With pausing Write.bytes t (Bytes.make 0 '\000'); Write.cstruct t Cstruct.empty; Write.schedule_cstruct t Cstruct.empty;; -- : unit = () +Exception: Eio_mock__Backend.Deadlock_detected. ``` ## Endianness @@ -101,7 +101,7 @@ With pausing Write.BE.uint16 t 5;; +flow: wrote "\005\000" +flow: wrote "\000\005" -- : unit = () +Exception: Eio_mock__Backend.Deadlock_detected. ``` ## Writes @@ -120,7 +120,7 @@ With pausing +flow: wrote "test" +flow: wrote "test" +flow: wrote "A" -- : unit = () +Exception: Eio_mock__Backend.Deadlock_detected. ``` ## Multiple writes @@ -141,9 +141,7 @@ With pausing Write.with_flow ~initial_size:1 flow f;; +With room: +flow: wrote "testtestte" -+Without room: -+flow: wrote ["te"; "st"; "te"; "st"; "te"] -- : unit = () +Exception: Eio_mock__Backend.Deadlock_detected. ``` ## Formatting @@ -181,7 +179,7 @@ With pausing +flow: wrote "tcp:[::1]:8080This is a second call to printf\n" + "\n" +flow: wrote "Flushed. Goodbye\n" -- : unit = () +Exception: Eio_mock__Backend.Deadlock_detected. ``` ## Flushing @@ -214,7 +212,7 @@ Eio_mock.Flow.on_copy_bytes flow [ +flow: wrote "Hel" +flow: wrote "lo" +Flushed -- : unit = () +Exception: Eio_mock__Backend.Deadlock_detected. ``` Multiple flushes: @@ -242,7 +240,7 @@ Multiple flushes: +flow: wrote "f" +3rd flush +Done -- : unit = () +Exception: Eio_mock__Backend.Deadlock_detected. ``` Check flush waits for the write to succeed: @@ -278,7 +276,7 @@ let slow_writer = traceln "Flush complete" +Write "test" +Flush complete -- : unit = () +Exception: Eio_mock__Backend.Deadlock_detected. ``` ## Scheduling @@ -299,7 +297,7 @@ let slow_writer = +flow: wrote ["one"; "two"] +flow: wrote "end" +Should all be flushed by now. -- : unit = () +Exception: Eio_mock__Backend.Deadlock_detected. ``` ## Cancellation @@ -339,7 +337,7 @@ Exception: Failure "Simulated error". Write.with_flow flow @@ fun t -> try Write.string t "hi" ~off:100; assert false with Invalid_argument _ -> ();; -- : unit = () +Exception: Eio_mock__Backend.Deadlock_detected. ``` ## Serialize @@ -399,8 +397,6 @@ We still flush the output on error: Write.string t "foo"; failwith "Simulated error";; +flow: wrote "f" -+flow: wrote "o" -+flow: wrote "o" Exception: Failure "Simulated error". ``` @@ -480,7 +476,7 @@ But the flush does succeed in the normal case: +flow: wrote "fo" +flow: wrote "o" +Flush succeeded -- : unit = () +Exception: Eio_mock__Backend.Deadlock_detected. ``` If we don't pass a switch then we can still cancel flushes manually: 2025-05-15 14:38.49: Cancelling: Timeout (60.0 minutes) Job cancelled 2025-05-15 14:38.50: Timeout (60.0 minutes)