hashtables: reduce default size of associate.

2012-08-02 21:43:37 -07:00 · 2012-08-02 21:43:37 -07:00 · 8b2ae0a717
parent f05954c5a9
commit 8b2ae0a717
1 changed files with 1 additions and 1 deletions
--- a/core/hashtables/hashtables.factor
+++ b/core/hashtables/hashtables.factor
@ -131,7 +131,7 @@ M: hashtable set-at ( value key hash -- )
    dup ?grow-hash dupd new-key@ set-nth-pair ;

 : associate ( value key -- hash )
-    2 <hashtable> [ set-at ] keep ; inline
+    1 <hashtable> [ set-at ] keep ; inline

 <PRIVATE