Point.st
changeset 7360 719b7bdf6b55
parent 7261 f35fc9cee675
child 7450 759a184d56ab
--- a/Point.st	Mon Jun 16 11:24:07 2003 +0200
+++ b/Point.st	Mon Jun 16 11:28:49 2003 +0200
@@ -401,7 +401,7 @@
     "Return a complex number whose real and imaginary components are the x and y
      coordinates of the receiver."
 
-    ^ x % y
+    ^ Complex real:x imaginary:y
 
     "Modified: / 9.7.1998 / 10:21:10 / cg"
 !
@@ -1132,7 +1132,7 @@
 !Point class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Point.st,v 1.58 2003-05-07 14:31:09 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Point.st,v 1.59 2003-06-16 09:28:49 cg Exp $'
 ! !
 
 Point initialize!