Skip to content

Commit

Permalink
Pharo: move all asPharoInitializationAST as exporter extensions
Browse files Browse the repository at this point in the history
  • Loading branch information
Gabriel-Darbord committed Aug 5, 2024
1 parent 07ee09e commit 35720b1
Show file tree
Hide file tree
Showing 4 changed files with 14 additions and 14 deletions.
8 changes: 0 additions & 8 deletions src/Famix-Value-Entities/FamixValueOfCollection.class.st
Original file line number Diff line number Diff line change
Expand Up @@ -36,14 +36,6 @@ FamixValueOfCollection >> addValue: anObject [
^ self value add: anObject
]

{ #category : #converting }
FamixValueOfCollection >> asPharoInitializationAST [

^ RBMessageNode
receiver: (RBVariableNode named: self type name)
selector: #basicNew
]

{ #category : #testing }
FamixValueOfCollection >> isOfCollection [

Expand Down
6 changes: 0 additions & 6 deletions src/Famix-Value-Entities/FamixValueOfPrimitiveType.class.st
Original file line number Diff line number Diff line change
Expand Up @@ -26,12 +26,6 @@ FamixValueOfPrimitiveType class >> annotation [
^ self
]

{ #category : #converting }
FamixValueOfPrimitiveType >> asPharoInitializationAST [

^ RBLiteralNode value: self value
]

{ #category : #testing }
FamixValueOfPrimitiveType >> isOfPrimitiveType [

Expand Down
8 changes: 8 additions & 0 deletions src/Famix-Value-Exporter/FamixValueOfCollection.extension.st
Original file line number Diff line number Diff line change
Expand Up @@ -11,3 +11,11 @@ FamixValueOfCollection >> asFASTJavaExpressionOn: visitor [

^ visitor makeNewExpression: self
]

{ #category : #'*Famix-Value-Exporter' }
FamixValueOfCollection >> asPharoInitializationAST [

^ RBMessageNode
receiver: (RBVariableNode named: self type name)
selector: #basicNew
]
Original file line number Diff line number Diff line change
Expand Up @@ -11,3 +11,9 @@ FamixValueOfPrimitiveType >> asFASTJavaExpressionOn: visitor [

^ value asFASTJavaExpressionOn: visitor of: self type
]

{ #category : #'*Famix-Value-Exporter' }
FamixValueOfPrimitiveType >> asPharoInitializationAST [

^ RBLiteralNode value: self value
]

0 comments on commit 35720b1

Please sign in to comment.