On 13.04.2011 16:16, laurent laffont wrote:
This works:

counter := Class new
              superclass: Object;
              addInstVarNamed: 'counter';
              compile: 'initialize
                           counter := 0';
              compile: 'counterString
                           ^ counter asString';
              compile: 'increment
                           counter := counter + 1.
                           self changed:#counterString';
              compile: 'decrement
                           counter := counter - 1.
                           self changed:#counterString';
              new.

(UITheme builder newColumn: {
UITheme builder newLabelFor: counter getLabel: #counterString getEnabled: nil.
  UITheme builder newRow: {
UITheme builder newButtonFor: counter action: #increment label: '+' help: nil. UITheme builder newButtonFor: counter action: #decrement label: '-' help: nil.
  }
}) openInWindowLabeled: 'Counter example'.



This one crashes the VM (tried on PharoOneClick 1.2 OSX, Cog and StackVM):

(Class new
  superclass: StringMorph;
  compile: 'step self contents: Time now printString';
  new)
    openCenteredInWorld



Any idea ?

http://forum.world.st/test-crashing-the-cog-vm-td3393032.html
Answer in first reply :)

Cheers,
Henry

Reply via email to