module Kwchan:sig
..end
type
src = {
|
mutable opened : |
|
c : |
|
s : |
|
mutable l : |
module Chan:sig
..end
module String:sig
..end
val getline : src -> string
val read : src -> string
val rewind : src -> unit