From 0fefa0f3bd62b7efd699c4625de2b489c7b15c0d Mon Sep 17 00:00:00 2001
From: Gabriel Darbord <gabriel.darbord@inria.fr>
Date: Wed, 25 Oct 2023 16:52:13 +0200
Subject: [PATCH] Fix #28: move `dump` extensions to the Tools package

---
 .../FASTTEntity.extension.st                   | 18 ------------------
 src/FAST-Core-Tools/FASTTEntity.extension.st   | 18 ++++++++++++++++++
 2 files changed, 18 insertions(+), 18 deletions(-)

diff --git a/src/FAST-Core-Model-Extension/FASTTEntity.extension.st b/src/FAST-Core-Model-Extension/FASTTEntity.extension.st
index e4ab4f0..e1b5e2c 100644
--- a/src/FAST-Core-Model-Extension/FASTTEntity.extension.st
+++ b/src/FAST-Core-Model-Extension/FASTTEntity.extension.st
@@ -26,14 +26,6 @@ FASTTEntity >> display [
 				   truncateWithElipsisTo: 50 ])
 ]
 
-{ #category : #'*FAST-Core-Model-Extension' }
-FASTTEntity >> dump [
-
-	"Generate an expression that recreates the receiver"
-
-	^ FASTDumpVisitor visit: self
-]
-
 { #category : #'*FAST-Core-Model-Extension' }
 FASTTEntity >> inspectionFAST [
 
@@ -53,16 +45,6 @@ FASTTEntity >> inspectionFAST [
 		  beResizable
 ]
 
-{ #category : #'*FAST-Core-Model-Extension' }
-FASTTEntity >> inspectionFASTDump [
-
-	<inspectorPresentationOrder: 550 title: 'FASTDump'>
-	^ SpCodePresenter new
-		  text: (RBParser parseExpression: self dump) formattedCode;
-		  beForScripting;
-		  yourself
-]
-
 { #category : #'*FAST-Core-Model-Extension' }
 FASTTEntity >> inspectionFASTSourceCode [
 
diff --git a/src/FAST-Core-Tools/FASTTEntity.extension.st b/src/FAST-Core-Tools/FASTTEntity.extension.st
index 6a5ad1f..29efb69 100644
--- a/src/FAST-Core-Tools/FASTTEntity.extension.st
+++ b/src/FAST-Core-Tools/FASTTEntity.extension.st
@@ -8,6 +8,24 @@ FASTTEntity >> addLocalUse: aFASTNode [
 		add: aFASTNode
 ]
 
+{ #category : #'*FAST-Core-Tools' }
+FASTTEntity >> dump [
+
+	"Generate an expression that recreates the receiver"
+
+	^ FASTDumpVisitor visit: self
+]
+
+{ #category : #'*FAST-Core-Tools' }
+FASTTEntity >> inspectionFASTDump [
+
+	<inspectorPresentationOrder: 550 title: 'FASTDump'>
+	^ SpCodePresenter new
+		  text: (RBParser parseExpression: self dump) formattedCode;
+		  beForScripting;
+		  yourself
+]
+
 { #category : #'*FAST-Core-Tools' }
 FASTTEntity >> localDeclaration [
 	^self