The Trunk: EToys-mt.437.mcz

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

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

Name: EToys-mt.437
Author: mt
Time: 17 March 2021, 3:33:10.117151 pm
UUID: 3e0cca35-eab1-1044-9064-1fb1a1d4a14f
Ancestors: EToys-mt.436

Try again to separate EToys-specific stuff from PointType.

Complements EToys-mt.435

=============== Diff against EToys-mt.436 ===============

Item was added:
+ ----- Method: PointType>>addExtraItemsToMenu:forSlotSymbol: (in category '*EToys-defaults') -----
+ addExtraItemsToMenu: aMenu forSlotSymbol: slotSym
+ "If the receiver has extra menu items to add to the slot menu, here is its chance to do it.  The defaultTarget of the menu is the player concerned."
+
+ aMenu add: 'decimal places...' translated selector: #setPrecisionFor: argument: slotSym.
+ aMenu balloonTextForLastItem: 'Lets you choose how many decimal places should be shown in readouts for this variable' translated!

Item was added:
+ ----- Method: PointType>>defaultArgumentTile (in category '*EToys-defaults') -----
+ defaultArgumentTile
+ "Answer a tile to represent the type"
+
+ ^ (0@0) newTileMorphRepresentative typeColor: self typeColor!

Item was added:
+ ----- Method: PointType>>newReadoutTile (in category '*EToys-tiles') -----
+ newReadoutTile
+ "Answer a tile that can serve as a readout for data of this type"
+
+ | aTile |
+ aTile := NumericReadoutTile new typeColor: Color lightGray lighter.
+ aTile setProperty: #PointValued toValue: true.
+ ^ aTile!

Item was added:
+ ----- Method: PointType>>wantsArrowsOnTiles (in category '*EToys-defaults') -----
+ wantsArrowsOnTiles
+ "Answer whether this data type wants up/down arrows on tiles representing its values"
+
+ ^ false!

Item was added:
+ ----- Method: PointType>>wantsAssignmentTileVariants (in category '*EToys-tiles') -----
+ wantsAssignmentTileVariants
+ "Answer whether an assignment tile for a variable of this type should show variants to increase-by, decrease-by, multiply-by."
+
+ ^ true!

Item was added:
+ ----- Method: PointType>>wantsSuffixArrow (in category '*EToys-defaults') -----
+ wantsSuffixArrow
+ "Answer whether a tile showing data of this type would like to have a suffix arrow"
+
+ ^ true!