fix-lower-bound ( n ranges -- ranges' )

Vocabulary

compiler.cfg.linear-scan.ranges

Inputs

n	an object
ranges	an object

Outputs

ranges'

an object

Definition

USING: arrays kernel math sequences ;

IN: compiler.cfg.linear-scan.ranges

: fix-lower-bound ( n ranges -- ranges' )
    over [ [ second ] ] dip [ >= ] curry compose filter
    unclip second swapd 2array prefix ;