profile-node. ( word node depth -- )

Vocabulary

tools.profiler.sampling.private

Inputs

word	an object
node	an object
depth	an object

Outputs

None

Definition

USING: accessors io math prettyprint ;

IN: tools.profiler.sampling.private

:: profile-node. ( word node depth -- )
    node times. depth depth. word pprint-short
    nl node children>> depth 1 + profile-depth. ;