Move thisContext users into gtoolkit-specific package [feenkcom/gtool…

…kit#4322]
feenkcom · Mar 3, 2025 · 33cd8f5 · 33cd8f5
1 parent 50cb53a
commit 33cd8f5
Show file tree

Hide file tree

Showing 4 changed files with 11 additions and 10 deletions.
diff --git a/src/Gt4Llm-GToolkit/GtLlmTutorAction.extension.st b/src/Gt4Llm-GToolkit/GtLlmTutorAction.extension.st
@@ -58,6 +58,11 @@ GtLlmTutorAction >> gtDefinitionFor: aView [
 			coder asExpandedOnlyElement vFitContentLimited ]
 ]
 
+{ #category : #'*Gt4Llm-GToolkit' }
+GtLlmTutorAction >> initializeMethod [
+	^ (thisContext stack at: 4) blocDefiningMethod
+]
+
 { #category : #'*Gt4Llm-GToolkit' }
 GtLlmTutorAction >> nameDescription [
 	<magritteDescription>

diff --git a/src/Gt4Llm-GToolkit/GtLlmTutorFormatDescription.extension.st b/src/Gt4Llm-GToolkit/GtLlmTutorFormatDescription.extension.st
@@ -0,0 +1,6 @@
+Extension { #name : #GtLlmTutorFormatDescription }
+
+{ #category : #'*Gt4Llm-GToolkit' }
+GtLlmTutorFormatDescription >> initializeMethod [
+	^ (thisContext stack at: 4) blocDefiningMethod
+]
diff --git a/src/Gt4Llm/GtLlmTutorAction.class.st b/src/Gt4Llm/GtLlmTutorAction.class.st
@@ -180,11 +180,6 @@ GtLlmTutorAction >> initialize [
 	definingMethod := self initializeMethod
 ]
 
-{ #category : #accessing }
-GtLlmTutorAction >> initializeMethod [
-	^ (thisContext stack at: 3) blocDefiningMethod
-]
-
 { #category : #accessing }
 GtLlmTutorAction >> inputReferences [
 	^ (self examples flatCollect: #inputReferences as: Set)

diff --git a/src/Gt4Llm/GtLlmTutorFormatDescription.class.st b/src/Gt4Llm/GtLlmTutorFormatDescription.class.st
@@ -157,11 +157,6 @@ GtLlmTutorFormatDescription >> initialize [
 	definingMethod := self initializeMethod
 ]
 
-{ #category : #accessing }
-GtLlmTutorFormatDescription >> initializeMethod [
-	^ (thisContext stack at: 4) blocDefiningMethod
-]
-
 { #category : #accessing }
 GtLlmTutorFormatDescription >> name [
 	^ name