Skip to content

Commit

Permalink
Mutant pharo-project#513, Installing [ Replace #ifTrue: receiver with…
Browse files Browse the repository at this point in the history
… false ] on method [ fetchClassOfNonImm: ] 9 test cases.
  • Loading branch information
hogoww committed Feb 25, 2022
1 parent 2c1cad8 commit ddba24f
Showing 1 changed file with 6 additions and 7 deletions.
13 changes: 6 additions & 7 deletions smalltalksrc/VMMaker/SpurMemoryManager.class.st
Expand Up @@ -4808,17 +4808,16 @@ SpurMemoryManager >> fetchClassOf: oop [
{ #category : #'object access' }
SpurMemoryManager >> fetchClassOfNonImm: objOop [
<inline: #never>
| classIndex |
classIndex := self classIndexOf: objOop.
classIndex <= self classIsItselfClassIndexPun ifTrue:
[classIndex = self classIsItselfClassIndexPun ifTrue:
[^objOop].
"Answer nil to avoid the assert failure in classOrNilAtIndex:"
classIndex = self isForwardedObjectClassIndexPun ifTrue:
[^nilObj]].
false ifTrue: [
classIndex = self classIsItselfClassIndexPun ifTrue: [ ^ objOop ].
"Answer nil to avoid the assert failure in classOrNilAtIndex:"
classIndex = self isForwardedObjectClassIndexPun ifTrue: [ ^ nilObj ] ].
self assert: classIndex >= self arrayClassIndexPun.
^self classOrNilAtIndex: classIndex
^ self classOrNilAtIndex: classIndex
]
{ #category : #'interpreter access' }
Expand Down

0 comments on commit ddba24f

Please sign in to comment.