<natural-loop> ( header index -- loop )

Vocabulary

compiler.cfg.loop-detection.private

Inputs

header	an object
index	an object

Outputs

loop

an object

Definition

USING: compiler.cfg.loop-detection kernel ;

IN: compiler.cfg.loop-detection.private

: <natural-loop> ( header index -- loop )
    HS{ } clone HS{ } clone natural-loop boa ;