moosetechnology · bart-at-qqdatafruits · May 13, 2025 · May 13, 2025 · May 13, 2025 · May 15, 2025
diff --git a/.github/workflows/pull-request.yml b/.github/workflows/pull-request.yml
@@ -15,7 +15,7 @@ jobs:
       fail-fast: false
       matrix:
         smalltalk-config: [ .github/workflows/famix-config.ston, .github/workflows/famixCpp-config.ston, .github/workflows/criticBrowser-config.ston, .github/workflows/famixFortran-config.ston ]
-        smalltalk-image: [ Pharo64-11 ]
+        smalltalk-image: [ Pharo64-12, Pharo64-13 ]
         include:
           - smalltalk-config: .github/workflows/famix-config.ston
             name: Famix tests

diff --git a/src/BaselineOfFamix/BaselineOfFamix.class.st b/src/BaselineOfFamix/BaselineOfFamix.class.st
@@ -70,6 +70,7 @@ BaselineOfFamix >> fame: spec [
 
 	| version |
 	version := 'development'.
+	spec for: #( #'pharo13.x' #'pharo12.x' #'pharo11.x' #'pharo10.x' ) do: [ version := 'v1.1.9' ].
 	spec for: #( #'pharo8.x' #'pharo9.x' ) do: [ version := 'v1.1.6' ].
 
 	spec baseline: 'Fame' with: [

diff --git a/src/Famix-Java-Entities/FamixJavaEntity.class.st b/src/Famix-Java-Entities/FamixJavaEntity.class.st
@@ -70,6 +70,13 @@ FamixJavaEntity >> isClass [
 	^ false
 ]
 
+{ #category : #testing }
+FamixJavaEntity >> isComment [
+
+	<generated>
+	^ false
+]
+
 { #category : #testing }
 FamixJavaEntity >> isEnumValue [
 

diff --git a/src/Famix-MetamodelGeneration/FamixGenerator.class.st b/src/Famix-MetamodelGeneration/FamixGenerator.class.st
@@ -1675,6 +1675,7 @@ FamixGenerator >> defineTraits [
 	tCanBeClassSide := builder newTraitNamed: #TCanBeClassSide.
 
 	tComment := builder newTraitNamed: #TComment comment: self commentForTComment.
+	tComment withTesting.
 
 	tCompilationUnit := builder newTraitNamed: #TCompilationUnit comment: self commentForTCompilationUnit.
 

diff --git a/src/Famix-PharoSmalltalk-Entities/FamixStEntity.class.st b/src/Famix-PharoSmalltalk-Entities/FamixStEntity.class.st
@@ -63,6 +63,13 @@ FamixStEntity >> isClass [
 	^ false
 ]
 
+{ #category : #testing }
+FamixStEntity >> isComment [
+
+	<generated>
+	^ false
+]
+
 { #category : #testing }
 FamixStEntity >> isGlobalVariable [
 

diff --git a/src/Famix-Test1-Entities/FamixTest1Entity.class.st b/src/Famix-Test1-Entities/FamixTest1Entity.class.st
@@ -56,6 +56,13 @@ FamixTest1Entity >> isClass [
 	^ false
 ]
 
+{ #category : #testing }
+FamixTest1Entity >> isComment [
+
+	<generated>
+	^ false
+]
+
 { #category : #testing }
 FamixTest1Entity >> isFileAnchor [
 

diff --git a/src/Famix-Test2-Entities/FamixTest2Entity.class.st b/src/Famix-Test2-Entities/FamixTest2Entity.class.st
@@ -42,6 +42,13 @@ FamixTest2Entity >> isClass [
 	^ false
 ]
 
+{ #category : #testing }
+FamixTest2Entity >> isComment [
+
+	<generated>
+	^ false
+]
+
 { #category : #testing }
 FamixTest2Entity >> isInheritance [
 

diff --git a/src/Famix-Test3-Entities/FamixTest3Entity.class.st b/src/Famix-Test3-Entities/FamixTest3Entity.class.st
@@ -63,6 +63,13 @@ FamixTest3Entity >> isClass [
 	^ false
 ]
 
+{ #category : #testing }
+FamixTest3Entity >> isComment [
+
+	<generated>
+	^ false
+]
+
 { #category : #testing }
 FamixTest3Entity >> isInvocation [
 

diff --git a/src/Famix-Test3-Entities/FamixTest3TypeGroup.class.st b/src/Famix-Test3-Entities/FamixTest3TypeGroup.class.st
@@ -55,6 +55,13 @@ FamixTest3TypeGroup >> isClass [
 	^ false
 ]
 
+{ #category : #testing }
+FamixTest3TypeGroup >> isComment [
+
+	<generated>
+	^ false
+]
+
 { #category : #testing }
 FamixTest3TypeGroup >> isInvocation [
 

diff --git a/src/Famix-Test6-Entities/FamixTest6Entity.class.st b/src/Famix-Test6-Entities/FamixTest6Entity.class.st
@@ -28,6 +28,13 @@ FamixTest6Entity class >> metamodel [
 	^ FamixTest6Model metamodel
 ]
 
+{ #category : #testing }
+FamixTest6Entity >> isComment [
+
+	<generated>
+	^ false
+]
+
 { #category : #testing }
 FamixTest6Entity >> isNamedEntity [
 

diff --git a/src/Famix-Test7-Entities/FamixTest7Entity.class.st b/src/Famix-Test7-Entities/FamixTest7Entity.class.st
@@ -49,6 +49,13 @@ FamixTest7Entity >> isClass [
 	^ false
 ]
 
+{ #category : #testing }
+FamixTest7Entity >> isComment [
+
+	<generated>
+	^ false
+]
+
 { #category : #testing }
 FamixTest7Entity >> isInheritance [
 

diff --git a/src/Famix-TestComposedSubmetamodel1-Entities/FamixTestComposed1Entity.class.st b/src/Famix-TestComposedSubmetamodel1-Entities/FamixTestComposed1Entity.class.st
@@ -42,6 +42,13 @@ FamixTestComposed1Entity >> isClass [
 	^ false
 ]
 
+{ #category : #testing }
+FamixTestComposed1Entity >> isComment [
+
+	<generated>
+	^ false
+]
+
 { #category : #testing }
 FamixTestComposed1Entity >> isMethod [
 

diff --git a/src/Famix-TestComposedSubmetamodel2-Entities/FamixTestComposed2Entity.class.st b/src/Famix-TestComposedSubmetamodel2-Entities/FamixTestComposed2Entity.class.st
@@ -42,6 +42,13 @@ FamixTestComposed2Entity >> isClass [
 	^ false
 ]
 
+{ #category : #testing }
+FamixTestComposed2Entity >> isComment [
+
+	<generated>
+	^ false
+]
+
 { #category : #testing }
 FamixTestComposed2Entity >> isMethod [
 

diff --git a/src/Famix-Traits/FamixTComment.trait.st b/src/Famix-Traits/FamixTComment.trait.st
@@ -100,6 +100,13 @@ FamixTComment >> displayStringOn: aStream [
 	self commentedEntity displayStringOn: aStream
 ]
 
+{ #category : #testing }
+FamixTComment >> isComment [
+
+	<generated>
+	^ true
+]
+
 { #category : #printing }
 FamixTComment >> printOn: aStream [
 

diff --git a/src/Famix-Traits/FamixTHasImmediateSource.extension.st b/src/Famix-Traits/FamixTHasImmediateSource.extension.st
diff --git a/src/Famix-Traits/FamixTHasImmediateSource.trait.st b/src/Famix-Traits/FamixTHasImmediateSource.trait.st
@@ -63,16 +63,6 @@ FamixTHasImmediateSource >> hasSource [
 	^ self source isEmptyOrNil not
 ]
 
-{ #category : #'*FamixReplication' }
-FamixTHasImmediateSource >> knowsEnd [
-	^ self source isNotEmpty
-]
-
-{ #category : #'*FamixReplication' }
-FamixTHasImmediateSource >> knowsStart [
-	^ self source isNotEmpty
-]
-
 { #category : #accessing }
 FamixTHasImmediateSource >> source [
 

diff --git a/src/Famix-UMLDocumentor/FamixUMLRoassalDescriptor.class.st b/src/Famix-UMLDocumentor/FamixUMLRoassalDescriptor.class.st
@@ -36,6 +36,16 @@ FamixUMLRoassalDescriptor >> aggregations [
 			(self umlClassNamed: aggreg source) -> (self umlClassNamed: aggreg target) ])
 ]
 
+{ #category : #accessing }
+FamixUMLRoassalDescriptor >> associations [ 
+
+	^(umlModel
+		select: [ :umlEntity | umlEntity class = FamixUMLAssociation and: [ umlEntity aggregation = #off ]]
+		thenCollect: [ :use |
+			(self umlClassNamed: use target) -> (self umlClassNamed: use source) ])
+
+]
+
 { #category : #accessing }
 FamixUMLRoassalDescriptor >> compositions [
 

diff --git a/src/Moose-Core-Tests-Entities/MooseMSEImporterTestEntity.class.st b/src/Moose-Core-Tests-Entities/MooseMSEImporterTestEntity.class.st
@@ -56,6 +56,13 @@ MooseMSEImporterTestEntity >> isClass [
 	^ false
 ]
 
+{ #category : #testing }
+MooseMSEImporterTestEntity >> isComment [
+
+	<generated>
+	^ false
+]
+
 { #category : #testing }
 MooseMSEImporterTestEntity >> isInheritance [