[Vm-dev] VM Maker: VMMaker.oscog-eem.778.mcz

[commits at source.squeak.org]

Eliot Miranda uploaded a new version of VMMaker to project VM Maker:
http://source.squeak.org/VMMaker/VMMaker.oscog-eem.778.mcz

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

Name: VMMaker.oscog-eem.778
Author: eem
Time: 19 June 2014, 3:14:18.362 pm
UUID: 522b5601-cfb2-43cf-a4c2-a76e309ba206
Ancestors: VMMaker.oscog-eem.777

But in the bootstrap the interpreter may not exist, so need
to be even more careful checking checkAllocFiller

=============== Diff against VMMaker.oscog-eem.777 ===============

Item was added:
+ ----- Method: NewObjectMemory>>checkAllocFiller (in category 'allocation') -----
+ checkAllocFiller
+ 	<doNotGenerate>
+ 	"in the Spur bootstrap coInterpreter may not be initialized..."
+ 	^coInterpreter notNil and: [coInterpreter checkAllocFiller]!

Item was changed:
  ----- Method: NewObjectMemory>>maybeFillWithAllocationCheckFillerFrom:to: (in category 'allocation') -----
  maybeFillWithAllocationCheckFillerFrom: start to: end
  	"Fill free memory with a bit pattern for checking if the last object has been overwritten."
  	<inline: true>
  	<var: 'start' type: #usqInt>
  	<var: 'end' type: #usqInt>
  	<var: 'p' type: #usqInt>
+ 	self checkAllocFiller ifTrue:
- 	coInterpreter checkAllocFiller ifTrue:
  		[start to: end by: BytesPerWord do:
  			[:p| self longAt: p put: p]]!

Item was added:
+ ----- Method: SpurMemoryManager>>checkAllocFiller (in category 'allocation') -----
+ checkAllocFiller
+ 	<doNotGenerate>
+ 	"in the Spur bootstrap coInterpreter may not be initialized..."
+ 	^coInterpreter notNil and: [coInterpreter checkAllocFiller]!

Item was changed:
  ----- Method: SpurMemoryManager>>initSpaceForAllocationCheck:limit: (in category 'allocation') -----
  initSpaceForAllocationCheck: aNewSpace limit: limit
  	<var: 'aNewSpace' type: #'SpurNewSpaceSpace *'>
  	<var: 'limit' type: #usqInt>
  	memory ifNotNil:
+ 		[self checkAllocFiller ifTrue:
- 		[coInterpreter checkAllocFiller ifTrue:
  			[aNewSpace start
  				to: limit - 1
  				by: self wordSize
  				do: [:p| self longAt: p put: p]]]!