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

compiler: oops, assoc-empty? vs empty?. undo harvest-values here.

db4
Doug Coleman 2015-08-08 12:27:36 -05:00
parent 76cb13ac52
commit 0bdc27053b
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/compiler/cfg/representations/selection/selection.factor
View File

@ -128,7 +128,7 @@ M: vreg-insn compute-insn-costs
] each-basic-block ; ] each-basic-block ;
: minimize-costs ( costs -- representations ) : minimize-costs ( costs -- representations )
harvest-values [ nip assoc-empty? ] assoc-reject
[ >alist alist-min first ] assoc-map ; [ >alist alist-min first ] assoc-map ;
: compute-representations ( cfg -- ) : compute-representations ( cfg -- )