sig
val
eject : t
->
string list
->
int
Lwt
.t
val
close_tray : t
->
string list
->
int
Lwt
.t
end