mkRanges: caveat

This commit is contained in:
Jonathan Daugherty 2020-03-05 10:20:35 -08:00
parent 5ed59bb70d
commit 5435e8f8b3

View File

@ -30,6 +30,9 @@ charWidth c = do
-- run-length encoded ranges. This function assumes the pairs come
-- sorted by character ordinal value. It does not require that the
-- character range is fully covered by the sequence.
--
-- The result of this function is a list of ranges in reverse order
-- relative to the input sequence.
mkRanges :: [(Char, Int)] -> [WidthTableRange]
mkRanges pairs =
let convertedPairs = convert <$> pairs