[Vm-dev] VM Maker: Cog-eem.212.mcz

commits at source.squeak.org commits at source.squeak.org
Thu Oct 16 22:34:34 UTC 2014

Eliot Miranda uploaded a new version of Cog to project VM Maker:

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

Name: Cog-eem.212
Author: eem
Time: 16 October 2014, 3:34:12.502 pm
UUID: f7e9e4b4-2030-4fa7-ab37-91bc991a7b5a
Ancestors: Cog-eem.211

Fix directory logic given FIles-eem.138

=============== Diff against Cog-eem.211 ===============

Item was changed:
  ----- Method: SpurBootstrap>>bootstrapImageUsingFileDirectory: (in category 'public access') -----
  bootstrapImageUsingFileDirectory: imageName
  	| dirName baseName dir |
  	dirName := FileDirectory dirPathFor: imageName.
  	baseName := (imageName endsWith: '.image')
  					ifTrue: [FileDirectory baseNameFor: imageName]
  					ifFalse: [FileDirectory localNameFor: imageName].
+ 	dir := dirName isEmpty ifTrue: [FileDirectory default] ifFalse: [FileDirectory default on: dirName].
- 	dir := dirName isEmpty ifTrue: [FileDirectory default] ifFalse: [FileDirectory on: dirName].
  	self on: (dir fullNameFor: baseName, '.image').
  	[self transform]
  		on: Halt
  		do: [:ex|
  			"suppress halts from the usual suspects (development time halts)"
  			(#(fullGC compactImage) includes: ex signalerContext sender selector)
  				ifTrue: [ex resume]
  				ifFalse: [ex pass]].
  	self writeSnapshot: (dir fullNameFor: baseName, '-spur.image')
  		ofTransformedImage: newHeap
  		headerFlags: oldInterpreter getImageHeaderFlags
  		screenSize: oldInterpreter savedWindowSize.
  	dir deleteFileNamed: baseName, '-spur.changes';
  		copyFileNamed: baseName, '.changes' toFileNamed: baseName, '-spur.changes'!

More information about the Vm-dev mailing list