new-node ( key value class -- node )


Vocabulary
trees.private

Inputs
keyan object
valuean object
classan object


Outputs
nodean object


Definition
USING: accessors kernel ;

IN: trees.private

: new-node ( key value class -- node )
new swap >>value swap >>key ; inline