Move optimizer to extra/
parent
f53fa196ac
commit
b810e92456
extra/optimizer/debugger
4
core/optimizer/debugger/debugger.factor → extra/optimizer/debugger/debugger.factor
Normal file → Executable file
4
core/optimizer/debugger/debugger.factor → extra/optimizer/debugger/debugger.factor
Normal file → Executable file
|
@ -73,8 +73,8 @@ M: #push node>quot nip pushed-literals % ;
|
|||
DEFER: dataflow>quot
|
||||
|
||||
: #call>quot ( ? node -- )
|
||||
dup node-param dup
|
||||
[ , dup effect-str comment, ] [ 3drop ] if ;
|
||||
dup node-param dup ,
|
||||
[ dup effect-str ] [ "empty call" ] if comment, ;
|
||||
|
||||
M: #call node>quot #call>quot ;
|
||||
|
Loading…
Reference in New Issue