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

compiler.cfg.gvn.avail: make with-available-uses? short-circuit

db4
Alex Vondrak 2011-07-03 14:02:02 -07:00 committed by John Benediktsson
parent 6855e0bb15
commit b99a90f138
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
extra/compiler/cfg/gvn/avail/avail.factor
View File

@ -34,7 +34,7 @@ M: avail-analysis transfer-set drop defined assoc-union ;
uses-vregs [ available? ] all? ; uses-vregs [ available? ] all? ;
: with-available-uses? ( quot -- ? ) : with-available-uses? ( quot -- ? )
[ available-uses? ] bi and ; inline keep swap [ available-uses? ] [ drop f ] if ; inline
: make-available ( insn -- insn ) : make-available ( insn -- insn )
dup dst>> dup dst>>