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

Inline subprimitives in optimizing compiler

db4
Slava Pestov 2008-11-03 01:18:54 -06:00
parent 44a2499c17
commit f253e74942
2 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/compiler/cfg/stack-frame/stack-frame.factor
View File

@ -22,7 +22,7 @@ M: ##stack-frame compute-stack-frame*
stack-frame>> stack-frame [ max-stack-frame ] change ; stack-frame>> stack-frame [ max-stack-frame ] change ;
M: ##call compute-stack-frame* M: ##call compute-stack-frame*
drop frame-required? on ; word>> sub-primitive>> [ frame-required? on ] unless ;
M: _gc compute-stack-frame* M: _gc compute-stack-frame*
drop frame-required? on ; drop frame-required? on ;

4
basis/compiler/codegen/codegen.factor
View File

@ -82,7 +82,9 @@ M: ##inc-d generate-insn n>> %inc-d ;
M: ##inc-r generate-insn n>> %inc-r ; M: ##inc-r generate-insn n>> %inc-r ;
M: ##call generate-insn word>> [ add-call ] [ %call ] bi ; M: ##call generate-insn
word>> dup sub-primitive>>
[ first % ] [ [ add-call ] [ %call ] bi ] ?if ;
M: ##jump generate-insn word>> [ add-call ] [ %jump-label ] bi ; M: ##jump generate-insn word>> [ add-call ] [ %jump-label ] bi ;