Eliot Miranda uploaded a new version of VMMaker to project VM Maker: http://source.squeak.org/VMMaker/VMMaker.oscog-eem.1424.mcz
==================== Summary ====================
Name: VMMaker.oscog-eem.1424 Author: eem Time: 17 July 2015, 4:41:03.737 pm UUID: 56110fd1-2a81-4bc6-ad9c-e33cafbd2c71 Ancestors: VMMaker.oscog-eem.1423
Simulator: Allow the displayForm to be resized when the simulator window is resized.
=============== Diff against VMMaker.oscog-eem.1423 ===============
Item was changed: ----- Method: CogVMSimulator>>handleListenEvent: (in category 'I/O primitives support') ----- handleListenEvent: aMorphicEvent + "openAsMorph[NoTranscript] registered me for listen events via HandMorph>>addEventListener. + Transform the listen event and add it to my event queue. ALso check if the displayForm shoudl resize." + (displayForm ~~ fakeForm and: [displayForm extent ~= displayView extent]) ifTrue: + [| newForm | + newForm := Form + extent: displayView extent + depth: displayForm depth. + displayForm displayOn: newForm. + displayForm := newForm]. - "openAsMorph[NoTranscript] regsitered me for listen events via HandMorph>>addEventListener. - Transform the listen event and add it to my event queue." ((aMorphicEvent isMouse or: [aMorphicEvent isKeyboard]) and: [displayView bounds containsPoint: aMorphicEvent position]) ifTrue: [eventTransformer degenerateEvent: aMorphicEvent for: self]!
Item was added: + ----- Method: SimulatorImageMorph>>extent: (in category 'geometry') ----- + extent: aPoint + "Override to restore the default resizing behaviour." + ^self perform: #extent: withArguments: {aPoint} inSuperclass: ImageMorph superclass!
Item was changed: ----- Method: StackInterpreterSimulator>>handleListenEvent: (in category 'I/O primitives support') ----- handleListenEvent: aMorphicEvent + "openAsMorph[NoTranscript] registered me for listen events via HandMorph>>addEventListener. + Transform the listen event and add it to my event queue. ALso check if the displayForm shoudl resize." + (displayForm ~~ fakeForm and: [displayForm extent ~= displayView extent]) ifTrue: + [| newForm | + newForm := Form + extent: displayView extent + depth: displayForm depth. + displayForm displayOn: newForm. + displayForm := newForm]. - "openAsMorph[NoTranscript] regsitered me for listen events via HandMorph>>addEventListener. - Transform the listen event and add it to my event queue." ((aMorphicEvent isMouse or: [aMorphicEvent isKeyboard]) and: [displayView bounds containsPoint: aMorphicEvent position]) ifTrue: [eventTransformer degenerateEvent: aMorphicEvent for: self]!
vm-dev@lists.squeakfoundation.org