Move optimizer to extra/
parent
f53fa196ac
commit
b810e92456
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
|
DEFER: dataflow>quot
|
||||||
|
|
||||||
: #call>quot ( ? node -- )
|
: #call>quot ( ? node -- )
|
||||||
dup node-param dup
|
dup node-param dup ,
|
||||||
[ , dup effect-str comment, ] [ 3drop ] if ;
|
[ dup effect-str ] [ "empty call" ] if comment, ;
|
||||||
|
|
||||||
M: #call node>quot #call>quot ;
|
M: #call node>quot #call>quot ;
|
||||||
|
|
Loading…
Reference in New Issue