Permalink
Browse files

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

  • Loading branch information...
1 parent 06a87c4 commit 3365e1adbb82aa3db2930b41104180e0b54ac530 @jckarter jckarter committed Dec 14, 2011
Showing with 1 addition and 1 deletion.
  1. +1 −1 basis/math/vectors/vectors.factor
@@ -193,7 +193,7 @@ GENERIC: v? ( mask true false -- result )
M: object v?
[ 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 vnone? ] [ false-quot call ] }

0 comments on commit 3365e1a

Please sign in to comment.