?onclose:(unit
->
unit)
->
Stdlib
.in_channel
->
Netchannels
.in_obj_channel