steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

fix buffer-seek

db4
Doug Coleman 2009-02-07 09:52:34 -06:00
parent ec7356446f
commit 723f08ca61
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/io/buffers/buffers.factor
View File

@ -28,7 +28,7 @@ M: buffer dispose* ptr>> free ;
fill>> zero? ; inline fill>> zero? ; inline
: buffer-seek ( n buffer -- ) : buffer-seek ( n buffer -- )
(>>pos) ; inline 0 >>fill 0 >>pos 2drop ; inline
: buffer-consume ( n buffer -- ) : buffer-consume ( n buffer -- )
[ + ] change-pos [ + ] change-pos