optimize-modular-arithmetic ( nodes -- nodes' )

Vocabulary

compiler.tree.modular-arithmetic

Inputs

nodes

an object

Outputs

nodes'

an object

Definition

USING: compiler.tree.combinators kernel namespaces sets ;

IN: compiler.tree.modular-arithmetic

: optimize-modular-arithmetic ( nodes -- nodes' )
    dup compute-modular-candidates
    compute-modular-values modular-values get null?
    [ [ optimize-modular-arithmetic* ] map-nodes ] unless ;