Two quick fixes
parent
be12dc3e9f
commit
3d5995b3b4
|
@ -29,7 +29,6 @@ SYMBOL: check-optimizer?
|
|||
normalize
|
||||
propagate
|
||||
cleanup
|
||||
?check
|
||||
dup run-escape-analysis? [
|
||||
escape-analysis
|
||||
unbox-tuples
|
||||
|
|
|
@ -170,7 +170,7 @@ SYMBOL: history
|
|||
] if ;
|
||||
|
||||
: inline-word ( #call word -- ? )
|
||||
dup specialized-def inline-word-def ;
|
||||
dup def>> inline-word-def ;
|
||||
|
||||
: inline-method-body ( #call word -- ? )
|
||||
2dup should-inline? [ inline-word ] [ 2drop f ] if ;
|
||||
|
|
Loading…
Reference in New Issue