Getting StartedDocumentation
Organisationsmiragemirage736197 ()(lint-fmt)

(lint-fmt)

Link Copied
Code Copied

Logs

Show raw logs
2024-04-25 22:36.19: New job: test mirage/mirage https://github.com/mirage/mirage.git#refs/pull/1521/head (736197e16a439364041af7b531a7be4800c1b78f) (linux-x86_64:(lint-fmt))
Base: ocaml/opam@sha256:e30e92a245a5f284471a3437bd6b19ebfb9ae067e380416fd178b1f6c2290480
ocamlformat version: version 0.26.1 (from opam)


To reproduce locally:


git clone --recursive "https://github.com/mirage/mirage.git" && cd "mirage" && git fetch origin "refs/pull/1521/head" && git reset --hard 736197e1
cat > Dockerfile <<'END-OF-DOCKERFILE'
FROM ocaml/opam@sha256:e30e92a245a5f284471a3437bd6b19ebfb9ae067e380416fd178b1f6c2290480
USER 1000:1000
RUN cd ~/opam-repository && (git cat-file -e a78d61bd5a5f9e1aa605a46b9dd8ea1fe39046f2 || git fetch origin master) && git reset -q --hard a78d61bd5a5f9e1aa605a46b9dd8ea1fe39046f2 && git log --no-decorate -n1 --oneline && opam update -u
RUN opam depext -i dune
WORKDIR /src
RUN opam depext -i ocamlformat=0.26.1
COPY --chown=1000:1000 . /src/
RUN opam exec -- dune build @fmt --ignore-promoted-rules || (echo "dune build @fmt failed"; exit 2)


END-OF-DOCKERFILE
docker build .
END-REPRO-BLOCK


2024-04-25 22:36.19: Using cache hint "mirage/mirage-ocaml/opam@sha256:e30e92a245a5f284471a3437bd6b19ebfb9ae067e380416fd178b1f6c2290480-debian-12-4.08_opam-2.1-ocamlformat-a78d61bd5a5f9e1aa605a46b9dd8ea1fe39046f2"
2024-04-25 22:36.19: Using OBuilder spec:
((from ocaml/opam@sha256:e30e92a245a5f284471a3437bd6b19ebfb9ae067e380416fd178b1f6c2290480)
 (user (uid 1000) (gid 1000))
 (run (cache (opam-archives (target /home/opam/.opam/download-cache)))
      (network host)
      (shell "cd ~/opam-repository && (git cat-file -e a78d61bd5a5f9e1aa605a46b9dd8ea1fe39046f2 || git fetch origin master) && git reset -q --hard a78d61bd5a5f9e1aa605a46b9dd8ea1fe39046f2 && git log --no-decorate -n1 --oneline && opam update -u"))
 (run (cache (opam-archives (target /home/opam/.opam/download-cache)))
      (network host)
      (shell "opam depext -i dune"))
 (workdir /src)
 (run (cache (opam-archives (target /home/opam/.opam/download-cache)))
      (network host)
      (shell "opam depext -i ocamlformat=0.26.1"))
 (copy (src .) (dst /src/))
 (run (shell "opam exec -- dune build @fmt --ignore-promoted-rules || (echo \"dune build @fmt failed\"; exit 2)"))
)


2024-04-25 22:36.19: Waiting for resource in pool OCluster
2024-04-25 22:36.19: Waiting for worker…
2024-04-25 22:36.19: Got resource from pool OCluster
Building on doris.caelum.ci.dev
All commits already cached
HEAD is now at 736197e1 remove no argument check


(from ocaml/opam@sha256:e30e92a245a5f284471a3437bd6b19ebfb9ae067e380416fd178b1f6c2290480)
2024-04-25 22:36.21 ---> using "ca7a47bb337547622343e1e691b0c92596d0990b9ed28342fd47c7204c2b0a74" from cache


/: (user (uid 1000) (gid 1000))


/: (run (cache (opam-archives (target /home/opam/.opam/download-cache)))
        (network host)
        (shell "cd ~/opam-repository && (git cat-file -e a78d61bd5a5f9e1aa605a46b9dd8ea1fe39046f2 || git fetch origin master) && git reset -q --hard a78d61bd5a5f9e1aa605a46b9dd8ea1fe39046f2 && git log --no-decorate -n1 --oneline && opam update -u"))
From https://github.com/ocaml/opam-repository
 * branch                  master     -> FETCH_HEAD
   4bb8cb8b65..543cd221e4  master     -> origin/master
a78d61bd5a ocaml-version 3.6.7


<><> Updating package repositories ><><><><><><><><><><><><><><><><><><><><><><>
[default] synchronised from file:///home/opam/opam-repository
default (at file:///home/opam/opam-repository): 
    [INFO] opam 2.1 includes many performance improvements over 2.0; please consider upgrading (https://opam.ocaml.org/doc/Install.html)


Everything 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 environment
2024-04-25 22:36.21 ---> using "f222038aa0f02f6becd49cb405146e368f1697bc0a30d8a21b233972fa6ef725" from cache


/: (run (cache (opam-archives (target /home/opam/.opam/download-cache)))
        (network host)
        (shell "opam depext -i dune"))
# Detecting depexts using vars: arch=x86_64, os=linux, os-distribution=debian, os-family=debian
# No extra OS packages requirements found.
# All required OS packages found.
# Now letting opam install the packages
The following actions will be performed:
  - install dune 3.15.0


<><> Gathering sources ><><><><><><><><><><><><><><><><><><><><><><><><><><><><>
[dune.3.15.0] found in cache


<><> Processing actions <><><><><><><><><><><><><><><><><><><><><><><><><><><><>
-> installed dune.3.15.0
Done.
# Run eval $(opam env) to update the current shell environment
2024-04-25 22:36.21 ---> using "3cd9177244aa60d8f9e524cb6bd567d04a1db09d2fdf8b02a3e9b8ea1db02d0b" from cache


/: (workdir /src)


/src: (run (cache (opam-archives (target /home/opam/.opam/download-cache)))
           (network host)
           (shell "opam depext -i ocamlformat=0.26.1"))
# Detecting depexts using vars: arch=x86_64, os=linux, os-distribution=debian, os-family=debian
# No extra OS packages requirements found.
# All required OS packages found.
# Now letting opam install the packages
The following actions will be performed:
  - install sexplib0          v0.14.0  [required by base]
  - install ocamlbuild        0.14.3   [required by fpath, astring, uuseg]
  - install menhirCST         20231231 [required by menhir]
  - install dune-build-info   3.15.0   [required by ocamlformat-lib]
  - install either            1.0.0    [required by ocamlformat-lib]
  - install cmdliner          1.2.0    [required by ocamlformat]
  - install menhirSdk         20231231 [required by ocamlformat-lib]
  - install ocamlfind         1.9.6    [required by ocp-indent, astring, fpath, uuseg]
  - install menhirLib         20231231 [required by ocamlformat-lib]
  - install result            1.5      [required by ocamlformat-lib]
  - install seq               base     [required by re]
  - install csexp             1.5.2    [required by ocamlformat-lib]
  - install ocaml-version     3.6.7    [required by ocamlformat-lib]
  - install camlp-streams     5.0.1    [required by ocamlformat-lib]
  - install fix               20230505 [required by ocamlformat-lib]
  - install topkg             1.0.7    [required by fpath, astring, uuseg]
  - install base-bytes        base     [required by ocp-indent]
  - install menhir            20231231 [required by ocamlformat-lib]
  - install re                1.11.0   [required by ocamlformat]
  - install dune-configurator 3.15.0   [required by base]
  - install uutf              1.0.3    [required by ocamlformat-lib]
  - install astring           0.8.5    [required by ocamlformat-lib]
  - install ocp-indent        1.8.1    [required by ocamlformat-lib]
  - install base              v0.14.3  [required by ocamlformat-lib]
  - install uucp              15.0.0   [required by uuseg]
  - install fpath             0.7.3    [required by ocamlformat-lib]
  - install stdio             v0.14.0  [required by ocamlformat-lib]
  - install uuseg             15.0.0   [required by ocamlformat-lib]
  - install ocamlformat-lib   0.26.1   [required by ocamlformat]
  - install ocamlformat       0.26.1
===== 30 to install =====


<><> Gathering sources ><><><><><><><><><><><><><><><><><><><><><><><><><><><><>
[astring.0.8.5] found in cache
[base.v0.14.3] found in cache
[camlp-streams.5.0.1] found in cache
[cmdliner.1.2.0] found in cache
[csexp.1.5.2] found in cache
[dune-build-info.3.15.0] found in cache
[dune-configurator.3.15.0] found in cache
[either.1.0.0] found in cache
[fix.20230505] found in cache
[fpath.0.7.3] found in cache
[menhir.20231231] found in cache
[menhirCST.20231231] found in cache
[menhirLib.20231231] found in cache
[menhirSdk.20231231] found in cache
[ocaml-version.3.6.7] found in cache
[ocamlbuild.0.14.3] found in cache
[ocamlfind.1.9.6] found in cache
[ocamlformat.0.26.1] found in cache
[ocamlformat-lib.0.26.1] found in cache
[ocp-indent.1.8.1] found in cache
[re.1.11.0] found in cache
[result.1.5] found in cache
[sexplib0.v0.14.0] found in cache
[stdio.v0.14.0] found in cache
[topkg.1.0.7] found in cache
[uucp.15.0.0] found in cache
[uuseg.15.0.0] found in cache
[uutf.1.0.3] found in cache


<><> Processing actions <><><><><><><><><><><><><><><><><><><><><><><><><><><><>
-> installed seq.base
-> installed camlp-streams.5.0.1
-> installed csexp.1.5.2
-> installed cmdliner.1.2.0
-> installed either.1.0.0
-> installed fix.20230505
-> installed menhirCST.20231231
-> installed menhirLib.20231231
-> installed menhirSdk.20231231
-> installed ocaml-version.3.6.7
-> installed result.1.5
-> installed sexplib0.v0.14.0
-> installed re.1.11.0
-> installed dune-build-info.3.15.0
-> installed dune-configurator.3.15.0
-> installed ocamlbuild.0.14.3
-> installed ocamlfind.1.9.6
-> installed base-bytes.base
-> installed ocp-indent.1.8.1
-> installed base.v0.14.3
-> installed topkg.1.0.7
-> installed stdio.v0.14.0
-> installed uutf.1.0.3
-> installed menhir.20231231
-> installed astring.0.8.5
-> installed fpath.0.7.3
-> installed uucp.15.0.0
-> installed uuseg.15.0.0
-> installed ocamlformat-lib.0.26.1
-> installed ocamlformat.0.26.1
Done.


<><> ocp-indent.1.8.1 installed successfully ><><><><><><><><><><><><><><><><><>
=> This package requires additional configuration for use in editors. Install package 'user-setup', or manually:


   * for Emacs, add these lines to ~/.emacs:
     (add-to-list 'load-path "/home/opam/.opam/4.08/share/emacs/site-lisp")
     (require 'ocp-indent)


   * for Vim, add this line to ~/.vimrc:
     set rtp^="/home/opam/.opam/4.08/share/ocp-indent/vim"
# Run eval $(opam env) to update the current shell environment
2024-04-25 22:36.21 ---> using "4b18813457f497e77dbdfbd6d11d8a9a296fb382457da3b96a6a4fea0b6f2556" from cache


/src: (copy (src .) (dst /src/))
2024-04-25 22:36.22 ---> saved as "1b91836759a9f5652b967369c0a7cefa840f360fc4334d62820ba6eca6e3d8b6"


/src: (run (shell "opam exec -- dune build @fmt --ignore-promoted-rules || (echo \"dune build @fmt failed\"; exit 2)"))
File "lib/mirage.ml", line 1, characters 0-0:
diff --git a/_build/default/lib/mirage.ml b/_build/default/lib/.formatted/mirage.ml
index d612779..223c688 100644
--- a/_build/default/lib/mirage.ml
+++ b/_build/default/lib/.formatted/mirage.ml
@@ -293,7 +293,8 @@ let delay_startup =
   let packages = [ package ~max:"1.0.0" "duration" ] in
   let connect _ _ = function
     | [ delay_key ] ->
-        code ~pos:__POS__ "%s.sleep_ns (Duration.of_sec %s)" "Mirage_time" delay_key
+        code ~pos:__POS__ "%s.sleep_ns (Duration.of_sec %s)" "Mirage_time"
+          delay_key
     | _ -> Misc.connect_err "delay_startup" 1
   in
   impl ~packages ~runtime_args ~connect "Mirage_runtime" delay
File "lib/devices/mclock.ml", line 1, characters 0-0:
diff --git a/_build/default/lib/devices/mclock.ml b/_build/default/lib/devices/.formatted/mclock.ml
index 353c186..0b239bf 100644
--- a/_build/default/lib/devices/mclock.ml
+++ b/_build/default/lib/devices/.formatted/mclock.ml
@@ -7,7 +7,7 @@ let mclock = typ MCLOCK
 let default_monotonic_clock =
   let packages_v =
     Key.(if_ is_unix)
-      [ package ~sublibs:["unix"] "mirage-clock" ]
-      [ package ~sublibs:["solo5"] "mirage-clock" ]
+      [ package ~sublibs:[ "unix" ] "mirage-clock" ]
+      [ package ~sublibs:[ "solo5" ] "mirage-clock" ]
   in
   impl ~packages_v "Mclock" mclock
File "lib/devices/pclock.ml", line 1, characters 0-0:
diff --git a/_build/default/lib/devices/pclock.ml b/_build/default/lib/devices/.formatted/pclock.ml
index e1c2b2c..577558b 100644
--- a/_build/default/lib/devices/pclock.ml
+++ b/_build/default/lib/devices/.formatted/pclock.ml
@@ -7,7 +7,7 @@ let pclock = typ PCLOCK
 let default_posix_clock =
   let packages_v =
     Key.(if_ is_unix)
-      [ package ~sublibs:["unix"] "mirage-clock" ]
-      [ package ~sublibs:["solo5"] "mirage-clock" ]
+      [ package ~sublibs:[ "unix" ] "mirage-clock" ]
+      [ package ~sublibs:[ "solo5" ] "mirage-clock" ]
   in
   impl ~packages_v "Pclock" pclock
File "lib/devices/random.ml", line 1, characters 0-0:
diff --git a/_build/default/lib/devices/random.ml b/_build/default/lib/devices/.formatted/random.ml
index a8b5cbe..12339f1 100644
--- a/_build/default/lib/devices/random.ml
+++ b/_build/default/lib/devices/.formatted/random.ml
@@ -8,16 +8,14 @@ let random = typ RANDOM
 
 let rng =
   let packages =
-    [
-      package ~min:"0.8.0" ~max:"0.12.0" "mirage-crypto-rng-mirage";
-    ]
+    [ package ~min:"0.8.0" ~max:"0.12.0" "mirage-crypto-rng-mirage" ]
   in
   let connect _ modname _ =
     (* here we could use the boot argument (--prng) to select the RNG! *)
     code ~pos:__POS__ "%s.initialize (module Mirage_crypto_rng.Fortuna)" modname
   in
   impl
-    ~extra_deps:[dep default_time ; dep default_monotonic_clock]
+    ~extra_deps:[ dep default_time; dep default_monotonic_clock ]
     ~packages ~connect "Mirage_crypto_rng_mirage" random
 
 let default_random = rng
File "lib/devices/network.ml", line 1, characters 0-0:
diff --git a/_build/default/lib/devices/network.ml b/_build/default/lib/devices/.formatted/network.ml
index f2719e9..12c17a6 100644
--- a/_build/default/lib/devices/network.ml
+++ b/_build/default/lib/devices/.formatted/network.ml
@@ -12,11 +12,16 @@ let network_conf ?(intf : string runtime_arg option) name =
   let runtime_args = Option.to_list (Option.map Runtime_arg.v intf) in
   let packages_v =
     Key.match_ Key.(value target) @@ function
-    | `Unix -> [ package ~sublibs:["unix"] ~min:"4.0.0" ~max:"5.0.0" "mirage-net-unix" ]
+    | `Unix ->
+        [
+          package ~sublibs:[ "unix" ] ~min:"4.0.0" ~max:"5.0.0"
+            "mirage-net-unix";
+        ]
     | `MacOSX -> failwith "NYI"
     | `Xen -> failwith "NYI"
     | `Qubes -> failwith "NYI"
-    | #Key.mode_solo5 -> [ package ~sublibs:["solo5"] ~min:"4.0.0" ~max:"5.0.0" "mirage-net" ]
+    | #Key.mode_solo5 ->
+        [ package ~sublibs:[ "solo5" ] ~min:"4.0.0" ~max:"5.0.0" "mirage-net" ]
   in
   let connect _ modname = function
     | [] -> code ~pos:__POS__ "%s.connect %S" modname name
File "lib/devices/ip.ml", line 1, characters 0-0:
diff --git a/_build/default/lib/devices/ip.ml b/_build/default/lib/devices/.formatted/ip.ml
index ae00630..1e32cda 100644
--- a/_build/default/lib/devices/ip.ml
+++ b/_build/default/lib/devices/.formatted/ip.ml
@@ -47,7 +47,7 @@ let ipv4_keyed_conf ~ip ?gateway ?no_init random mclock ethernet arp =
           gateway etif arp
     | _ -> err ()
   in
-  let extra_deps = [ dep random ; dep mclock ; dep ethernet ; dep arp ] in
+  let extra_deps = [ dep random; dep mclock; dep ethernet; dep arp ] in
   impl ~extra_deps ~packages_v ~runtime_args ~connect "Static_ipv4" ipv4
 
 let ipv4_dhcp_conf =
@@ -98,7 +98,8 @@ let ipv4_qubes ?(random = default_random) ?(clock = default_monotonic_clock) db
     ethernet arp =
   ipv4_qubes_conf $ db $ random $ clock $ ethernet $ arp
 
-let ipv6_conf ?ip ?gateway ?handle_ra ?no_init network ethernet random time mclock =
+let ipv6_conf ?ip ?gateway ?handle_ra ?no_init network ethernet random time
+    mclock =
   let packages_v = right_tcpip_library ~sublibs:[ "ipv6" ] "tcpip" in
   let runtime_args = runtime_args_opt [ ip; gateway; handle_ra; no_init ] in
   let err () = connect_err "ipv6" 5 ~max:9 in
@@ -114,7 +115,9 @@ let ipv6_conf ?ip ?gateway ?handle_ra ?no_init network ethernet random time mclo
           (pp_opt "cidr") ip (pp_opt "gateway") gateway netif etif
     | _ -> err ()
   in
-  let extra_deps = [ dep network ; dep ethernet ; dep random ; dep time ; dep mclock ] in
+  let extra_deps =
+    [ dep network; dep ethernet; dep random; dep time; dep mclock ]
+  in
   impl ~extra_deps ~packages_v ~runtime_args ~connect "Ipv6" ipv6
 
 let create_ipv6 ?(random = default_random) ?(time = default_time)
@@ -143,7 +146,7 @@ let ipv4v6_conf ?ipv4_only ?ipv6_only ipv4 ipv6 =
           ipv6
     | _ -> err ()
   in
-  let extra_deps = [ dep ipv4 ; dep ipv6 ] in
+  let extra_deps = [ dep ipv4; dep ipv6 ] in
   impl ~extra_deps ~packages_v ~runtime_args ~connect "Ipv4v6" ipv4v6
 
 let keyed_ipv4v6 ~ipv4_only ~ipv6_only ipv4 ipv6 =
File "lib/devices/time.ml", line 1, characters 0-0:
diff --git a/_build/default/lib/devices/time.ml b/_build/default/lib/devices/.formatted/time.ml
index b73013d..227f48b 100644
--- a/_build/default/lib/devices/time.ml
+++ b/_build/default/lib/devices/.formatted/time.ml
@@ -7,7 +7,7 @@ let time = typ TIME
 let default_time =
   let packages_v =
     Key.(if_ is_unix)
-      [ package ~sublibs:["unix"] "mirage-time" ]
-      [ package ~sublibs:["solo5"] "mirage-time" ]
+      [ package ~sublibs:[ "unix" ] "mirage-time" ]
+      [ package ~sublibs:[ "solo5" ] "mirage-time" ]
   in
   impl ~packages_v "Mirage_time" time
File "lib/devices/tcp.ml", line 1, characters 0-0:
diff --git a/_build/default/lib/devices/tcp.ml b/_build/default/lib/devices/.formatted/tcp.ml
index 38bd288..397d2fc 100644
--- a/_build/default/lib/devices/tcp.ml
+++ b/_build/default/lib/devices/.formatted/tcp.ml
@@ -20,7 +20,7 @@ let tcp_direct_func ip time clock random =
         code ~pos:__POS__ "%s.connect %s" modname ip
     | _ -> connect_err "tcp" 4
   in
-  let extra_deps = [ dep ip ; dep time ; dep clock ; dep random ] in
+  let extra_deps = [ dep ip; dep time; dep clock; dep random ] in
   impl ~extra_deps ~packages_v ~connect "Tcp.Flow" tcp
 
 let direct_tcp ?(mclock = default_monotonic_clock) ?(time = default_time)
File "lib/devices/udp.ml", line 1, characters 0-0:
diff --git a/_build/default/lib/devices/udp.ml b/_build/default/lib/devices/.formatted/udp.ml
index 8efb290..5be6adb 100644
--- a/_build/default/lib/devices/udp.ml
+++ b/_build/default/lib/devices/.formatted/udp.ml
@@ -14,10 +14,10 @@ let udpv4v6 : udpv4v6 typ = udp
 let udp_direct_func ip random =
   let packages_v = right_tcpip_library ~sublibs:[ "udp" ] "tcpip" in
   let connect _ modname = function
-    | [ ip ; _random ] -> code ~pos:__POS__ "%s.connect %s" modname ip
+    | [ ip; _random ] -> code ~pos:__POS__ "%s.connect %s" modname ip
     | _ -> connect_err "udp" 2
   in
-  let extra_deps = [ dep ip ; dep random ] in
+  let extra_deps = [ dep ip; dep random ] in
   impl ~packages_v ~extra_deps ~connect "Udp" udp
 
 let direct_udp ?(random = default_random) ip = udp_direct_func ip random
File "lib/devices/stack.ml", line 1, characters 0-0:
diff --git a/_build/default/lib/devices/stack.ml b/_build/default/lib/devices/.formatted/stack.ml
index 3681674..e6861ce 100644
--- a/_build/default/lib/devices/stack.ml
+++ b/_build/default/lib/devices/.formatted/stack.ml
@@ -25,7 +25,8 @@ type stackv4v6 = STACKV4V6
 
 let stackv4v6 = typ STACKV4V6
 
-let stackv4v6_direct_conf time random network ethernet arpv4 ipv4v6 icmpv4 udp tcp =
+let stackv4v6_direct_conf time random network ethernet arpv4 ipv4v6 icmpv4 udp
+    tcp =
   let packages_v = right_tcpip_library ~sublibs:[ "stack-direct" ] "tcpip" in
   let connect _i modname = function
     | [ _t; _r; interface; ethif; arp; ipv4v6; icmpv4; udp; tcp ] ->
@@ -33,8 +34,18 @@ let stackv4v6_direct_conf time random network ethernet arpv4 ipv4v6 icmpv4 udp t
           ethif arp ipv4v6 icmpv4 udp tcp
     | _ -> connect_err "direct stack" 9
   in
-  let extra_deps = [ dep time ; dep random ; dep network ; dep ethernet ;
-                     dep arpv4 ; dep ipv4v6 ; dep icmpv4 ; dep udp ; dep tcp ]
+  let extra_deps =
+    [
+      dep time;
+      dep random;
+      dep network;
+      dep ethernet;
+      dep arpv4;
+      dep ipv4v6;
+      dep icmpv4;
+      dep udp;
+      dep tcp;
+    ]
   in
   impl ~extra_deps ~packages_v ~connect "Tcpip_stack_direct" stackv4v6
 
@@ -43,11 +54,12 @@ let direct_stackv4v6 ?(mclock = default_monotonic_clock)
     network eth arp ipv4 ipv6 =
   let ip = keyed_ipv4v6 ~ipv4_only ~ipv6_only ipv4 ipv6 in
   stackv4v6_direct_conf time random network eth arp ip (Icmp.direct_icmpv4 ipv4)
-  (direct_udp ip)
-  (match tcp with None -> direct_tcp ~mclock ~random ~time ip | Some tcp -> tcp)
+    (direct_udp ip)
+    (match tcp with
+    | None -> direct_tcp ~mclock ~random ~time ip
+    | Some tcp -> tcp)
 
-let static_ipv4v6_stack ?group ?ipv6_config ?ipv4_config ?(arp = arp)
-    ?tcp tap =
+let static_ipv4v6_stack ?group ?ipv6_config ?ipv4_config ?(arp = arp) ?tcp tap =
   let ipv4_only = Runtime_arg.ipv4_only ?group ()
   and ipv6_only = Runtime_arg.ipv6_only ?group () in
   let e = etif tap in
@@ -56,8 +68,8 @@ let static_ipv4v6_stack ?group ?ipv6_config ?ipv4_config ?(arp = arp)
   let i6 = create_ipv6 ?group ?config:ipv6_config ~no_init:ipv4_only tap e in
   direct_stackv4v6 ~ipv4_only ~ipv6_only ?tcp tap e a i4 i6
 
-let generic_ipv4v6_stack p ?group ?ipv6_config ?ipv4_config
-    ?(arp = arp) ?tcp tap =
+let generic_ipv4v6_stack p ?group ?ipv6_config ?ipv4_config ?(arp = arp) ?tcp
+    tap =
   let ipv4_only = Runtime_arg.ipv4_only ?group ()
   and ipv6_only = Runtime_arg.ipv6_only ?group () in
   let e = etif tap in
dune build @fmt failed
"/usr/bin/env" "bash" "-c" "opam exec -- dune build @fmt --ignore-promoted-rules || (echo "dune build @fmt failed"; exit 2)" failed with exit status 2
2024-04-25 22:36.23: Job failed: Failed: Build failed