15830084211

Committed 23 Jun 2025 04:43PM UTC coverage: 25.0% (-1.5%) from 26.54%

Build # 15830084211

Build Type

push

github

Committed by

Gabriel-Darbord

Commit Message

Patch to create the ModestSuite
`ModestSuite` is the test suite containing all generated test classes
This was hardcoded in the test generator, plus allows for taking failed exports into account

Run Details

0 of 7 new or added lines in 1 file covered. (0.0%)

224 existing lines in 7 files now uncovered.

615 of 2460 relevant lines covered (25.0%)

0.25 hits per line

Source File
Press 'n' to go to next uncovered line, 'b' for previous

21.54

/src/Famix-UnitTest-Exporter/FamixUTClassMapping.class.st

Class {
        #name : 'FamixUTClassMapping',
        #superclass : 'FamixUTMapping',
        #instVars : [
                'model',
                'comment',
                'ast'
        ],
        #category : 'Famix-UnitTest-Exporter-Mapping',
        #package : 'Famix-UnitTest-Exporter',
        #tag : 'Mapping'
}

{ #category : 'adding' }
FamixUTClassMapping >> addMethod: aFamixUTMethod [

        ^ self mapping
                  at: aFamixUTMethod name
                  put: (FamixUTMethodMapping on: aFamixUTMethod)
]

{ #category : 'accessing' }
FamixUTClassMapping >> ast [

        ^ ast
]

{ #category : 'accessing' }
FamixUTClassMapping >> ast: anASTEntity [

        ast := anASTEntity
]

{ #category : 'accessing' }
FamixUTClassMapping >> comment [

        ^ comment
]

{ #category : 'accessing' }
FamixUTClassMapping >> comment: aString [

        comment := aString
]

{ #category : 'enumerating' }
FamixUTClassMapping >> methodNamed: methodName [

        ^ self mapping at: methodName
]

{ #category : 'accessing' }
FamixUTClassMapping >> methods [

        ^ self mapping
]

{ #category : 'accessing' }
FamixUTClassMapping >> methods: aDictionary [

        mapping := aDictionary
]

{ #category : 'accessing' }
FamixUTClassMapping >> methodsDo: aBlock [

        self mapping valuesDo: aBlock
]

{ #category : 'accessing' }
FamixUTClassMapping >> model [

        ^ model
]

{ #category : 'accessing' }
FamixUTClassMapping >> model: aFamixUTCase [

        model := aFamixUTCase
]

{ #category : 'removing' }
FamixUTClassMapping >> removeMethod: aFamixUTMethod [

        ^ self removeMethodNamed: aFamixUTMethod name
]

{ #category : 'removing' }
FamixUTClassMapping >> removeMethodMapping: methodMapping [

        ^ self removeMethod: methodMapping model
]

{ #category : 'removing' }
FamixUTClassMapping >> removeMethodNamed: methodName [

        | removed |
        removed := self mapping removeKey: methodName.

        removed ast ifNotNil: [ :removedAST |
                removedAST isMooseObject ifTrue: [ "Remove from owner using metadescription"
                        self halt ] ].

        ^ removed
]

1	Class {
2	#name : 'FamixUTClassMapping',
3	#superclass : 'FamixUTMapping',
4	#instVars : [
5	'model',
6	'comment',
7	'ast'
8	],
9	#category : 'Famix-UnitTest-Exporter-Mapping',
10	#package : 'Famix-UnitTest-Exporter',
11	#tag : 'Mapping'
12	}
13
14	{ #category : 'adding' }
15	FamixUTClassMapping >> addMethod: aFamixUTMethod [	1✔
16		1✔
17	^ self mapping	1✔
18	at: aFamixUTMethod name	1✔
19	put: (FamixUTMethodMapping on: aFamixUTMethod)	1✔
20	]	1✔
21
22	{ #category : 'accessing' }
23	FamixUTClassMapping >> ast [	×
24		×
25	^ ast	×
26	]	×
27
28	{ #category : 'accessing' }
29	FamixUTClassMapping >> ast: anASTEntity [	1✔
30		1✔
31	ast := anASTEntity	1✔
32	]	1✔
33
34	{ #category : 'accessing' }
35	FamixUTClassMapping >> comment [	×
36		×
37	^ comment	×
38	]	×
39
40	{ #category : 'accessing' }
41	FamixUTClassMapping >> comment: aString [	×
42		×
43	comment := aString	×
44	]	×
45
46	{ #category : 'enumerating' }
47	FamixUTClassMapping >> methodNamed: methodName [	×
48		×
49	^ self mapping at: methodName	×
50	]	×
51
52	{ #category : 'accessing' }
53	FamixUTClassMapping >> methods [	×
54		×
55	^ self mapping	×
56	]	×
57
58	{ #category : 'accessing' }
59	FamixUTClassMapping >> methods: aDictionary [	×
60		×
61	mapping := aDictionary	×
62	]	×
63
64	{ #category : 'accessing' }
65	FamixUTClassMapping >> methodsDo: aBlock [	×
66		×
67	self mapping valuesDo: aBlock	×
68	]	×
69
70	{ #category : 'accessing' }
71	FamixUTClassMapping >> model [	×
72		×
73	^ model	×
74	]	×
75
76	{ #category : 'accessing' }
77	FamixUTClassMapping >> model: aFamixUTCase [	1✔
78		1✔
79	model := aFamixUTCase	1✔
80	]	1✔
81
82	{ #category : 'removing' }
83	FamixUTClassMapping >> removeMethod: aFamixUTMethod [	×
84		×
85	^ self removeMethodNamed: aFamixUTMethod name	×
86	]	×
87
88	{ #category : 'removing' }
89	FamixUTClassMapping >> removeMethodMapping: methodMapping [	×
90		×
91	^ self removeMethod: methodMapping model	×
92	]	×
93
94	{ #category : 'removing' }
UNCOV 95	FamixUTClassMapping >> removeMethodNamed: methodName [	×
UNCOV 96		×
UNCOV 97	\| removed \|	×
UNCOV 98	removed := self mapping removeKey: methodName.	×
UNCOV 99		×
UNCOV 100	removed ast ifNotNil: [ :removedAST \|	×
UNCOV 101	removedAST isMooseObject ifTrue: [ "Remove from owner using metadescription"	×
UNCOV 102	self halt ] ].	×
UNCOV 103		×
UNCOV 104	^ removed	×
UNCOV 105	]	×

moosetechnology / Famix-UnitTest / 15830084211

Source File Press 'n' to go to next uncovered line, 'b' for previous

Source File
Press 'n' to go to next uncovered line, 'b' for previous