edges ( from tos -- )

Vocabulary

compiler.test

Inputs

from	an object
tos	an object

Outputs

None

Definition

USING: accessors kernel namespaces sequences ;

IN: compiler.test

: edges ( from tos -- )
    [ get ] [ [ get ] V{ } map-as ] bi* >>successors drop ;