Revert "io.encodings: string>byte-array-fast can use (byte-array)."

This reverts commit f9881290cdb3238365f0bc5d126325236b4c2123.
2014-03-07 09:46:19 -08:00 · 2014-03-07 09:46:19 -08:00 · 72453cdc99
parent 985faa7ec7
commit 72453cdc99
1 changed files with 1 additions and 1 deletions
--- a/core/io/encodings/encodings.factor
+++ b/core/io/encodings/encodings.factor
@ -42,7 +42,7 @@ CONSTANT: replacement-char 0xfffd

 : string>byte-array-fast ( string -- byte-array )
    { string } declare ! aux>> must be f
-    [ length ] keep over (byte-array) [
+    [ length ] keep over <byte-array> [
        [
            [ [ string-nth-fast ] 2keep drop ]
            [ set-nth-unsafe ] bi*