From 473fdc0d841f2339993e027970a14d4696dcf02d Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Sun, 24 Nov 2013 16:22:29 -0800
Subject: [PATCH] io.encodings.string: faster decode by using sbufs.

---
 basis/io/encodings/string/string.factor | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/basis/io/encodings/string/string.factor b/basis/io/encodings/string/string.factor
index f4d9923a97..e6f278e5b3 100644
--- a/basis/io/encodings/string/string.factor
+++ b/basis/io/encodings/string/string.factor
@@ -12,11 +12,9 @@ IN: io.encodings.string
             byte-array byte-array>string-fast
         ] [
             byte-array encoding <byte-reader> :> reader
-            byte-array length
-            encoding guess-decoded-length
-            reader stream-exemplar-growable new-resizable :> buf
+            byte-array length encoding guess-decoded-length <sbuf> :> buf
             [ reader stream-read1 dup ] [ buf push ] while drop
-            buf reader stream-exemplar like
+            buf "" like
         ] if
     ] if ; inline