Interval.st
changeset 6748 604366d06326
parent 6747 6f749de322b2
child 7820 8e6e0f75767a
--- a/Interval.st	Tue Sep 10 14:50:39 2002 +0200
+++ b/Interval.st	Tue Sep 10 15:03:22 2002 +0200
@@ -177,7 +177,7 @@
 !
 
 hash
-    ^ ((((step hash bitShift:5) + start hash) bitShift:5) + stop hash) bitAnd:16r3FFFFFFF.
+    ^ super hash "/ do not redefine: must generate same hash as SeqColl.
 ! !
 
 !Interval methodsFor:'converting'!
@@ -487,5 +487,5 @@
 !Interval class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Interval.st,v 1.35 2002-09-10 12:50:39 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Interval.st,v 1.36 2002-09-10 13:03:22 cg Exp $'
 ! !