[squeak-dev] The Trunk: MorphicExtras-mt.316.mcz

commits at source.squeak.org commits at source.squeak.org
Wed Jun 8 09:03:21 UTC 2022


Marcel Taeumel uploaded a new version of MorphicExtras to project The Trunk:
http://source.squeak.org/trunk/MorphicExtras-mt.316.mcz

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

Name: MorphicExtras-mt.316
Author: mt
Time: 8 June 2022, 11:03:18.774735 am
UUID: b7c29259-bee0-8842-b8eb-f4382c8cf136
Ancestors: MorphicExtras-ct.315

Removes dependency to ST80.

=============== Diff against MorphicExtras-ct.315 ===============

Item was changed:
  ----- Method: PolygonMorph class>>extraCircularVertices (in category '*MorphicExtras-examples') -----
  extraCircularVertices
  
+ 	self flag: #note. "Cannot use Circle because it is in the ST80 package."
+ 	 ^ {400 at 100. 477 at 115. 541 at 159. 585 at 223. 600 at 300. 600 at 300. 585 at 377. 541 at 441. 477 at 485. 400 at 500. 400 at 500. 438 at 492. 471 at 471. 492 at 438. 500 at 400. 500 at 400. 492 at 362. 471 at 329. 438 at 308. 400 at 300. 400 at 300. 362 at 292. 329 at 271. 308 at 238. 300 at 200. 300 at 200. 308 at 162. 329 at 129. 362 at 108. 400 at 100}
+ 
+ "	^ ((Circle center: 400 @ 300 radius: 200 quadrant: 1) computeVertices: 5) reverse
- 	^ ((Circle center: 400 @ 300 radius: 200 quadrant: 1) computeVertices: 5) reverse
  		, ((Circle center: 400 @ 300 radius: 200 quadrant: 4) computeVertices: 5) reverse
  		, ((Circle center: 400 @ 400 radius: 100 quadrant: 4) computeVertices: 5)
  		, ((Circle center: 400 @ 400 radius: 100 quadrant: 1) computeVertices: 5)
  		, ((Circle center: 400 @ 200 radius: 100 quadrant: 3) computeVertices: 5) reverse
+ 		, ((Circle center: 400 @ 200 radius: 100 quadrant: 2) computeVertices: 5) reverse"!
- 		, ((Circle center: 400 @ 200 radius: 100 quadrant: 2) computeVertices: 5) reverse!



More information about the Squeak-dev mailing list