Removing NewTools old code that is now deprecated because of the Oups…

… debugger infrastructure integration

src/NewTools-Debugger/StDebugger.class.st

@@ -189,29 +189,6 @@ StDebugger class >> debuggerWithoutExtensionsSpec [
 		yourself
 ]
 
-{ #category : #deprecated }
-StDebugger class >> defaultDebugger [
-	^DefaultDebugger
-]
-
-{ #category : #deprecated }
-StDebugger class >> defaultDebugger: aSymbol [
-	Available := (aSymbol = #GT) not.
-	DefaultDebugger := aSymbol 
-]
-
-{ #category : #deprecated }
-StDebugger class >> defaultDebuggerSettingsOn: aBuilder [
-	<systemsettings>
-	(aBuilder pickOne: #defaultDebugger)
-		label: 'Default debugger';
-		target: self;
-		default: #NewTools;
-		parent: #debugging;
-		domainValues: #(#GT #NewTools);
-		description: 'Sets the default debugger.'
-]
-
 { #category : #specs }
 StDebugger class >> defaultSpec [
 	^ self perform: self usingSpecSelector
@@ -252,16 +229,6 @@ StDebugger class >> hasAnyActivatedExtension: extensionsClasses [
 		  toolClass showInDebugger ]
 ]
 
-{ #category : #deprecated }
-StDebugger class >> iAmADebugger [
-	"Leave blank for intermediate classes. Add the <iAmADebugger> pragma for concrete debugger classes. This pragma is used by the system to find all available debuggers"
-
-	"For compatibility with DebuggerSelector https://github.com/dupriezt/DebuggerSelector"
-
-	<iAmADebugger>
-	self flag: 'I am not sure this is good design'
-]
-
 { #category : #'class initialization' }
 StDebugger class >> initialize [ 
 
@@ -289,27 +256,6 @@ StDebugger class >> openOn: aDebugSession withFullView: aBool andNotification: a
 	^ debugger
 ]
 
-{ #category : #deprecated }
-StDebugger class >> rankDebugSession: aDebugSession [
-	"Returns an integer representing how much this debugger is suitable to debug @aDebugSession. The higher the integer returned, the more suitable this debugger is. Signal the DebugSessionCannotBeOpenedByThisDebugger exception if this debugger absolutely cannot debug @aDebugSession (for example if this debugger can only handle debug sessions from test executions, and @aDebugSession does not come from a test execution)"
-	"For compatibility with DebuggerSelector https://github.com/dupriezt/DebuggerSelector"
-	^ self rank.
-]
-
-{ #category : #deprecated }
-StDebugger class >> register [
-	self flag: 'Maybe this is no longer necessary now that we have DebuggerSelector?'.
-	self registerToolsOn: Smalltalk tools
-]
-
-{ #category : #deprecated }
-StDebugger class >> registerToolsOn: registry [
-	self flag: 'Maybe this is no longer necessary now that we have DebuggerSelector?'.
-	"Add ourselves to registry. See [Smalltalk tools]" 
-	registry register: self as: #debugger.
-
-]
-
 { #category : #accessing }
 StDebugger class >> sessionClass [
 	self flag: 'Should be replaced by Sindarin - should even be removed in that case!'.

src/Sindarin/SindarinUILessDebugger.class.st

@@ -4,12 +4,6 @@ Class {
 	#category : #Sindarin
 }
 
-{ #category : #'debugger declaration' }
-SindarinUILessDebugger class >> iAmADebugger [
-	"Leave blank for intermediate classes. Add the <iAmADebugger> pragma for concrete debugger classes. This pragma is used by the system to find all available debuggers"
-	<iAmADebugger>
-]
-
 { #category : #'debugger declaration' }
 SindarinUILessDebugger class >> openOn: aDebugSession withFullView: aBool andNotification: aString [
 	"This method will be called to open this debugger on a given debug session (i.e. execution to debug). If this debugger wants to keep the debug session (and its process) alive (for example because it is a graphical debugger that would break if the debug session is terminated while its window is open), it should call #keepAlive: on @aDebugSession, passing itself as argument.