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

[factor.git] / basis / io / encodings / euc / euc.factor

diff --git a/basis/io/encodings/euc/euc.factor b/basis/io/encodings/euc/euc.factor
index bf882fcfd02ac4def4eaa47bff8cb91677bcd6d4..a61046a5c7c53ffaed97b3e45b6d535f69610355 100644 (file)
--- a/basis/io/encodings/euc/euc.factor
+++ b/basis/io/encodings/euc/euc.factor
@@ -65,4 +65,4 @@ PRIVATE>
 
 SYNTAX: EUC:
     ! EUC: euc-kr "vocab:io/encodings/korean/cp949.txt"
-    CREATE-CLASS scan-object define-euc ;
+    scan-new-class scan-object define-euc ;