go-right ( quot -- )


Vocabulary
trees.private

Inputs
quotan object


Outputs
None

Definition
USING: kernel ;

IN: trees.private

: go-right ( quot -- ) right swap with-side ; inline