object
  method close : unit
  method read : int -> MIDI.Multitrack.buffer -> int -> int -> int
end