2008-02-15 20:32:14 -05:00
|
|
|
USING: unicode.syntax unicode.data unicode.breaks
|
|
|
|
unicode.normalize unicode.case unicode.categories
|
2008-02-15 20:54:06 -05:00
|
|
|
parser kernel namespaces ;
|
2007-09-20 18:09:08 -04:00
|
|
|
IN: unicode
|
|
|
|
|
2008-01-09 18:13:26 -05:00
|
|
|
! For now: convenience to load all Unicode vocabs
|
2008-02-15 20:32:14 -05:00
|
|
|
|
|
|
|
[ name>char [ "Invalid character" throw ] unless* ]
|
|
|
|
name>char-hook set-global
|