unicode.data: Fix confusing error with unknown unicode char names.

I had `CHAR: green` instead of `COLOR: green` but the caret pointed to
the whitespace and the message was "Invalid character" like there
was some weird unicode code point it was choking on.

diff --git a/basis/unicode/data/data.factor b/basis/unicode/data/data.factor
index 555b4db55f9747382f65acade3f0523e1e816d53..4fb27058994119c9c5edb09e9f6730f0d008cfec 100644 (file)
--- a/basis/unicode/data/data.factor
+++ b/basis/unicode/data/data.factor
@@ -215,6 +215,8 @@ load-properties properties swap assoc-union! drop
 
 PRIVATE>
 
+ERROR: invalid-unicode-character name ;
+
 [
-    name-map at [ "Invalid character" throw ] unless*
+    name-map ?at [ invalid-unicode-character ] unless
 ] name>char-hook set-global