Etoys: Etoys-kfr.157.mcz

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

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

Name: Etoys-kfr.157
Author: kfr
Time: 5 May 2013, 12:19:45 pm
UUID: 7f19982f-a089-ef4b-9185-790de39af003
Ancestors: Etoys-kfr.155

Fixes issues with variables in Kedama

=============== Diff against Etoys-kfr.155 ===============

Item was changed:
  ----- Method: KedamaExamplerPlayer>>addInstanceVarNamed:withValue: (in category 'player protocol') -----
  addInstanceVarNamed: aName withValue: aValue
 
  self basicAddInstanceVarNamed: aName withValue: aValue.
  "turtles _ kedamaWorld turtlesOf: self."
+ turtles addInstanceVarNamed: aName withValue: aValue.
- turtles addInstanceVarVectorNamed: aName withValue: aValue.
  !

Item was changed:
  ----- Method: KedamaPatchType>>initialValueForASlotFor: (in category 'tile protocol') -----
  initialValueForASlotFor: aPlayer
  "Answer the value to give initially to a newly created slot of the given type in the given player"
 
+ ^ aPlayer kedamaWorld defaultPatch!
- ^ aPlayer costume renderedMorph defaultPatch.!

Item was changed:
  ----- Method: KedamaTurtleVectorPlayer2>>addInstanceVarNamed:withValue: (in category 'player protocol') -----
  addInstanceVarNamed: aName withValue: aValue
 
  | newArray |
+ newArray := self arrayForType: aValue.
+
+ arrays := arrays,(Array with: newArray).
+ newArray atAllPut: aValue.
- (aValue isKindOf: Number) ifTrue: [
- newArray _ KedamaFloatArray new: self size.
- ].
- (aValue isKindOf: Color) ifTrue: [
- newArray _ WordArray new: self size.
- ].
- (aValue isKindOf: Player) ifTrue: [
- newArray _ Array new: self size.
- ].
-
- arrays _ arrays, newArray.
  info at: aName asSymbol put: arrays size.
+ types at: arrays size put: aValue
+
+
+
  !

Item was added:
+ ----- Method: Player>>kedamaWorld (in category 'slot-kedama') -----
+ kedamaWorld
+   ^ActiveWorld findDeeplyA: KedamaMorph
+ !

_______________________________________________
etoys-dev mailing list
[hidden email]
http://lists.squeakland.org/mailman/listinfo/etoys-dev