#>r, ( inputs outputs -- )

Vocabulary
stack-checker.visitor

Inputs

inputs	a sequence
outputs	a sequence

Outputs
None

Word description
Emits a #shuffle node that copies values from the data stack to the retain stack. This node is primarily outputted by the dip word and its relatives.

Examples

USING: namespaces prettyprint stack-checker.visitor ; V{ } stack-visitor set { 123 } { 124 } #>r, stack-visitor get .
V{ T{ #shuffle { mapping { { 124 123 } } } { in-d { 123 } } { out-r { 124 } } } }

Definition

IN: stack-checker.visitor

HOOK: #>r, stack-visitor ( inputs outputs -- )

Methods

USING: kernel stack-checker.visitor ;

M: f #>r, 2drop ;

USING: assocs kernel stack-checker.visitor vectors ;

M: vector #>r, [ [ f f ] dip ] [ swap zip ] 2bi #shuffle, ;