steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Two quick fixes

db4
Slava Pestov 2009-04-21 16:10:42 -05:00
parent be12dc3e9f
commit 3d5995b3b4
2 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
basis/compiler/tree/optimizer/optimizer.factor
View File

@ -29,7 +29,6 @@ SYMBOL: check-optimizer?
normalize normalize
propagate propagate
cleanup cleanup
?check
dup run-escape-analysis? [ dup run-escape-analysis? [
escape-analysis escape-analysis
unbox-tuples unbox-tuples

2
basis/compiler/tree/propagation/inlining/inlining.factor
View File

@ -170,7 +170,7 @@ SYMBOL: history
] if ; ] if ;
: inline-word ( #call word -- ? ) : inline-word ( #call word -- ? )
dup specialized-def inline-word-def ; dup def>> inline-word-def ;
: inline-method-body ( #call word -- ? ) : inline-method-body ( #call word -- ? )
2dup should-inline? [ inline-word ] [ 2drop f ] if ; 2dup should-inline? [ inline-word ] [ 2drop f ] if ;