9682577336

Committed 26 Jun 2024 03:32PM UTC coverage: 29.519% (+2.6%) from 26.896%

Build # 9682577336

Build Type

Pull #7

github

Committed by

web-flow

Commit Message

Merge 0d36202b7 into dfd76b711

Pull Request Pull Request #7: Optimize code and writting tests

Run Details

514 of 1154 new or added lines in 11 files covered. (44.54%)

17 existing lines in 3 files now uncovered.

2177 of 7375 relevant lines covered (29.52%)

0.3 hits per line

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

14.91

/src/GitLabHealth-Model/GLHUser.class.st

"
A GitLab User

## Relations
======================

### Children
| Relation | Origin | Opposite | Type | Comment |
|---|
| `commits` | `GLHUser` | `commitCreator` | `GLHCommit` | |
| `jobs` | `GLHUser` | `user` | `GLHJob` | |

### Other
| Relation | Origin | Opposite | Type | Comment |
|---|
| `createdProjects` | `GLHUser` | `creator` | `GLHProject` | |


## Properties
======================

| Name | Type | Default value | Comment |
|---|
| `avatar_url` | `String` | nil | |
| `bio` | `String` | nil | |
| `bot` | `String` | nil | |
| `created_at` | `String` | nil | |
| `followers` | `String` | nil | |
| `following` | `String` | nil | |
| `id` | `Number` | nil | |
| `job_title` | `String` | nil | |
| `linkedin` | `String` | nil | |
| `location` | `String` | nil | |
| `name` | `String` | nil | |
| `name` | `String` | nil | Basic name of the entity, not full reference.|
| `organization` | `String` | nil | |
| `pronouns` | `String` | nil | |
| `public_email` | `String` | nil | |
| `skype` | `String` | nil | |
| `state` | `String` | nil | |
| `twitter` | `String` | nil | |
| `username` | `String` | nil | |
| `web_url` | `String` | nil | |
| `website_url` | `String` | nil | |
| `work_information` | `String` | nil | |

"
Class {
        #name : #GLHUser,
        #superclass : #GLHEntity,
        #traits : 'FamixTNamedEntity',
        #classTraits : 'FamixTNamedEntity classTrait',
        #instVars : [
                '#avatar_url => FMProperty',
                '#bio => FMProperty',
                '#bot => FMProperty',
                '#commits => FMMany type: #GLHCommit opposite: #commitCreator',
                '#createdProjects => FMMany type: #GLHProject opposite: #creator',
                '#created_at => FMProperty',
                '#followers => FMProperty',
                '#following => FMProperty',
                '#id => FMProperty',
                '#job_title => FMProperty',
                '#linkedin => FMProperty',
                '#location => FMProperty',
                '#name => FMProperty',
                '#organization => FMProperty',
                '#pronouns => FMProperty',
                '#public_email => FMProperty',
                '#skype => FMProperty',
                '#state => FMProperty',
                '#twitter => FMProperty',
                '#username => FMProperty',
                '#web_url => FMProperty',
                '#website_url => FMProperty',
                '#work_information => FMProperty',
                '#jobs => FMMany type: #GLHJob opposite: #user'
        ],
        #category : #'GitLabHealth-Model-Entities'
}

{ #category : #meta }
GLHUser class >> annotation [

        <FMClass: #User super: #GLHEntity>
        <package: #'GitLabHealth-Model'>
        <generated>
        ^ self
]

{ #category : #adding }
GLHUser >> addCommit: anObject [
        <generated>
        ^ self commits add: anObject
]

{ #category : #adding }
GLHUser >> addCreatedProject: anObject [
        <generated>
        ^ self createdProjects add: anObject
]

{ #category : #adding }
GLHUser >> addJob: anObject [
        <generated>
        ^ self jobs add: anObject
]

{ #category : #accessing }
GLHUser >> avatar_url [

        <FMProperty: #avatar_url type: #String>
        <generated>
        ^ avatar_url
]

{ #category : #accessing }
GLHUser >> avatar_url: anObject [
        <generated>
        avatar_url := anObject
]

{ #category : #accessing }
GLHUser >> bio [

        <FMProperty: #bio type: #String>
        <generated>
        ^ bio
]

{ #category : #accessing }
GLHUser >> bio: anObject [
        <generated>
        bio := anObject
]

{ #category : #accessing }
GLHUser >> bot [

        <FMProperty: #bot type: #String>
        <generated>
        ^ bot
]

{ #category : #accessing }
GLHUser >> bot: anObject [
        <generated>
        bot := anObject
]

{ #category : #accessing }
GLHUser >> commits [
        "Relation named: #commits type: #GLHCommit opposite: #commitCreator"

        <generated>
        <derived>
        ^ commits
]

{ #category : #accessing }
GLHUser >> commits: anObject [

        <generated>
        commits value: anObject
]

{ #category : #navigation }
GLHUser >> commitsGroup [
        <generated>
        <navigation: 'Commits'>
        ^ MooseSpecializedGroup withAll: self commits asSet
]

{ #category : #accessing }
GLHUser >> createdProjects [
        "Relation named: #createdProjects type: #GLHProject opposite: #creator"

        <generated>
        <derived>
        ^ createdProjects
]

{ #category : #accessing }
GLHUser >> createdProjects: anObject [

        <generated>
        createdProjects value: anObject
]

{ #category : #accessing }
GLHUser >> created_at [

        <FMProperty: #created_at type: #String>
        <generated>
        ^ created_at
]

{ #category : #accessing }
GLHUser >> created_at: anObject [
        <generated>
        created_at := anObject
]

{ #category : #accessing }
GLHUser >> followers [

        <FMProperty: #followers type: #String>
        <generated>
        ^ followers
]

{ #category : #accessing }
GLHUser >> followers: anObject [
        <generated>
        followers := anObject
]

{ #category : #accessing }
GLHUser >> following [

        <FMProperty: #following type: #String>
        <generated>
        ^ following
]

{ #category : #accessing }
GLHUser >> following: anObject [
        <generated>
        following := anObject
]

{ #category : #accessing }
GLHUser >> id [

        <FMProperty: #id type: #Number>
        <generated>
        ^ id
]

{ #category : #accessing }
GLHUser >> id: anObject [
        <generated>
        id := anObject
]

{ #category : #accessing }
GLHUser >> job_title [

        <FMProperty: #job_title type: #String>
        <generated>
        ^ job_title
]

{ #category : #accessing }
GLHUser >> job_title: anObject [
        <generated>
        job_title := anObject
]

{ #category : #accessing }
GLHUser >> jobs [
        "Relation named: #jobs type: #GLHJob opposite: #user"

        <generated>
        <derived>
        ^ jobs
]

{ #category : #accessing }
GLHUser >> jobs: anObject [

        <generated>
        jobs value: anObject
]

{ #category : #navigation }
GLHUser >> jobsGroup [
        <generated>
        <navigation: 'Jobs'>
        ^ MooseSpecializedGroup withAll: self jobs asSet
]

{ #category : #accessing }
GLHUser >> linkedin [

        <FMProperty: #linkedin type: #String>
        <generated>
        ^ linkedin
]

{ #category : #accessing }
GLHUser >> linkedin: anObject [
        <generated>
        linkedin := anObject
]

{ #category : #accessing }
GLHUser >> location [

        <FMProperty: #location type: #String>
        <generated>
        ^ location
]

{ #category : #accessing }
GLHUser >> location: anObject [
        <generated>
        location := anObject
]

{ #category : #accessing }
GLHUser >> name [

        <FMProperty: #name type: #String>
        <generated>
        ^ name
]

{ #category : #accessing }
GLHUser >> name: anObject [
        <generated>
        name := anObject
]

{ #category : #accessing }
GLHUser >> organization [

        <FMProperty: #organization type: #String>
        <generated>
        ^ organization
]

{ #category : #accessing }
GLHUser >> organization: anObject [
        <generated>
        organization := anObject
]

{ #category : #accessing }
GLHUser >> pronouns [

        <FMProperty: #pronouns type: #String>
        <generated>
        ^ pronouns
]

{ #category : #accessing }
GLHUser >> pronouns: anObject [
        <generated>
        pronouns := anObject
]

{ #category : #accessing }
GLHUser >> public_email [

        <FMProperty: #public_email type: #String>
        <generated>
        ^ public_email
]

{ #category : #accessing }
GLHUser >> public_email: anObject [
        <generated>
        public_email := anObject
]

{ #category : #accessing }
GLHUser >> skype [

        <FMProperty: #skype type: #String>
        <generated>
        ^ skype
]

{ #category : #accessing }
GLHUser >> skype: anObject [
        <generated>
        skype := anObject
]

{ #category : #accessing }
GLHUser >> state [

        <FMProperty: #state type: #String>
        <generated>
        ^ state
]

{ #category : #accessing }
GLHUser >> state: anObject [
        <generated>
        state := anObject
]

{ #category : #accessing }
GLHUser >> twitter [

        <FMProperty: #twitter type: #String>
        <generated>
        ^ twitter
]

{ #category : #accessing }
GLHUser >> twitter: anObject [
        <generated>
        twitter := anObject
]

{ #category : #accessing }
GLHUser >> username [

        <FMProperty: #username type: #String>
        <generated>
        ^ username
]

{ #category : #accessing }
GLHUser >> username: anObject [
        <generated>
        username := anObject
]

{ #category : #accessing }
GLHUser >> web_url [

        <FMProperty: #web_url type: #String>
        <generated>
        ^ web_url
]

{ #category : #accessing }
GLHUser >> web_url: anObject [
        <generated>
        web_url := anObject
]

{ #category : #accessing }
GLHUser >> website_url [

        <FMProperty: #website_url type: #String>
        <generated>
        ^ website_url
]

{ #category : #accessing }
GLHUser >> website_url: anObject [
        <generated>
        website_url := anObject
]

{ #category : #accessing }
GLHUser >> work_information [

        <FMProperty: #work_information type: #String>
        <generated>
        ^ work_information
]

{ #category : #accessing }
GLHUser >> work_information: anObject [
        <generated>
        work_information := anObject
]

1	"
2	A GitLab User
3
4	## Relations
5	======================
6
7	### Children
8	\| Relation \| Origin \| Opposite \| Type \| Comment \|
9	\|---\|
10	\| `commits` \| `GLHUser` \| `commitCreator` \| `GLHCommit` \| \|
11	\| `jobs` \| `GLHUser` \| `user` \| `GLHJob` \| \|
12
13	### Other
14	\| Relation \| Origin \| Opposite \| Type \| Comment \|
15	\|---\|
16	\| `createdProjects` \| `GLHUser` \| `creator` \| `GLHProject` \| \|
17
18
19	## Properties
20	======================
21
22	\| Name \| Type \| Default value \| Comment \|
23	\|---\|
24	\| `avatar_url` \| `String` \| nil \| \|
25	\| `bio` \| `String` \| nil \| \|
26	\| `bot` \| `String` \| nil \| \|
27	\| `created_at` \| `String` \| nil \| \|
28	\| `followers` \| `String` \| nil \| \|
29	\| `following` \| `String` \| nil \| \|
30	\| `id` \| `Number` \| nil \| \|
31	\| `job_title` \| `String` \| nil \| \|
32	\| `linkedin` \| `String` \| nil \| \|
33	\| `location` \| `String` \| nil \| \|
34	\| `name` \| `String` \| nil \| \|
35	\| `name` \| `String` \| nil \| Basic name of the entity, not full reference.\|
36	\| `organization` \| `String` \| nil \| \|
37	\| `pronouns` \| `String` \| nil \| \|
38	\| `public_email` \| `String` \| nil \| \|
39	\| `skype` \| `String` \| nil \| \|
40	\| `state` \| `String` \| nil \| \|
41	\| `twitter` \| `String` \| nil \| \|
42	\| `username` \| `String` \| nil \| \|
43	\| `web_url` \| `String` \| nil \| \|
44	\| `website_url` \| `String` \| nil \| \|
45	\| `work_information` \| `String` \| nil \| \|
46
47	"
48	Class {
49	#name : #GLHUser,
50	#superclass : #GLHEntity,
51	#traits : 'FamixTNamedEntity',
52	#classTraits : 'FamixTNamedEntity classTrait',
53	#instVars : [
54	'#avatar_url => FMProperty',
55	'#bio => FMProperty',
56	'#bot => FMProperty',
57	'#commits => FMMany type: #GLHCommit opposite: #commitCreator',
58	'#createdProjects => FMMany type: #GLHProject opposite: #creator',
59	'#created_at => FMProperty',
60	'#followers => FMProperty',
61	'#following => FMProperty',
62	'#id => FMProperty',
63	'#job_title => FMProperty',
64	'#linkedin => FMProperty',
65	'#location => FMProperty',
66	'#name => FMProperty',
67	'#organization => FMProperty',
68	'#pronouns => FMProperty',
69	'#public_email => FMProperty',
70	'#skype => FMProperty',
71	'#state => FMProperty',
72	'#twitter => FMProperty',
73	'#username => FMProperty',
74	'#web_url => FMProperty',
75	'#website_url => FMProperty',
76	'#work_information => FMProperty',
77	'#jobs => FMMany type: #GLHJob opposite: #user'
78	],
79	#category : #'GitLabHealth-Model-Entities'
80	}
81
82	{ #category : #meta }
83	GLHUser class >> annotation [	×
84		×
85	<FMClass: #User super: #GLHEntity>	×
86	<package: #'GitLabHealth-Model'>	×
87	<generated>	×
88	^ self	×
89	]	×
90
91	{ #category : #adding }
92	GLHUser >> addCommit: anObject [	×
93	<generated>	×
94	^ self commits add: anObject	×
95	]	×
96
97	{ #category : #adding }
98	GLHUser >> addCreatedProject: anObject [	1✔
99	<generated>	1✔
100	^ self createdProjects add: anObject	1✔
101	]	1✔
102
103	{ #category : #adding }
104	GLHUser >> addJob: anObject [	×
105	<generated>	×
106	^ self jobs add: anObject	×
107	]	×
108
109	{ #category : #accessing }
110	GLHUser >> avatar_url [	×
111		×
112	<FMProperty: #avatar_url type: #String>	×
113	<generated>	×
114	^ avatar_url	×
115	]	×
116
117	{ #category : #accessing }
118	GLHUser >> avatar_url: anObject [	×
119	<generated>	×
120	avatar_url := anObject	×
121	]	×
122
123	{ #category : #accessing }
124	GLHUser >> bio [	×
125		×
126	<FMProperty: #bio type: #String>	×
127	<generated>	×
128	^ bio	×
129	]	×
130
131	{ #category : #accessing }
132	GLHUser >> bio: anObject [	×
133	<generated>	×
134	bio := anObject	×
135	]	×
136
137	{ #category : #accessing }
138	GLHUser >> bot [	×
139		×
140	<FMProperty: #bot type: #String>	×
141	<generated>	×
142	^ bot	×
143	]	×
144
145	{ #category : #accessing }
146	GLHUser >> bot: anObject [	×
147	<generated>	×
148	bot := anObject	×
149	]	×
150
151	{ #category : #accessing }
UNCOV 152	GLHUser >> commits [	×
UNCOV 153	"Relation named: #commits type: #GLHCommit opposite: #commitCreator"	×
UNCOV 154		×
UNCOV 155	<generated>	×
UNCOV 156	<derived>	×
UNCOV 157	^ commits	×
UNCOV 158	]	×
159
160	{ #category : #accessing }
161	GLHUser >> commits: anObject [	×
162		×
163	<generated>	×
164	commits value: anObject	×
165	]	×
166
167	{ #category : #navigation }
168	GLHUser >> commitsGroup [	×
169	<generated>	×
170	<navigation: 'Commits'>	×
171	^ MooseSpecializedGroup withAll: self commits asSet	×
172	]	×
173
174	{ #category : #accessing }
175	GLHUser >> createdProjects [	1✔
176	"Relation named: #createdProjects type: #GLHProject opposite: #creator"	1✔
177		1✔
178	<generated>	1✔
179	<derived>	1✔
180	^ createdProjects	1✔
181	]	1✔
182
183	{ #category : #accessing }
184	GLHUser >> createdProjects: anObject [	×
185		×
186	<generated>	×
187	createdProjects value: anObject	×
188	]	×
189
190	{ #category : #accessing }
191	GLHUser >> created_at [	×
192		×
193	<FMProperty: #created_at type: #String>	×
194	<generated>	×
195	^ created_at	×
196	]	×
197
198	{ #category : #accessing }
199	GLHUser >> created_at: anObject [	×
200	<generated>	×
201	created_at := anObject	×
202	]	×
203
204	{ #category : #accessing }
205	GLHUser >> followers [	×
206		×
207	<FMProperty: #followers type: #String>	×
208	<generated>	×
209	^ followers	×
210	]	×
211
212	{ #category : #accessing }
213	GLHUser >> followers: anObject [	×
214	<generated>	×
215	followers := anObject	×
216	]	×
217
218	{ #category : #accessing }
219	GLHUser >> following [	×
220		×
221	<FMProperty: #following type: #String>	×
222	<generated>	×
223	^ following	×
224	]	×
225
226	{ #category : #accessing }
227	GLHUser >> following: anObject [	×
228	<generated>	×
229	following := anObject	×
230	]	×
231
232	{ #category : #accessing }
233	GLHUser >> id [	1✔
234		1✔
235	<FMProperty: #id type: #Number>	1✔
236	<generated>	1✔
237	^ id	1✔
238	]	1✔
239
240	{ #category : #accessing }
241	GLHUser >> id: anObject [	1✔
242	<generated>	1✔
243	id := anObject	1✔
244	]	1✔
245
246	{ #category : #accessing }
247	GLHUser >> job_title [	×
248		×
249	<FMProperty: #job_title type: #String>	×
250	<generated>	×
251	^ job_title	×
252	]	×
253
254	{ #category : #accessing }
255	GLHUser >> job_title: anObject [	×
256	<generated>	×
257	job_title := anObject	×
258	]	×
259
260	{ #category : #accessing }
261	GLHUser >> jobs [	×
262	"Relation named: #jobs type: #GLHJob opposite: #user"	×
263		×
264	<generated>	×
265	<derived>	×
266	^ jobs	×
267	]	×
268
269	{ #category : #accessing }
270	GLHUser >> jobs: anObject [	×
271		×
272	<generated>	×
273	jobs value: anObject	×
274	]	×
275
276	{ #category : #navigation }
277	GLHUser >> jobsGroup [	×
278	<generated>	×
279	<navigation: 'Jobs'>	×
280	^ MooseSpecializedGroup withAll: self jobs asSet	×
281	]	×
282
283	{ #category : #accessing }
284	GLHUser >> linkedin [	×
285		×
286	<FMProperty: #linkedin type: #String>	×
287	<generated>	×
288	^ linkedin	×
289	]	×
290
291	{ #category : #accessing }
292	GLHUser >> linkedin: anObject [	×
293	<generated>	×
294	linkedin := anObject	×
295	]	×
296
297	{ #category : #accessing }
298	GLHUser >> location [	×
299		×
300	<FMProperty: #location type: #String>	×
301	<generated>	×
302	^ location	×
303	]	×
304
305	{ #category : #accessing }
306	GLHUser >> location: anObject [	×
307	<generated>	×
308	location := anObject	×
309	]	×
310
311	{ #category : #accessing }
312	GLHUser >> name [	1✔
313		1✔
314	<FMProperty: #name type: #String>	1✔
315	<generated>	1✔
316	^ name	1✔
317	]	1✔
318
319	{ #category : #accessing }
320	GLHUser >> name: anObject [	1✔
321	<generated>	1✔
322	name := anObject	1✔
323	]	1✔
324
325	{ #category : #accessing }
326	GLHUser >> organization [	×
327		×
328	<FMProperty: #organization type: #String>	×
329	<generated>	×
330	^ organization	×
331	]	×
332
333	{ #category : #accessing }
334	GLHUser >> organization: anObject [	×
335	<generated>	×
336	organization := anObject	×
337	]	×
338
339	{ #category : #accessing }
340	GLHUser >> pronouns [	×
341		×
342	<FMProperty: #pronouns type: #String>	×
343	<generated>	×
344	^ pronouns	×
345	]	×
346
347	{ #category : #accessing }
348	GLHUser >> pronouns: anObject [	×
349	<generated>	×
350	pronouns := anObject	×
351	]	×
352
353	{ #category : #accessing }
354	GLHUser >> public_email [	×
355		×
356	<FMProperty: #public_email type: #String>	×
357	<generated>	×
358	^ public_email	×
359	]	×
360
361	{ #category : #accessing }
362	GLHUser >> public_email: anObject [	×
363	<generated>	×
364	public_email := anObject	×
365	]	×
366
367	{ #category : #accessing }
368	GLHUser >> skype [	×
369		×
370	<FMProperty: #skype type: #String>	×
371	<generated>	×
372	^ skype	×
373	]	×
374
375	{ #category : #accessing }
376	GLHUser >> skype: anObject [	×
377	<generated>	×
378	skype := anObject	×
379	]	×
380
381	{ #category : #accessing }
382	GLHUser >> state [	×
383		×
384	<FMProperty: #state type: #String>	×
385	<generated>	×
386	^ state	×
387	]	×
388
389	{ #category : #accessing }
390	GLHUser >> state: anObject [	×
391	<generated>	×
392	state := anObject	×
393	]	×
394
395	{ #category : #accessing }
396	GLHUser >> twitter [	×
397		×
398	<FMProperty: #twitter type: #String>	×
399	<generated>	×
400	^ twitter	×
401	]	×
402
403	{ #category : #accessing }
404	GLHUser >> twitter: anObject [	×
405	<generated>	×
406	twitter := anObject	×
407	]	×
408
409	{ #category : #accessing }
410	GLHUser >> username [	1✔
411		1✔
412	<FMProperty: #username type: #String>	1✔
413	<generated>	1✔
414	^ username	1✔
415	]	1✔
416
417	{ #category : #accessing }
418	GLHUser >> username: anObject [	1✔
419	<generated>	1✔
420	username := anObject	1✔
421	]	1✔
422
423	{ #category : #accessing }
424	GLHUser >> web_url [	×
425		×
426	<FMProperty: #web_url type: #String>	×
427	<generated>	×
428	^ web_url	×
429	]	×
430
431	{ #category : #accessing }
432	GLHUser >> web_url: anObject [	×
433	<generated>	×
434	web_url := anObject	×
435	]	×
436
437	{ #category : #accessing }
438	GLHUser >> website_url [	×
439		×
440	<FMProperty: #website_url type: #String>	×
441	<generated>	×
442	^ website_url	×
443	]	×
444
445	{ #category : #accessing }
446	GLHUser >> website_url: anObject [	×
447	<generated>	×
448	website_url := anObject	×
449	]	×
450
451	{ #category : #accessing }
452	GLHUser >> work_information [	×
453		×
454	<FMProperty: #work_information type: #String>	×
455	<generated>	×
456	^ work_information	×
457	]	×
458
459	{ #category : #accessing }
460	GLHUser >> work_information: anObject [	×
461	<generated>	×
462	work_information := anObject	×
463	]	×

moosetechnology / GitProjectHealth / 9682577336

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