hashtables: Revert size of associate, but keep inlined. ~10s speedup on bootstrap
parent
00056e2ea7
commit
b656c8ef9e
|
@ -131,7 +131,7 @@ M: hashtable set-at ( value key hash -- )
|
|||
dup ?grow-hash dupd new-key@ set-nth-pair ;
|
||||
|
||||
: associate ( value key -- hash )
|
||||
H{ } clone [ set-at ] keep ; inline
|
||||
2 <hashtable> [ set-at ] keep ; inline
|
||||
|
||||
<PRIVATE
|
||||
|
||||
|
|
Loading…
Reference in New Issue