Removing unused methods

hernanmd · Jan 14, 2022 · f12e6eb · f12e6eb
1 parent 4932ebd
commit f12e6eb
Show file tree

Hide file tree

Showing 4 changed files with 3 additions and 55 deletions.
diff --git a/smalltalksrc/VMMaker/CogVMSimulator.class.st b/smalltalksrc/VMMaker/CogVMSimulator.class.st
@@ -1973,11 +1973,6 @@ CogVMSimulator >> mcprimFunctionForPrimitiveIndex: primIndex [
 	^self mapFunctionToAddress: (super mcprimFunctionForPrimitiveIndex: primIndex)
 ]
 
-{ #category : #accessing }
-CogVMSimulator >> memory [
-	^objectMemory memory
-]
-
 { #category : #'spur bootstrap' }
 CogVMSimulator >> methodCache [
 	^methodCache
@@ -3185,15 +3180,6 @@ CogVMSimulator >> windowIsClosing [
 			do: [:ex|]]	"Cause return from #test, et al"
 ]
 
-{ #category : #'debug printing' }
-CogVMSimulator >> withMemoryProtectionDo: aBlock [
-	objectMemory writeProtectMemory.
-	stackPages writeProtectMemory.
-	^aBlock ensure:
-		[objectMemory writeEnableMemory.
-		 stackPages writeEnableMemory]
-]
-
 { #category : #'frame access' }
 CogVMSimulator >> withoutSmallIntegerTags: anInteger [
 	self assert: (anInteger >= 0 and: [anInteger highBit <= 32]).

diff --git a/smalltalksrc/VMMaker/CurrentImageCoInterpreterFacade.class.st b/smalltalksrc/VMMaker/CurrentImageCoInterpreterFacade.class.st
@@ -704,11 +704,6 @@ CurrentImageCoInterpreterFacade >> mcprimFunctionForPrimitiveIndex: primIndex [
 	^self oopForObject: (coInterpreter mcprimFunctionForPrimitiveIndex: primIndex)
 ]
 
-{ #category : #accessing }
-CurrentImageCoInterpreterFacade >> memory [
-	^memory
-]
-
 { #category : #accessing }
 CurrentImageCoInterpreterFacade >> methodCacheAddress [
 	"Use the top half of memory for variables, methodcache and rumpCStack,

diff --git a/smalltalksrc/VMMaker/SpurMemoryManager.class.st b/smalltalksrc/VMMaker/SpurMemoryManager.class.st
@@ -4155,14 +4155,6 @@ SpurMemoryManager >> containsOnlyValidBecomeObjects: array1 and: array2 twoWay:
 	^0
 ]
 
-{ #category : #simulation }
-SpurMemoryManager >> convertToArray [
-	<doNotGenerate>
-	"I dont believe it -- this *just works*"
-1halt.
-	memory:= memory as: Array
-]
-
 { #category : #'debug support' }
 SpurMemoryManager >> countMarkedAndUnmarkdObjects: printFlags [
 	"print the count of marked and unmarked objects.
@@ -6253,12 +6245,12 @@ SpurMemoryManager >> initSegmentBridgeWithBytes: numBytes at: address [
 SpurMemoryManager >> initSpaceForAllocationCheck: aNewSpace limit: limit [
 	<var: 'aNewSpace' type: #'SpurNewSpaceSpace *'>
 	<var: 'limit' type: #usqInt>
-	memory ifNotNil:
-		[self checkAllocFiller ifTrue:
+	
+	self checkAllocFiller ifTrue:
 			[aNewSpace start
 				to: limit - 1
 				by: self wordSize
-				do: [:p| self longAt: p put: p]]]
+				do: [:p| self longAt: p put: p]]
 ]
 
 { #category : #snapshot }
@@ -12750,19 +12742,3 @@ SpurMemoryManager >> wordSize [
 SpurMemoryManager >> wordSizeClassIndexPun [
 	^self subclassResponsibility
 ]
-
-{ #category : #simulation }
-SpurMemoryManager >> writeEnableMemory [
-	<doNotGenerate>
-	1halt.
-	memory class == ReadOnlyArrayWrapper ifTrue:
-		[memory := memory array]
-]
-
-{ #category : #simulation }
-SpurMemoryManager >> writeProtectMemory [
-	<doNotGenerate>
-	1halt.
-	memory class ~~ ReadOnlyArrayWrapper ifTrue:
-		[memory := ReadOnlyArrayWrapper around: memory]
-]
diff --git a/smalltalksrc/VMMaker/StackInterpreterSimulator.class.st b/smalltalksrc/VMMaker/StackInterpreterSimulator.class.st
@@ -2517,15 +2517,6 @@ StackInterpreterSimulator >> windowIsClosing [
 			do: [:ex|]]	"Cause return from #test, et al"
 ]
 
-{ #category : #'debug printing' }
-StackInterpreterSimulator >> withMemoryProtectionDo: aBlock [
-	objectMemory writeProtectMemory.
-	stackPages writeProtectMemory.
-	^aBlock ensure:
-		[objectMemory writeEnableMemory.
-		 stackPages writeEnableMemory]
-]
-
 { #category : #'frame access' }
 StackInterpreterSimulator >> withoutSmallIntegerTags: anInteger [
 	| signBit |