[etoys-dev] Etoys: Graphics-kfr.9.mcz

[commits at source.squeak.org]

Karl Ramberg uploaded a new version of Graphics to project Etoys:
http://source.squeak.org/etoys/Graphics-kfr.9.mcz

==================== Summary ====================

Name: Graphics-kfr.9
Author: kfr
Time: 11 February 2012, 11:00:26 am
UUID: 0cf4261d-e3ef-de46-b90c-55daff0a20b5
Ancestors: Graphics-kfr.8

Deficient support for Point-valued variables
http://tracker.squeakland.org/browse/SQ-1012

=============== Diff against Graphics-kfr.8 ===============

Item was added:
+ ----- Method: Point class>>readEToyPointFrom: (in category 'instance creation') -----
+ readEToyPointFrom: aString
+ 	"Answer a point as described in the string"
+ 
+ 	| atPos xString yString |
+ 	atPos := aString indexOf: $@ ifAbsent: [nil].
+ 	
+ 	xString := atPos
+ 		ifNil:
+ 			 [aString]
+ 		ifNotNil:
+ 			[aString copyFrom: 1 to: (atPos - 1)].
+ 	yString := atPos
+ 		ifNil:
+ 			[aString]
+ 		ifNotNil:
+ 			[aString copyFrom: (atPos + 1) to: aString size].
+ 
+ 	^ (Number readEToyNumberFrom: xString) @ (Number readEToyNumberFrom: yString)
+ "
+ Point readEToyPointFrom:  '2.345 @ -23.49'
+ "!