[Vm-dev] VM Maker: VMMaker.oscog-eem.1440.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.1440.mcz

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

Name: VMMaker.oscog-eem.1440
Author: eem
Time: 20 August 2015, 1:44:11.242 pm
UUID: afa0373e-0470-4a3b-bdac-0345416dbe0e
Ancestors: VMMaker.oscog-eem.1439

Fix use count printing in printStackPagesInUse et al.

Nuke the unnecerssary Glue configurations.  One can already override EnforceAccessControl on the command line.

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

Item was changed:
  ----- Method: StackInterpreter>>printStackPageListInUse (in category 'debug printing') -----
  printStackPageListInUse
  	| page n |
  	<inline: false>
  	<var: #page type: #'StackPage *'>
  	page := stackPages mostRecentlyUsedPage.
  	n := 0.
  	[(stackPages isFree: page) ifFalse:
+ 		[self printStackPage: page useCount: (n := n + 1); cr].
- 		[self printStackPage: page useCount: n; cr.
- 		 n := n + 1].
  	 (page := page prevPage) ~= stackPages mostRecentlyUsedPage] whileTrue!

Item was changed:
  ----- Method: StackInterpreter>>printStackPagesInUse (in category 'debug printing') -----
  printStackPagesInUse
  	| n |
  	n := 0.
  	0 to: numStackPages - 1 do:
  		[:i|
  		(stackPages isFree: (stackPages stackPageAt: i)) ifFalse:
+ 			[self printStackPage: (stackPages stackPageAt: i) useCount: (n := n + 1); cr]]!
- 			[self printStackPage: (stackPages stackPageAt: i) useCount: n; cr.
- 			 n := n + 1]]!

Item was removed:
- ----- Method: VMMaker class>>generateAllGlueConfigurationsUnderVersionControl (in category 'configurations') -----
- generateAllGlueConfigurationsUnderVersionControl
- 	self generateGlueSpurStackVM;
- 		generateGlueSpurCogVM!

Item was removed:
- ----- Method: VMMaker class>>generateGlueSpurCogVM (in category 'configurations') -----
- generateGlueSpurCogVM
- 	"No primitives since we can use those from the Cog Spur Newspeak VM"
- 	^VMMaker
- 		generate: CoInterpreter
- 		and: StackToRegisterMappingCogit
- 		with: #(	ObjectMemory Spur32BitCoMemoryManager
- 				MULTIPLEBYTECODESETS true
- 				NewspeakVM true
- 				EnforceAccessControl false)
- 		to: (FileDirectory default directoryNamed: self sourceTree, '/nsnacspursrc') fullName
- 		platformDir: (FileDirectory default directoryNamed: self sourceTree, '/platforms') fullName
- 		including: #()!

Item was removed:
- ----- Method: VMMaker class>>generateGlueSpurStackVM (in category 'configurations') -----
- generateGlueSpurStackVM
- 	"No primitives since we can use those from the Cog Spur Newspeak VM"
- 	^VMMaker
- 		generate: StackInterpreter
- 		with: #(	ObjectMemory Spur32BitMemoryManager
- 				MULTIPLEBYTECODESETS true
- 				NewspeakVM true
- 				FailImbalancedPrimitives false
- 				EnforceAccessControl false)
- 		to: (FileDirectory default directoryNamed: self sourceTree, '/nsnacspurstacksrc') fullName
- 		platformDir: (FileDirectory default directoryNamed: self sourceTree, '/platforms') fullName
- 		including: #()!