]> gitweb.factorcode.org Git - factor.git/blobdiff - core/io/encodings/ascii/ascii.factor
change ERROR: words from throw-foo back to foo.
[factor.git] / core / io / encodings / ascii / ascii.factor
index 7b7e3e1a3ec8d57417fbfb4dfc1ff16fcacb36b3..2c7a475217c1b2c9d7e15b4b30e1cc11a653cf34 100644 (file)
@@ -8,7 +8,7 @@ SINGLETON: ascii
 
 M: ascii encode-char
     drop
-    over 127 <= [ stream-write1 ] [ throw-encode-error ] if ; inline
+    over 127 <= [ stream-write1 ] [ encode-error ] if ; inline
 
 <PRIVATE
 
@@ -16,7 +16,7 @@ GENERIC: ascii> ( string -- byte-array )
 
 M: string ascii>
     dup aux>>
-    [ [ dup 127 <= [ throw-encode-error ] unless ] B{ } map-as ]
+    [ [ dup 127 <= [ encode-error ] unless ] B{ } map-as ]
     [ string>byte-array-fast ] if ; inline
 
 PRIVATE>