https://pharo.fogbugz.com/default.asp?13116


> Point>>vertex: aPoint
>     ^aRectangle vertex: self vertex: aPoint
> 
> Rectangle class>>vertex: point1 vertex: point2
>     ^self origin: (point1 min: point2) corner: (point1 max: point2)

Reply via email to