--- a/Point.st Sat May 06 06:26:35 1995 +0200
+++ b/Point.st Mon May 08 05:31:14 1995 +0200
@@ -21,7 +21,7 @@
COPYRIGHT (c) 1989 by Claus Gittinger
All Rights Reserved
-$Header: /cvs/stx/stx/libbasic/Point.st,v 1.20 1995-04-02 11:07:32 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Point.st,v 1.21 1995-05-08 03:30:26 claus Exp $
'!
!Point class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
version
"
-$Header: /cvs/stx/stx/libbasic/Point.st,v 1.20 1995-04-02 11:07:32 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Point.st,v 1.21 1995-05-08 03:30:26 claus Exp $
"
!
@@ -292,6 +292,33 @@
and corner being the receiver"
^ self corner:self
+!
+
+asLayout
+ "return a LayoutOrigin from the receiver.
+ If the receiver coordinates are between 0 and 1, take
+ them as fractional parts (relative to superview).
+ Otherwise, treat them as absolute offsets.
+ Notice: in 10.5.x LayoutOrigin is not yet released."
+
+ ^ LayoutOrigin fromPoint:self
+!
+
+asFractionalLayout
+ "return a LayoutOrigin from the receiver,
+ treating the receiver coordinates as fractional parts
+ (i.e. relative to superview).
+ Notice: in 10.5.x LayoutOrigin is not yet released."
+
+ ^ LayoutOrigin fractionalFromPoint:self
+!
+
+asOffsetLayout
+ "return a LayoutOrigin from the receiver,
+ treating the receiver coordinates as absolute offsets.
+ Notice: in 10.5.x LayoutOrigin is not yet released."
+
+ ^ LayoutOrigin offsetFromPoint:self
! !
!Point methodsFor:'creating rectangles'!