[squeak-dev] The Trunk: KernelTests-tpr.383.mcz

commits at source.squeak.org commits at source.squeak.org
Fri Jul 3 05:24:38 UTC 2020


tim Rowledge uploaded a new version of KernelTests to project The Trunk:
http://source.squeak.org/trunk/KernelTests-tpr.383.mcz

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

Name: KernelTests-tpr.383
Author: tpr
Time: 2 July 2020, 10:24:36.600711 pm
UUID: cb4cc7c5-a318-4424-93dd-1414a73dbc32
Ancestors: KernelTests-tonyg.382

Make the AllocationTest work by preventing the requested free space size (in #setFreeSpaceLimi....) from exceeding SmallInteger>maxVal and thereby failing the vmParameter primitive's limit.

=============== Diff against KernelTests-tonyg.382 ===============

Item was changed:
  ----- Method: AllocationTest>>setFreeSpaceLimitOf:around: (in category 'support') -----
  setFreeSpaceLimitOf: bytes around: aBlock
  	"Attempt to evaluate aBlock with a limit of the requested ammount
  	 of free old space, restoring the extant limit after the evaluation."
  
  	| extantLimit |
  	extantLimit := Smalltalk vmParameterAt: 67.
+ 	Smalltalk vmParameterAt: 67 put: ((Smalltalk vmParameterAt: 1) + bytes asInteger min: SmallInteger maxVal).
- 	Smalltalk vmParameterAt: 67 put: (Smalltalk vmParameterAt: 1) + bytes asInteger.
  	^aBlock ensure: [Smalltalk vmParameterAt: 67 put: extantLimit]!



More information about the Squeak-dev mailing list