--- a/Point.st	Wed Oct 06 18:33:41 1999 +0200
+++ b/Point.st	Wed Oct 06 20:53:33 1999 +0200
@@ -332,7 +332,12 @@
     ^ (x hash) bitXor:(y hash)
  the following handles 1@x vs. x@1 better:
 "
-    ^ (x hash) bitXor:(y hash bitShift:12)
+    ^ (x hash) bitXor:(y hash bitShift:16)
+
+
+
+
+
 !
 
 max:aPoint
@@ -986,6 +991,6 @@
 !Point class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Point.st,v 1.47 1998-07-09 08:21:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Point.st,v 1.48 1999-10-06 18:53:33 cg Exp $'
 ! !
 Point initialize!