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

Adding missing inline declarations

db4
Daniel Ehrenberg 2009-03-02 00:06:27 -06:00
parent 0214dc5e7d
commit 5b2c0c9cbf
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
core/io/streams/sequence/sequence.factor
View File

@ -10,14 +10,14 @@ SLOT: i
[ i>> ] [ underlying>> ] bi ; inline
: next ( stream -- )
[ 1+ ] change-i drop ;
[ 1+ ] change-i drop ; inline
: sequence-read1 ( stream -- elt/f )
[ >sequence-stream< ?nth ]
[ next ] bi ; inline
: add-length ( n stream -- i+n )
[ i>> + ] [ underlying>> length ] bi min ;
[ i>> + ] [ underlying>> length ] bi min ; inline
: (sequence-read) ( n stream -- seq/f )
[ add-length ] keep