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

remove duplicate definition of last

db4
Doug Coleman 2009-05-25 19:00:18 -05:00
parent 04c6e07678
commit 0d5ed7e982
1 changed files with 0 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
extra/adsoda/adsoda.factor
View File

@ -58,7 +58,6 @@ t to: remove-hidden-solids?
: with-pv ( i quot -- ) [ swap >pv call ] with-scope ; inline : with-pv ( i quot -- ) [ swap >pv call ] with-scope ; inline
: dimension ( array -- x ) length 1- ; inline : dimension ( array -- x ) length 1- ; inline
: last ( seq -- x ) [ dimension ] [ nth ] bi ; inline
: change-last ( seq quot -- ) : change-last ( seq quot -- )
[ [ dimension ] keep ] dip change-nth ; inline [ [ dimension ] keep ] dip change-nth ; inline