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

Fix load error

db4
Slava Pestov 2008-08-27 05:54:01 -05:00
parent 799cefc39a
commit f471659810
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/compiler/tree/dead-code/liveness/liveness.factor
View File

@ -41,7 +41,7 @@ M: node compute-live-values* 2drop ;
] if ; ] if ;
: compute-live-values ( -- ) : compute-live-values ( -- )
work-list get [ iterate-live-values ] slurp-dequeue ; work-list get [ iterate-live-values ] slurp-deque ;
GENERIC: remove-dead-code* ( node -- node' ) GENERIC: remove-dead-code* ( node -- node' )

2
basis/compiler/tree/loop/detection/detection.factor
View File

@ -82,7 +82,7 @@ M: node collect-loop-info* 2drop ;
[ loop-calls get at [ disqualify-loop ] each ] [ loop-calls get at [ disqualify-loop ] each ]
bi bi
] [ drop ] if ] [ drop ] if
] slurp-dequeue ; ] slurp-deque ;
: detect-loops ( nodes -- nodes ) : detect-loops ( nodes -- nodes )
dup collect-loop-info disqualify-loops ; dup collect-loop-info disqualify-loops ;