Vocabulary
kernel

Inputs
xan object
yan object
zan object
quota quotation


Outputs
xan object
yan object
zan object


Word description
Removes x, y, and z from the datastack, calls quot, and restores the removed objects to the top of the datastack when quot is finished.

Notes
The following are equivalent:
[ [ [ foo bar ] dip ] dip ] dip

[ foo bar ] 3dip


Definition

: 3dip ( x y z quot -- x y z ) swap [ 2dip ] dip ;