Revert "io.encodings: Add a stream-tell method for decoder streams."
This reverts commit 417b8abbeac013e20b2b360aa215c38604bd18fc.locals-and-roots
parent
99804fd054
commit
48b3ec47f7
|
@ -112,8 +112,6 @@ M: decoder stream-element-type
|
||||||
M: decoder stream-read1 ( decoder -- ch )
|
M: decoder stream-read1 ( decoder -- ch )
|
||||||
dup (read1) fix-cr ; inline
|
dup (read1) fix-cr ; inline
|
||||||
|
|
||||||
M: decoder stream-tell stream>> stream-tell ;
|
|
||||||
|
|
||||||
: (read-first) ( n buf decoder -- buf stream encoding n c )
|
: (read-first) ( n buf decoder -- buf stream encoding n c )
|
||||||
[ rot [ >decoder< ] dip 2over decode-char ]
|
[ rot [ >decoder< ] dip 2over decode-char ]
|
||||||
[ swap fix-cr ] bi ; inline
|
[ swap fix-cr ] bi ; inline
|
||||||
|
|
Loading…
Reference in New Issue