Exporter: Rename strategies

src/Famix-Value-Exporter/FamixValue2FASTJavaVisitor.class.st

@@ -330,7 +330,7 @@ FamixValue2FASTJavaVisitor >> model [
 FamixValue2FASTJavaVisitor >> objectExportStrategy [
 
 	^ objectExportStrategy ifNil: [
-		  objectExportStrategy := FamixValueObjectInlineExportStrategy new ]
+		  objectExportStrategy := FamixValueInlineObjectExportStrategy new ]
 ]
 
 { #category : #accessing }

src/Famix-Value-Exporter/FamixValueAbstractObjectExportStrategy.class.st

@@ -0,0 +1,28 @@
+Class {
+	#name : #FamixValueAbstractObjectExportStrategy,
+	#superclass : #Object,
+	#category : #'Famix-Value-Exporter-Strategies'
+}
+
+{ #category : #testing }
+FamixValueAbstractObjectExportStrategy class >> isAbstract [
+
+	^ self == FamixValueAbstractObjectExportStrategy
+]
+
+{ #category : #ast }
+FamixValueAbstractObjectExportStrategy >> addToHelper: helperClass [
+	"Hook to add strategy specifics to the helper class. By default, do nothing."
+]
+
+{ #category : #ast }
+FamixValueAbstractObjectExportStrategy >> dependencyImportsOn: aFASTModel [
+
+	^ {  }
+]
+
+{ #category : #exporting }
+FamixValueAbstractObjectExportStrategy >> export: object on: visitor [
+
+	self subclassResponsibility
+]

src/Famix-Value-Exporter/FamixValueObjectHelperExportStrategy.class.st → src/Famix-Value-Exporter/FamixValueHelperObjectExportStrategy.class.st

@@ -1,22 +1,22 @@
 Class {
-	#name : #FamixValueObjectHelperExportStrategy,
-	#superclass : #FamixValueObjectExportStrategy,
+	#name : #FamixValueHelperObjectExportStrategy,
+	#superclass : #FamixValueAbstractObjectExportStrategy,
 	#instVars : [
 		'helperMethods'
 	],
 	#category : #'Famix-Value-Exporter-Strategies'
 }
 
 { #category : #ast }
-FamixValueObjectHelperExportStrategy >> addToHelper: helperClass [
+FamixValueHelperObjectExportStrategy >> addToHelper: helperClass [
 	"Must be called when building the helper class to add the generated helper methods."
 
 	helperMethods valuesDo: [ :method |
 		helperClass addDeclaration: method ]
 ]
 
 { #category : #ast }
-FamixValueObjectHelperExportStrategy >> buildMethodFor: object withParametersFor: attributes on: visitor [
+FamixValueHelperObjectExportStrategy >> buildMethodFor: object withParametersFor: attributes on: visitor [
 	"Build the helper method to construct objects of the same type as the one given in argument.
 	Use only the relevant attributes that are given, rather than all attributes."
 
@@ -43,7 +43,7 @@ FamixValueObjectHelperExportStrategy >> buildMethodFor: object withParametersFor
 ]
 
 { #category : #ast }
-FamixValueObjectHelperExportStrategy >> dependencyImportsOn: aFASTModel [
+FamixValueHelperObjectExportStrategy >> dependencyImportsOn: aFASTModel [
 
 	^ { ((aFASTModel newImportDeclaration qualifiedName:
 			    (aFASTModel newQualifiedName name:
@@ -53,7 +53,7 @@ FamixValueObjectHelperExportStrategy >> dependencyImportsOn: aFASTModel [
 ]
 
 { #category : #exporting }
-FamixValueObjectHelperExportStrategy >> export: object on: visitor [
+FamixValueHelperObjectExportStrategy >> export: object on: visitor [
 	"Use a helper method to instantiate the object and set its attributes."
 
 	| attributes helper model |
@@ -84,13 +84,13 @@ FamixValueObjectHelperExportStrategy >> export: object on: visitor [
 ]
 
 { #category : #initialization }
-FamixValueObjectHelperExportStrategy >> initialize [
+FamixValueHelperObjectExportStrategy >> initialize [
 
 	helperMethods := IdentityDictionary new
 ]
 
 { #category : #ast }
-FamixValueObjectHelperExportStrategy >> makeMethodFor: aFamixType withParametersFor: attributes on: visitor [
+FamixValueHelperObjectExportStrategy >> makeMethodFor: aFamixType withParametersFor: attributes on: visitor [
 	"Make the method entity, handles its signature and modifiers."
 
 	| model |
@@ -116,7 +116,7 @@ FamixValueObjectHelperExportStrategy >> makeMethodFor: aFamixType withParameters
 ]
 
 { #category : #ast }
-FamixValueObjectHelperExportStrategy >> makeSetterInvocationsFor: attributes on: visitor [
+FamixValueHelperObjectExportStrategy >> makeSetterInvocationsFor: attributes on: visitor [
 	"Build the helper method's body: set the value of each argument to the corresponding attribute using setters or reflection."
 
 	attributes do: [ :attribute |

src/Famix-Value-Exporter/FamixValueObjectInlineExportStrategy.class.st → src/Famix-Value-Exporter/FamixValueInlineObjectExportStrategy.class.st

@@ -1,11 +1,11 @@
 Class {
-	#name : #FamixValueObjectInlineExportStrategy,
-	#superclass : #FamixValueObjectExportStrategy,
+	#name : #FamixValueInlineObjectExportStrategy,
+	#superclass : #FamixValueAbstractObjectExportStrategy,
 	#category : #'Famix-Value-Exporter-Strategies'
 }
 
 { #category : #exporting }
-FamixValueObjectInlineExportStrategy >> export: object on: visitor [
+FamixValueInlineObjectExportStrategy >> export: object on: visitor [
 
 	self flag: #TODO. "redo object visit, we need to have attributes ready when calling the constructor.
 	We need to know if an attribute has been set using the constructor or if it will be set using a setter!"