with-datastack ( stack quot -- new-stack )
Factor handbook » The language » Stack effect checking » Stack effect checking escape hatches

Vocabulary
continuations

Inputs

stack	a sequence
quot	a quotation

Outputs

new-stack

a sequence

Word description
Executes the quotation with the given data stack contents, and outputs the new data stack after the word returns. The input sequence is not modified; a new sequence is produced. Does not affect the data stack in surrounding code, other than consuming the two inputs and pushing the output.

Examples

USING: continuations math prettyprint ; { 3 7 } [ + ] with-datastack .
{ 10 }

Definition

USING: combinators.private kernel kernel.private sequences ;

IN: continuations

: with-datastack ( stack quot -- new-stack )
    [
        [
            [ get-datastack ] dip swap
            [ { } like set-datastack ] dip
        ] dip swap [ call get-datastack ] dip swap
        [ set-datastack ] dip
    ] ( stack quot -- new-stack ) call-effect-unsafe ;