check3@ ( ..a x y z quot: ( ..a x -- ..a ? ) -- ..a ? )

Vocabulary

combinators.extras

Inputs

x	an object
y	an object
z	an object
quot	a quotation with stack effect ( ..a x -- ..a ? )

Outputs

?

an object

Definition

USING: kernel ;

IN: combinators.extras

: check3@ ( ..a x y z quot: ( ..a x -- ..a ? ) -- ..a ? )
    [ 3both? ] curry 3check ; inline