Main.Type.OOChannel.char_output_channel ->
[char] Main.Type.OOChannel.obj_output_channel