Do zero fixups

tesonep · Apr 14, 2023 · e4e3397 · e4e3397
1 parent ab1ee1f
commit e4e3397
Showing 1 changed file with 10 additions and 0 deletions.
diff --git a/smalltalksrc/VMMaker/Cogit.class.st b/smalltalksrc/VMMaker/Cogit.class.st
@@ -3306,6 +3306,7 @@ Cogit >> allocateOpcodes: numberOfAbstractOpcodes bytecodes: numberOfBytecodes i
 					          ((1 to: MaxNumberOfAbstractOpcodes) collect: [ :ign |
 						           self bytecodeFixupClass for: self ]) ] ].
 
+	self b: fixups zero: numberOfBytecodes * (self sizeof: CogBytecodeFixup).
 	self zeroOpcodeIndexForNewOpcodes.
 	labelCounter := 0
 ]
@@ -3410,6 +3411,15 @@ Cogit >> assertSaneJumpTarget: jumpTarget [
 					and: methodZone limitZony asInteger + (closedPICSize max: openPICSize))]]])
 ]
 
+{ #category : #initialization }
+Cogit >> b: anArray zero: bytes [
+
+	<doNotGenerate>
+	1 to: bytes do: [ :i | 
+		"CArray are base 0"
+		anArray at: i - 1 put: 0 ]
+]
+
 { #category : #'trampoline support' }
 Cogit >> backEnd [
 	<cmacro: '() backEnd'>