Refactor the lexer/parser to expose friendlier words for scanning tokens. The preferr...

[factor.git] / basis / colors / constants / constants.factor

diff --git a/basis/colors/constants/constants.factor b/basis/colors/constants/constants.factor
index c17d1069b27533263a456e06c4d69c47d27781df..6f1b3cb951fc796a1a7d565f59fd9dc402f46527 100644 (file)
--- a/basis/colors/constants/constants.factor
+++ b/basis/colors/constants/constants.factor
@@ -30,4 +30,4 @@ ERROR: no-such-color name ;
 : named-color ( name -- color )
     dup colors at [ ] [ no-such-color ] ?if ;
 
-SYNTAX: COLOR: scan named-color suffix! ;
+SYNTAX: COLOR: scan-token named-color suffix! ;