sig
  type t = {
    prio : int;
    cfi : bool;
    id : int;
    proto : Arp.HwProto.t;
    payload : Tools.Payload.t;
  }
  val make :
    ?prio:int ->
    ?cfi:bool -> int -> Arp.HwProto.t -> Tools.Payload.outer_t -> Vlan.Pdu.t
  val random : unit -> Vlan.Pdu.t
  val pack : Vlan.Pdu.t -> Bitstring.bitstring
  val unpack : string * int * int -> Vlan.Pdu.t option
end