visit-edge ( from to active -- )

Vocabulary

compiler.cfg.loop-detection.private

Inputs

from	an object
to	an object
active	an object

Outputs

None

Definition

USING: kernel sets ;

IN: compiler.cfg.loop-detection.private

: visit-edge ( from to active -- )
    dupd in? [ record-back-edge ] [ nip find-loop-headers ] if ;