io.streams.sequence: rename (stream-seek) to sequence-seek.

db4
John Benediktsson 2014-02-25 07:56:28 -08:00
parent ee9ead89f8
commit f243b31ddd
3 changed files with 3 additions and 3 deletions

View File

@ -25,7 +25,7 @@ M: string-reader stream-readln
] [ drop f ] if ;
M: string-reader stream-tell i>> ;
M: string-reader stream-seek (stream-seek) ;
M: string-reader stream-seek sequence-seek ;
M: string-reader stream-seekable? drop t ; inline
M: string-reader stream-length underlying>> length ;
M: string-reader dispose drop ;

View File

@ -29,7 +29,7 @@ M: byte-reader stream-read-until sequence-read-until ;
M: byte-reader dispose drop ;
M: byte-reader stream-tell i>> ;
M: byte-reader stream-seek (stream-seek) ;
M: byte-reader stream-seek sequence-seek ;
M: byte-reader stream-seekable? drop t ; inline
M: byte-reader stream-length underlying>> length ; inline

View File

@ -55,7 +55,7 @@ INSTANCE: growable output-stream
INSTANCE: growable plain-writer
! Seeking
: (stream-seek) ( n seek-type stream -- )
: sequence-seek ( n seek-type stream -- )
swap {
{ seek-absolute [ i<< ] }
{ seek-relative [ [ + ] change-i drop ] }