Vocabulary
kernel

Inputs
xan object
yan object
quota quotation with stack effect ( ..a x y -- ..b x )


Outputs
xan object


Definition

: keepd ( ..a x y quot: ( ..a x y -- ..b x ) -- ..b x )
2keep drop ; inline