Remove some dead code in DebugSession

Fixes pharo-project#17603

src/Debugger-Model/DebugSession.class.st

@@ -430,14 +430,6 @@ DebugSession >> selectedCodeRangeForContext: selectedContext [
 	^ self pcRangeForContext: selectedContext
 ]
 
-{ #category : 'testing' }
-DebugSession >> shouldDisplayContext: aContext basedOnFilters: stackFilters [
-	"Return true if all filters match the given context, or false otherwise.
-	True is returned if there are no filters."
-
-	^stackFilters allSatisfy: [ :aFilter | aFilter shouldDisplay: aContext ]
-]
-
 { #category : 'logging' }
 DebugSession >> signalDebuggerError: anError [
 
@@ -458,54 +450,6 @@ DebugSession >> stackOfSize: size [
 	^ interruptedContext stackOfSize: size
 ]
 
-{ #category : 'accessing' }
-DebugSession >> stackOfSize: limit usingFilters: stackFilters [
-	"Answer an OrderedCollection of the top 'limit' contexts on the receiver's sender chain, according to the given filters.
-
-	Consider the following stack:
-		a <-- top of the stack
-		b
-		a
-		c
-		a
-		b
-		d
-		e
-		a <-- bottom of the stack
-
-	If the given filters do not match context 'a' and 'b' the following stack will be returned:
-		a <-- top of the stack
-		b
-		a
-		c
-		d
-		e <-- bottom of the stack
-
-	First all consecutive contexts starting from the top of the stack for which a filter does not match are
-	added to the result (a b a in the example). Then from the remaining stack only the context for which all
-	filters match are added to the  result.
-	"
-
-	| stack context |
-	stack := OrderedCollection new.
-	context := interruptedContext.
-
-	"Starting from the top of the stack add all consecutive contexts that should not be displayed."
-	[ context ~~ nil
-	 	and: [(stack size < limit)
-			and: [ (self shouldDisplayContext: context basedOnFilters:  stackFilters) not ] ] ]  whileTrue: [
-				stack addLast: context.
-				context := context sender ].
-
-	"Add all contexts that should be displayed. (the current context is checked again)"
-	[context ~~ nil
-		and: [stack size < limit ] ] whileTrue: [
-			(self shouldDisplayContext: context basedOnFilters: stackFilters)
-				ifTrue: [ stack addLast: context ].
-			context := context sender ].
-	^ stack
-]
-
 { #category : 'debugging actions' }
 DebugSession >> stepInto [
 

src/ReleaseTests/ReleaseTest.class.st

@@ -540,7 +540,7 @@ ReleaseTest >> testThatThereAreNoSelectorsRemainingThatAreSentButNotImplemented
 	                    'AthensPolygon>>#paintFillsUsing:on:' 'BalloonEdgeData>>#stepToFirstScanLine' 'BalloonEdgeData>>#stepToNextScanLine'
 	                    'BalloonEngine>>#registerFills:' 'BalloonFillData>>#computeFill' 'ClyFullBrowserMorph>>#extendClassScopeForMethods:'
 	                    'ComplexBorderStyle>>#drawPolyPatchFrom:to:on:usingEnds:' 'ComplexBorderStyle>>#drawLineFrom:to:on:'
-	                    'Context>>#doPrimitive:method:receiver:args:' 'Context>>#failPrimitiveWith:' 'DebugSession>>#shouldDisplayContext:basedOnFilters:'
+	                    'Context>>#doPrimitive:method:receiver:args:' 'Context>>#failPrimitiveWith:'
 	                    'EDTest>>#prepareMethodVersionTest' 'ExternalDropHandler class>>#defaultHandler' 'FFICallbackArgumentReader>>#stackPointer'
 	                    'FFIFloat32>>#callbackReturnOn:for:' 'FFIFloatType>>#callbackReturnOn:for:' 'FFIIndirectFunctionResolution>>#resolveFunction:'
 	                    'OCIRReconstructor>>#fixPushNilsForTemps' 'IceTipHiedraAltComponentHistoryBrowser>>#newCommitRow:commit:'