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

math.vectors: add higher-order stack effect to vif

db4
Joe Groff 2011-12-13 19:46:44 -08:00
parent bd7e6b33f8
commit fe767253a1
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/math/vectors/vectors.factor
View File

@ -193,7 +193,7 @@ GENERIC: v? ( mask true false -- result )
M: object v? M: object v?
[ vand ] [ vandn ] bi-curry* bi vor ; inline [ vand ] [ vandn ] bi-curry* bi vor ; inline
:: vif ( mask true-quot false-quot -- result ) :: vif ( mask true-quot: ( -- x ) false-quot: ( -- x ) -- result )
{ {
{ [ mask vall? ] [ true-quot call ] } { [ mask vall? ] [ true-quot call ] }
{ [ mask vnone? ] [ false-quot call ] } { [ mask vnone? ] [ false-quot call ] }