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

make sequences.lib.replicate inline

db4
Eric Mertens 2008-04-24 23:11:21 -07:00
parent 2f103f19ea
commit c56cf86793
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
extra/sequences/lib/lib.factor
View File

@ -133,7 +133,7 @@ MACRO: firstn ( n -- )
: replicate ( seq quot -- newseq ) : replicate ( seq quot -- newseq )
#! quot: ( -- obj ) #! quot: ( -- obj )
[ drop ] swap compose map ; [ drop ] swap compose map ; inline
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!