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

Maing vocabs.hierarchy use sets; modifying alias analysis's use of sets

db4
Daniel Ehrenberg 2010-02-28 22:55:22 -05:00
parent 1217dc9c6e
commit 1e5f202998
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/compiler/cfg/alias-analysis/alias-analysis.factor
View File

@ -298,7 +298,7 @@ SYMBOL: live-stores
histories get histories get
values [ values [
values [ [ store? ] filter [ insn#>> ] map ] map concat values [ [ store? ] filter [ insn#>> ] map ] map concat
] map concat HS{ } set-like ] map concat fast-set
live-stores set ; live-stores set ;
GENERIC: eliminate-dead-stores* ( insn -- insn' ) GENERIC: eliminate-dead-stores* ( insn -- insn' )

4
basis/vocabs/hierarchy/hierarchy.factor
View File

@ -65,8 +65,8 @@ PRIVATE>
#! Hack. #! Hack.
[ vocab-prefix? ] partition [ vocab-prefix? ] partition
[ [
[ vocab-name ] map unique [ vocab-name ] map fast-set
'[ name>> _ key? not ] filter '[ name>> _ in? not ] filter
convert-prefixes convert-prefixes
] keep ] keep
append ; append ;