Follow forwarders on check RememberedSet sane

hernanmd · Jul 22, 2022 · 507ac33 · 507ac33
1 parent e716a48
commit 507ac33
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/smalltalksrc/VMMaker/SpurMemoryManager.class.st b/smalltalksrc/VMMaker/SpurMemoryManager.class.st
@@ -7477,6 +7477,8 @@ SpurMemoryManager >> isPermSpaceRememberedSetSane [
 		
 		0 to: numPointerSlots - 1 do: [ :index |
 			referenced := self fetchPointer: index ofObject: objOop.
+			(self isOopForwarded: referenced) ifTrue: [ 
+				referenced := self followForwarded: referenced ]. 
 	
 			(((self isFixedKnownObject: referenced) not 
 				and: [ (self isNonImmediate: referenced) and: [ referenced >= self getMemoryMap newSpaceStart ]])