]> gitweb.factorcode.org Git - factor.git/commitdiff
hashtables: Revert size of associate, but keep inlined. ~10s speedup on bootstrap
authorDoug Coleman <doug.coleman@gmail.com>
Fri, 20 Jul 2012 16:30:37 +0000 (09:30 -0700)
committerDoug Coleman <doug.coleman@gmail.com>
Fri, 20 Jul 2012 16:30:37 +0000 (09:30 -0700)
core/hashtables/hashtables.factor

index d51ed90300457c3f4406ec52877a1782b441353b..0244d5899cdb6f1ef92f0378cf78caf348df9077 100644 (file)
@@ -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