Add a with-scope so that optimize-tree doesn't pollute namespace
parent
117cb78d6b
commit
7b88756fd0
|
@ -25,6 +25,7 @@ SYMBOL: check-optimizer?
|
||||||
] when ;
|
] when ;
|
||||||
|
|
||||||
: optimize-tree ( nodes -- nodes' )
|
: optimize-tree ( nodes -- nodes' )
|
||||||
|
[
|
||||||
analyze-recursive
|
analyze-recursive
|
||||||
normalize
|
normalize
|
||||||
propagate
|
propagate
|
||||||
|
@ -39,4 +40,5 @@ SYMBOL: check-optimizer?
|
||||||
?check
|
?check
|
||||||
compute-def-use
|
compute-def-use
|
||||||
optimize-modular-arithmetic
|
optimize-modular-arithmetic
|
||||||
finalize ;
|
finalize
|
||||||
|
] with-scope ;
|
||||||
|
|
Loading…
Reference in New Issue