From 944b8dc18cf6dafee70cb6d634a6fbcfa1174937 Mon Sep 17 00:00:00 2001 From: Alistair Grant Date: Tue, 15 Oct 2024 09:45:30 +0200 Subject: [PATCH] [feenkcom/gtoolkit#4072] Switch storing refactored methods in a single package to making the change in-place. --- .../GtStrictSymbolInstallation.class.st | 2 +- .../GtStrictSymbolRefactor.class.st | 5 ++++- 2 files changed, 5 insertions(+), 2 deletions(-) diff --git a/src/GToolkit-Pharo-StrictSymbolComparison/GtStrictSymbolInstallation.class.st b/src/GToolkit-Pharo-StrictSymbolComparison/GtStrictSymbolInstallation.class.st index 4fc1f11c..7be7ba14 100644 --- a/src/GToolkit-Pharo-StrictSymbolComparison/GtStrictSymbolInstallation.class.st +++ b/src/GToolkit-Pharo-StrictSymbolComparison/GtStrictSymbolInstallation.class.st @@ -25,7 +25,7 @@ GtStrictSymbolInstallation >> initializeFfiCallout [ { #category : #'as yet unclassified' } GtStrictSymbolInstallation >> installFromFile: aFileReference [ - self createExtensionPackage. + "self createExtensionPackage." self loadEqualityStatsFromFile: aFileReference. self refactorEqualityCalls. "self refactorDictionaryReferences. diff --git a/src/GToolkit-Pharo-StrictSymbolComparison/GtStrictSymbolRefactor.class.st b/src/GToolkit-Pharo-StrictSymbolComparison/GtStrictSymbolRefactor.class.st index 814398e4..fb551e13 100644 --- a/src/GToolkit-Pharo-StrictSymbolComparison/GtStrictSymbolRefactor.class.st +++ b/src/GToolkit-Pharo-StrictSymbolComparison/GtStrictSymbolRefactor.class.st @@ -231,11 +231,14 @@ GtStrictSymbolRefactor >> originalAst [ { #category : #'as yet unclassified' } GtStrictSymbolRefactor >> refactor [ + | protocol | + "protocol := self class refactoredExtensionPackageName." + protocol := self method protocol. (self shouldRefactor and: [ self isChanged ]) ifFalse: [ ^ self ]. self method methodClass compile: self refactoredAst sourceCode - classified: self class refactoredExtensionPackageName. + classified: protocol. ] { #category : #refactoring }