hashtables: reduce default size of associate.

2012-08-02 21:43:37 -07:00 · 2012-08-02 21:43:37 -07:00 · 722ef4d693
parent a473d01762
commit 722ef4d693
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