?sp:ULine.separator ->
UChar.t #OOChannel.obj_output_channel ->
[ULine.Type.text] OOChannel.obj_output_channel