io.streams.string: implement stream-tell for sbufs.

2018-02-19 09:46:33 -08:00 · 2018-02-19 09:46:33 -08:00 · 03a18c060b
parent 6073e211ee
commit 03a18c060b
1 changed files with 1 additions and 0 deletions
--- a/basis/io/streams/string/string.factor
+++ b/basis/io/streams/string/string.factor
@ -35,6 +35,7 @@ M: string-reader dispose drop ;

 ! Writers
 M: sbuf stream-element-type drop +character+ ; inline
+M: sbuf stream-tell length ; inline

 : <string-writer> ( -- stream )
    512 <sbuf> ; inline