--- a/SeqColl.st	Sat Aug 05 16:05:36 1995 +0200
+++ b/SeqColl.st	Tue Aug 08 02:49:43 1995 +0200
@@ -21,7 +21,7 @@
 COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libbasic/Attic/SeqColl.st,v 1.33 1995-07-27 04:12:12 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Attic/SeqColl.st,v 1.34 1995-08-08 00:48:47 claus Exp $
 '!
 
 !SequenceableCollection class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libbasic/Attic/SeqColl.st,v 1.33 1995-07-27 04:12:12 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Attic/SeqColl.st,v 1.34 1995-08-08 00:48:47 claus Exp $
 "
 !
 
@@ -407,7 +407,7 @@
      time can become much bigger than the time lost in added probing.
      Time will show ..."
 
-    ^ (self at:1 ifAbsent:[0]) hash * self size
+    ^ ((self at:1 ifAbsent:[0]) hash * self size) bitAnd:16r3FFFFFFF
 
     "
      #(1 2 3 4 5) hash