Implementation
: ^ r> jump >r ;
Why
Allows factoring before-and-after behaviors into single words.
Description
Delays the caller until the caller of it returns, such that if A calls B and B executes ^, A will resume and finish before B does.
Examples
Registers
:cell a
: with-a a @ ^ a ! ;
: a. with-a dup emit 1+ ;
41 a !
a. a. a.ABC