factor/basis/bootstrap/unicode/unicode.factor

6 lines
156 B
Factor
Executable File

USING: strings.parser kernel namespaces unicode.data ;
IN: bootstrap.unicode
[ name>char [ "Invalid character" throw ] unless* ]
name>char-hook set-global