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

commits at source.squeak.org commits at source.squeak.org
Sat May 10 15:45:53 UTC 2014


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

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

Name: VMMaker.oscog-eem.714
Author: eem
Time: 10 May 2014, 8:43:01.735 am
UUID: dd2b59a7-26ea-4c52-b953-8ca494015df5
Ancestors: VMMaker.oscog-eem.713

Get rid of the stupid validate macro hack.

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

Item was changed:
  ----- Method: NewObjectMemory>>validate (in category 'simulation') -----
  validate
+ 	"Validate all the objects in the heap."
+ 	self cCode: [] inSmalltalk: [
- 	"Validate all the objects in the heap.  This is a noop unless simulating, but is sent
- 	 so we need a null implementation when generating code."
- 	<cmacro: '() 0'>
  	| oop prev |
  	self interpreter transcript show: 'Validating...'.
  	oop := self firstObject.
  	[oop < freeStart] whileTrue:
  		[self validate: oop.
  		prev := oop.  "look here if debugging prev obj overlapping this one"
  		oop := self objectAfter: oop].
+ 	self touch: prev.  "Don't offer to delete this please"
+ 	self interpreter transcript show: 'done.'; cr]!
- 	prev := prev.  "Don't offer to delete this please"
- 	self interpreter transcript show: 'done.'; cr!

Item was changed:
  ----- Method: ObjectMemory>>validate (in category 'simulation') -----
  validate
+ 	"Validate all the objects in the heap."
+ 	self cCode: [] inSmalltalk: [
- 	"Validate all the objects in the heap.  This is a noop unless simulating, but is sent
- 	 so we need a null implementation when generating code."
- 	<cmacro: '() 0'>
  	| oop prev |
  	self interpreter transcript show: 'Validating...'.
  	oop := self firstObject.
  	[oop < endOfMemory] whileTrue: [
  		self validate: oop.
  		prev := oop.  "look here if debugging prev obj overlapping this one"
  		oop := self objectAfter: oop.
  	].
+ 	self touch: prev.  "Don't offer to delete this please"
+ 	self interpreter transcript show: 'done.'; cr]!
- 	prev := prev.  "Don't offer to delete this please"
- 	self interpreter transcript show: 'done.'; cr!

Item was removed:
- ----- Method: StackInterpreter>>validate (in category 'simulation support') -----
- validate
- 	<doNotGenerate>
- 	objectMemory validate!



More information about the Vm-dev mailing list