Vocabulary
kernel

Inputs and outputs

x	an object
quot	a quotation

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

Examples

USING: arrays kernel math prettyprint ; 10 20 30 [ / ] dip 2array .
{ 1/2 30 }

Notes
dip is executed as a primitive when preceded by a literal quotation. The below definition is not executed unless its argument is a non-literal quotation, such as a quotation constructed with curry or compose, or for Fried quotations or quotations including Lexical variables.

Definition

IN: kernel

: dip ( x quot -- x ) swap [ call ] dip ;