Handbook
Glossary
right-extremity ( node -- node' )
Vocabulary
trees
.
private
Inputs
node
an
object
Outputs
node'
an
object
Definition
USING:
accessors
kernel
;
IN:
trees.private
:
right-extremity
( node -- node' )
[
dup
right>>
]
[
nip
]
while*
;