--- a/Set.st	Sat Aug 05 16:05:36 1995 +0200
+++ b/Set.st	Tue Aug 08 02:49:43 1995 +0200
@@ -21,7 +21,7 @@
 COPYRIGHT (c) 1991 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libbasic/Set.st,v 1.19 1995-07-22 19:24:33 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Set.st,v 1.20 1995-08-08 00:48:53 claus Exp $
 '!
 
 !Set class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libbasic/Set.st,v 1.19 1995-07-22 19:24:33 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Set.st,v 1.20 1995-08-08 00:48:53 claus Exp $
 "
 !
 
@@ -203,7 +203,7 @@
      to redefine it. (which may be a bad design decision, but slightly
      improves performance, by avoiding an extra message send ...)"
 
-    ^ hashKey \\ length + 1.
+    ^ (hashKey \\ length) + 1.
 !
 
 setTally:count