From 4b3f6772dc4c979ef69063d41145a6125b05b3e9 Mon Sep 17 00:00:00 2001 From: CyrilFerlicot Date: Mon, 24 Jul 2023 12:29:09 +0200 Subject: [PATCH] Better classify methods that are extension of the same package FIx protocol of some methods that are extension of the package already containing the class. --- ...ndarinBytecodeContextInspectorModel.class.st | 4 ++-- ...inBytecodeContextInspectorModel.extension.st | 17 ----------------- 2 files changed, 2 insertions(+), 19 deletions(-) delete mode 100644 src/NewTools-Sindarin-Tools/StSindarinBytecodeContextInspectorModel.extension.st diff --git a/src/NewTools-Sindarin-Tools/StSindarinBytecodeContextInspectorModel.class.st b/src/NewTools-Sindarin-Tools/StSindarinBytecodeContextInspectorModel.class.st index 47497059a..6247c7cd5 100644 --- a/src/NewTools-Sindarin-Tools/StSindarinBytecodeContextInspectorModel.class.st +++ b/src/NewTools-Sindarin-Tools/StSindarinBytecodeContextInspectorModel.class.st @@ -17,7 +17,7 @@ StSindarinBytecodeContextInspectorModel >> allInspectorNodes [ yourself ] -{ #category : #'*NewTools-Sindarin-Tools' } +{ #category : #accessing } StSindarinBytecodeContextInspectorModel >> contextReceiverSlotNodes [ ^ self inspectedObject receiver class allSlots collect: [ :each | @@ -26,7 +26,7 @@ StSindarinBytecodeContextInspectorModel >> contextReceiverSlotNodes [ slot: each ] ] -{ #category : #'*NewTools-Sindarin-Tools' } +{ #category : #accessing } StSindarinBytecodeContextInspectorModel >> contextTempNodes [ ^ self inspectedObject astScope allTemps collect: [ :temp | (StInspectorTempNode hostObject: self inspectedObject) tempVariable: temp ] diff --git a/src/NewTools-Sindarin-Tools/StSindarinBytecodeContextInspectorModel.extension.st b/src/NewTools-Sindarin-Tools/StSindarinBytecodeContextInspectorModel.extension.st deleted file mode 100644 index e433d340f..000000000 --- a/src/NewTools-Sindarin-Tools/StSindarinBytecodeContextInspectorModel.extension.st +++ /dev/null @@ -1,17 +0,0 @@ -Extension { #name : #StSindarinBytecodeContextInspectorModel } - -{ #category : #'*NewTools-Sindarin-Tools' } -StSindarinBytecodeContextInspectorModel >> contextReceiverSlotNodes [ - ^ self inspectedObject receiver class allSlots - collect: [ :each | - StBytecodeInspectorSlotNode - hostObject: self inspectedObject receiver - slot: each ] -] - -{ #category : #'*NewTools-Sindarin-Tools' } -StSindarinBytecodeContextInspectorModel >> contextTempNodes [ - ^ self inspectedObject astScope allTemps collect: [ :temp | - (StInspectorTempNode hostObject: self inspectedObject) tempVariable: temp ] - -]