@@ -216,8 +216,8 @@ snoc_text_span a text_str mrow_ops skip_col y remaining_columns = do
216 then if ow' == remaining_columns
216 then if ow' == remaining_columns
217 then ( ow', dw', char_count', b0 )
217 then ( ow', dw', char_count', b0 )
218 else if (w' + ow') > remaining_columns
218 else if (w' + ow') > remaining_columns
219− then ( remaining_columns, dw', char_count' + ooverflow, B.append b0 $ B.pack $ encode $ genericReplicate ooverflow '…' )
219+ then ( remaining_columns, dw', char_count' + ooverflow, B.append b0 $ B.pack $ encode $ genericReplicate ooverflow '…' )
220− else ( ow' + w', dw', char_count' + 1, B.append b0 $ B.pack $ encode [c] )
220+ else ( ow' + w', dw', char_count' + 1, B.append b0 $ B.pack $ encode [c] )
221 else if (w' + dw') > skip_col
221 else if (w' + dw') > skip_col
222 then ( doverflow, skip_col, doverflow, B.append b0 $ B.pack $ encode $ genericReplicate doverflow '…' )
222 then ( doverflow, skip_col, doverflow, B.append b0 $ B.pack $ encode $ genericReplicate doverflow '…' )
223 else ( ow', w' + dw', char_count', b0 )
223 else ( ow', w' + dw', char_count', b0 )