Main.Type.OOChannel.char_input_channel ->
[char] Main.Type.OOChannel.obj_input_channel