leaf? ( huff-tree -- ? )

Vocabulary

compression.huffman.private

Inputs

huff-tree

an object

Outputs

?

an object

Definition

USING: accessors kernel ;

IN: compression.huffman.private

: leaf? ( huff-tree -- ? )
    [ left>> not ] [ right>> not ] bi and ;