Tim Felgentreff uploaded a new version of VMMaker to project VM Maker: http://source.squeak.org/VMMaker/VMMaker-tfel.369.mcz
==================== Summary ====================
Name: VMMaker-tfel.369 Author: tfel Time: 12 August 2015, 9:00:25.449 am UUID: 482d7a13-3747-1c4e-b384-021644885eb5 Ancestors: VMMaker-dtl.368, VMMaker-bak.364
simulate SNAPSHOT primitive in RSqueak (requires SystemTracer2 to be installed)
=============== Diff against VMMaker-dtl.368 ===============
Item was changed: ----- Method: SmalltalkImage>>simulatePrimitive:args: (in category '*VMMaker-Interpreter') ----- + simulatePrimitive: aPrimitive args: args + "simulate primitives in RSqueak" + "SNAPSHOT" + (aPrimitive = 97 or: [aPrimitive = 247]) + ifTrue: [ + Smalltalk at: #SystemTracer2 ifPresent: [:st | + |resuming| + Smalltalk processStartUpList: false. + [resuming := (st writeImage: Smalltalk imageName interactive: false) isStartingClone.] + on: FileExistsException + do: [ :e | e resume: (e fileClass forceNewFileNamed: e fileName)]. + Smalltalk processShutDownList: false. + ^resuming]]. + ^InterpreterProxy new primitiveFailFor: 255.! - simulatePrimitive: aPrimitive args: args - "simulate primitives in RSqueak" - "IMAGE_NAME" - aPrimitive = 121 - ifTrue: [^ self getSystemAttribute: 1]. - "SNAPSHOT" - aPrimitive = 97 - ifTrue: [Smalltalk - at: #SystemTracer2 - ifPresent: [:st | ^ st writeImage: Smalltalk imageName]]. - "SNAPSHOT_EMBEDDED" - aPrimitive = 247 - ifTrue: [Smalltalk - at: #SystemTracer2 - ifPresent: [:st | ^ st writeImage: Smalltalk imageName]]. - ^ InterpreterProxy new primitiveFailFor: 255 - !