type t =
  | Instruction of { short : bool; return : bool; keep : bool; opcode : int }

val of_int : int -> t
val to_int : t -> int
val to_string : t -> string