io.streams.string: inline <string-writer> so with-string-writer is faster.

db4
John Benediktsson 2014-02-10 20:46:25 -08:00
parent 4f631c4f8b
commit 2fe03b6711
1 changed files with 1 additions and 1 deletions
basis/io/streams/string

View File

@ -35,7 +35,7 @@ PRIVATE>
M: sbuf stream-element-type drop +character+ ;
: <string-writer> ( -- stream )
512 <sbuf> ;
512 <sbuf> ; inline
: with-string-writer ( quot -- str )
<string-writer> [