Vocabulary
kernel

Inputs
preda quotation with stack effect ( ..a -- ..b ? )
bodya quotation with stack effect ( ..b -- ..a )


Outputs
preda quotation with stack effect ( ..a -- ..b ? )
bodya quotation with stack effect ( ..b -- ..a )


Word description
Executes one iteration of a while or until loop.

Definition

: do ( pred body -- pred body ) dup 2dip ; inline