@@ -65,6 +65,10 @@ defaultUnicodeTableUpperBound = '\xe0000'
65-- system performance. This should not be run in a terminal while it is
65-- system performance. This should not be run in a terminal while it is
66-- controlled by Vty.
66-- controlled by Vty.
68+-- The argument specifies the upper bound code point to test when
69+-- building the table. This allows callers to decide how much of the
70+-- Unicode code point space to scan when building the table.
68-- This does not handle exceptions.
72-- This does not handle exceptions.
69buildUnicodeWidthTable :: Char -> IO UnicodeWidthTable
73buildUnicodeWidthTable :: Char -> IO UnicodeWidthTable
70buildUnicodeWidthTable tableUpperBound = do
74buildUnicodeWidthTable tableUpperBound = do