[Vm-dev] VM Maker Inbox: VMMaker.oscog.seperateMarking-eem.3282.mcz

[commits at source.squeak.org]

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

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

Name: VMMaker.oscog.seperateMarking-eem.3282
Author: eem
Time: 8 December 2022, 11:52:37.114851 am
UUID: 56db74b3-6af7-486d-985a-3be4f53132f1
Ancestors: VMMaker.oscog.seperateMarking-eem.3281

Get SpurIncrementalSweepAndCompact to set coInterpreter correctly, propagating to the sweeper and compactor. Kick off the propagation in StackInterpreter>>objectMemory:.

Add some of the IGC classes to  openSpurMultiWindowBrowser

=============== Diff against VMMaker.oscog.seperateMarking-eem.3281 ===============

Item was changed:
  ----- Method: Spur32BitMMLECoSimulator>>coInterpreter:cogit: (in category 'initialization') -----
  coInterpreter: aCoInterpreter cogit: aCogit
+ 
  	coInterpreter := aCoInterpreter.
  	cogit := aCogit.
+ 	marker coInterpreter: aCoInterpreter.
  	scavenger coInterpreter: aCoInterpreter.
+ 	compactor coInterpreter: aCoInterpreter.
+ 	gc coInterpreter: aCoInterpreter
+ 	!
- 	compactor coInterpreter: aCoInterpreter!

Item was added:
+ ----- Method: SpurIncrementalSweepAndCompact>>coInterpreter: (in category 'initialization') -----
+ coInterpreter: aVMSimulator
+ 	<doNotGenerate>
+ 	super coInterpreter: aVMSimulator.
+ 	sweeper coInterpreter: aVMSimulator.
+ 	compactor coInterpreter: aVMSimulator!

Item was changed:
  ----- Method: StackInterpreter>>objectMemory: (in category 'initialization') -----
  objectMemory: anObjectMemory
  	<doNotGenerate>
  	objectMemory ifNotNil: [self halt].
+ 	objectMemory := anObjectMemory.
+ 	anObjectMemory coInterpreter: self!
- 	objectMemory := anObjectMemory!

Item was changed:
  ----- Method: VMClass class>>openSpurMultiWindowBrowser (in category 'utilities') -----
  openSpurMultiWindowBrowser
  	"Answer a new multi-window browser on the Spur classes, the Cog StackInterpreter classes, and the support classes"
  	"self openSpurMultiWindowBrowser"
  	| b |
  	b := Browser open.
  	#(	SpurMemoryManager Spur32BitMemoryManager Spur64BitMemoryManager
  		SpurGenerationScavenger SpurSegmentManager
  		Spur32BitMMLESimulator SpurGenerationScavengerSimulator
+ 		SpurMarker SpurAllAtOnceMarker SpurIncrementalMarker
+ 		SpurCompactor SpurPlanningCompactor SpurHybridCompactor SpurIncrementalCompactor
+ 		SpurIncrementalSweepAndCompact
  		InterpreterPrimitives StackInterpreter StackInterpreterPrimitives
  		VMStructType VMMaker CCodeGenerator TMethod)
  		do: [:className|
  			(Smalltalk classNamed: className) ifNotNil:
  				[:class| b selectCategoryForClass: class; selectClass: class]]
  		separatedBy:
  			[b multiWindowState addNewWindow].
  	b multiWindowState selectWindowIndex: 1!