module Int_set = Set.Make (Int)

module type DEVICE = sig
  type state

  val state : state
  val dei_ports : Int_set.t
  val deo_ports : Int_set.t
  val dei : Machine.machine -> int -> int
  val dei2 : Machine.machine -> int -> int
  val deo : Machine.machine -> int -> int -> unit
end