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@lists.squeakfoundation.org