use bytes instead of Bytes.t

Co-authored-by: Hannes Mehnert <[email protected]>

src/mirage_net.ml

@@ -53,7 +53,7 @@ module type S = sig
   val pp_error: error Fmt.t
   type t
   val disconnect : t -> unit Lwt.t
-  val write: t -> size:int -> (Bytes.t -> int) -> (unit, error) result Lwt.t
+  val write: t -> size:int -> (bytes -> int) -> (unit, error) result Lwt.t
   val listen: t -> header_size:int -> (string -> unit Lwt.t) -> (unit, error) result Lwt.t
   val mac: t -> Macaddr.t
   val mtu: t -> int

src/mirage_net.mli

@@ -57,7 +57,7 @@ module type S = sig
   (** Disconnect from the network device. While this might take some time to
       complete, it can never result in an error. *)
 
-  val write: t -> size:int -> (Bytes.t -> int) -> (unit, error) result Lwt.t
+  val write: t -> size:int -> (bytes -> int) -> (unit, error) result Lwt.t
   (** [write net ~size fill] allocates a buffer of length [size], where [size]
      must not exceed the interface maximum packet size ({!mtu} plus Ethernet
      header). The allocated buffer is zeroed and passed to the [fill] function