?2unless ( ..a x pred: ( ..a x y quot: ( ..a x y -- ..b ? ) -- ..b x ? ) false: ( ..b x y -- ..c ) -- ..c )


Vocabulary
combinators.extras

Inputs
xan object
preda quotation with stack effect ( ..a x y quot: ( ..a x y -- ..b ? ) -- ..b x ? )
falsea quotation with stack effect ( ..b x y -- ..c )


Outputs
None

Definition


: ?2unless
( ..a x pred: ( ..a x y quot: ( ..a x y -- ..b ? ) -- ..b x ? ) false: ( ..b x y -- ..c ) -- ..c )
[ ] swap ?2if ; inline