collect-pointers ( heap heap-node -- seq )

Vocabulary

tools.image.analyzer.references

Inputs

heap	an object
heap-node	an object

Outputs

seq

an object

Definition

USING: accessors kernel math sequences
tools.image.analyzer.utils ;

IN: tools.image.analyzer.references

: collect-pointers ( heap heap-node -- seq )
    dup object>> pointers [ 1 <= ] reject [ untag ] map ;