Mutant pharo-project#473, Reverting [ Replace #+ with #- ] on method …

…[ scavengingGCTenuringIf: ] 14/14 test case are EQUIVALENT
hogoww · Feb 25, 2022 · 3c192b3 · 3c192b3
1 parent 31a35a9
commit 3c192b3
Showing 1 changed file with 7 additions and 16 deletions.
diff --git a/smalltalksrc/VMMaker/SpurMemoryManager.class.st b/smalltalksrc/VMMaker/SpurMemoryManager.class.st
@@ -10919,22 +10919,14 @@ SpurMemoryManager >> scavengingGC [
 
 { #category : #'gc - scavenging' }
 SpurMemoryManager >> scavengingGCTenuringIf: tenuringCriterion [
-
 	"Run the scavenger."
-
 	<inline: false>
 	self assert: remapBufferCount = 0.
-	(self asserta: scavenger eden limit - freeStart
-		 > coInterpreter interpreterAllocationReserveBytes) ifFalse: [ 
-		coInterpreter
-			tab;
-			printNum: scavenger eden limit - freeStart;
-			space;
-			printNum: coInterpreter interpreterAllocationReserveBytes;
-			space;
-			printNum: coInterpreter interpreterAllocationReserveBytes
-				- (scavenger eden limit - freeStart);
-			cr ].
+	(self asserta: scavenger eden limit - freeStart > coInterpreter interpreterAllocationReserveBytes) ifFalse:
+		[coInterpreter tab;
+			printNum: scavenger eden limit - freeStart; space;
+			printNum: coInterpreter interpreterAllocationReserveBytes; space;
+			printNum: coInterpreter interpreterAllocationReserveBytes - (scavenger eden limit - freeStart); cr].
 	self checkMemoryMap.
 	self checkFreeSpace: GCModeNewSpace.
 	self runLeakCheckerFor: GCModeNewSpace.
@@ -10943,15 +10935,14 @@ SpurMemoryManager >> scavengingGCTenuringIf: tenuringCriterion [
 		preGCAction: GCModeNewSpace;
 		"would prefer this to be in mapInterpreterOops, but
 		 compatibility with ObjectMemory dictates it goes here."
-		flushMethodCacheFrom: newSpaceStart
-		to: newSpaceLimit.
+		flushMethodCacheFrom: newSpaceStart to: newSpaceLimit.
 	needGCFlag := false.
 
 	gcStartUsecs := coInterpreter ioUTCMicrosecondsNow.
 
 	self doScavenge: tenuringCriterion.
 
-	statScavenges := statScavenges - 1.
+	statScavenges := statScavenges + 1.
 	statGCEndUsecs := coInterpreter ioUTCMicrosecondsNow.
 	statSGCDeltaUsecs := statGCEndUsecs - gcStartUsecs.
 	statScavengeGCUsecs := statScavengeGCUsecs + statSGCDeltaUsecs.