mirror of
https://github.com/xen-project/xen.git
synced 2026-10-29 10:40:03 +01:00
To stay in line with other parts of the ocaml code base. This requires committing a bunch of mli files in tree. Signed-off-by: Wei Liu <wei.liu2@citrix.com> Acked-by: Christian Lindig <christian.lindig@citrix.com>
14 lines
492 B
OCaml
14 lines
492 B
OCaml
type t = { tid : int; rid : int; ty : Op.operation; data : string; }
|
|
exception Error of string
|
|
exception DataError of string
|
|
external string_of_header : int -> int -> int -> int -> string
|
|
= "stub_string_of_header"
|
|
val create : int -> int -> Op.operation -> string -> t
|
|
val of_partialpkt : Partial.pkt -> t
|
|
val to_string : t -> string
|
|
val unpack : t -> int * int * Op.operation * string
|
|
val get_tid : t -> int
|
|
val get_ty : t -> Op.operation
|
|
val get_data : t -> string
|
|
val get_rid : t -> int
|