[Pharo] Personal fitness tracker web app.
Tests now pass.
Changed files
src/MyFitnessTracker-Tests/MFTExerciseTest.class.st
@@ -1,10 +1,11 @@
1
1
Class {
2
Removed:
#name : #MFTExerciseTest,
3
Removed:
#superclass : #TestCase,
4
Removed:
#category : #'MyFitnessTracker-Tests'
2
Added:
#name : 'MFTExerciseTest',
3
Added:
#superclass : 'TestCase',
4
Added:
#category : 'MyFitnessTracker-Tests',
5
Added:
#package : 'MyFitnessTracker-Tests'
5
6
}
6
7
7
Removed:
{ #category : #tests }
8
Added:
{ #category : 'tests' }
8
9
MFTExerciseTest >> testExerciseIsCreatedCorrectly [
9
10
10
11
| exercise |
src/MyFitnessTracker-Tests/MFTUserTest.class.st
@@ -2,12 +2,14 @@
2
2
A MFTUserTest is a test class for testing the behavior of MFTUser
3
3
"
4
4
Class {
5
Removed:
#name : #MFTUserTest,
6
Removed:
#superclass : #TestCase,
7
Removed:
#category : #'MyFitnessTracker-Tests-Model'
5
Added:
#name : 'MFTUserTest',
6
Added:
#superclass : 'TestCase',
7
Added:
#category : 'MyFitnessTracker-Tests-Model',
8
Added:
#package : 'MyFitnessTracker-Tests',
9
Added:
#tag : 'Model'
8
10
}
9
11
10
Removed:
{ #category : #tests }
12
Added:
{ #category : 'tests' }
11
13
MFTUserTest >> testUserIsCreatedFromDictionaryCorrectly [
12
14
13
15
| user |
src/MyFitnessTracker-Tests/MFTWeightTest.class.st
@@ -1,10 +1,11 @@
1
1
Class {
2
Removed:
#name : #MFTWeightTest,
3
Removed:
#superclass : #TestCase,
4
Removed:
#category : #'MyFitnessTracker-Tests'
2
Added:
#name : 'MFTWeightTest',
3
Added:
#superclass : 'TestCase',
4
Added:
#category : 'MyFitnessTracker-Tests',
5
Added:
#package : 'MyFitnessTracker-Tests'
5
6
}
6
7
7
Removed:
{ #category : #tests }
8
Added:
{ #category : 'tests' }
8
9
MFTWeightTest >> testWeightIsCreatedCorrectlyBirthday [
9
10
10
11
| weight |
@@ -14,7 +15,7 @@
14
15
self assert: weight value equals: 90.5
15
16
]
16
17
17
Removed:
{ #category : #tests }
18
Added:
{ #category : 'tests' }
18
19
MFTWeightTest >> testWeightIsCreatedCorrectlyToday [
19
20
20
21
| weight |
src/MyFitnessTracker-Tests/MFTWorkoutTest.class.st
@@ -1,63 +1,11 @@
1
1
Class {
2
Removed:
#name : #MFTWorkoutTest,
3
Removed:
#superclass : #TestCase,
4
Removed:
#category : #'MyFitnessTracker-Tests'
2
Added:
#name : 'MFTWorkoutTest',
3
Added:
#superclass : 'TestCase',
4
Added:
#category : 'MyFitnessTracker-Tests',
5
Added:
#package : 'MyFitnessTracker-Tests'
5
6
}
6
7
7
Removed:
{ #category : #tests }
8
Removed:
MFTWorkoutTest >> testWorkoutHasExercises [
9
Removed:
"This was my workout today, 11 September 2023."
10
Removed:
11
Removed:
| workout |
12
Removed:
workout := MFTWorkout new
13
Removed:
addExercise: (MFTExercise cableRow sets: {
14
Removed:
(MFTSet reps: 8 rpe: 6).
15
Removed:
(MFTSet reps: 6 rpe: 8).
16
Removed:
(MFTSet reps: 6 rpe: 10).
17
Removed:
(MFTSet reps: 15 rpe: 4) });
18
Removed:
addExercise: (MFTExercise new
19
Removed:
englishName: 'hammer curl';
20
Removed:
sets: {
21
Removed:
(MFTSet reps: 8 rpe: 5).
22
Removed:
(MFTSet reps: 8 rpe: 8).
23
Removed:
(MFTSet reps: 6 rpe: 9) });
24
Removed:
addExercise: (MFTExercise new
25
Removed:
englishName: 'barbell row';
26
Removed:
sets: {
27
Removed:
(MFTSet reps: 8 rpe: 5).
28
Removed:
(MFTSet reps: 6 rpe: 8).
29
Removed:
(MFTSet reps: 6 rpe: 10) });
30
Removed:
addExercise: (MFTExercise new
31
Removed:
englishName: 'lat pulldown';
32
Removed:
sets: {
33
Removed:
(MFTSet reps: 8 rpe: 6).
34
Removed:
(MFTSet reps: 6 rpe: 8).
35
Removed:
(MFTSet reps: 6 rpe: 10).
36
Removed:
(MFTSet reps: 16 rpe: 4) });
37
Removed:
addExercise: (MFTExercise new
38
Removed:
englishName: 'reverse grip bicep curl';
39
Removed:
sets: {
40
Removed:
(MFTSet reps: 8 rpe: 6).
41
Removed:
(MFTSet reps: 6 rpe: 8).
42
Removed:
(MFTSet reps: 6 rpe: 9) });
43
Removed:
addExercise: (MFTExercise new
44
Removed:
englishName: 'seated rear delt fly';
45
Removed:
sets: {
46
Removed:
(MFTSet reps: 12 rpe: 6).
47
Removed:
(MFTSet reps: 12 rpe: 6).
48
Removed:
(MFTSet reps: 12 rpe: 6) }).
49
Removed:
self assert: workout exercises size equals: 6.
50
Removed:
self
51
Removed:
assert: (workout exercises at: 1) englishName
52
Removed:
equals: 'cable row'.
53
Removed:
self
54
Removed:
assert: (workout exercises at: 2) englishName
55
Removed:
equals: 'hammer curl'.
56
Removed:
self assert: (workout exercises at: 5) sets first reps equals: 8.
57
Removed:
self assert: (workout exercises at: 6) sets first rpe equals: 6
58
Removed:
]
59
Removed:
60
Removed:
{ #category : #tests }
8
Added:
{ #category : 'tests' }
61
9
MFTWorkoutTest >> testWorkoutIsCreatedCorrectly [
62
10
63
11
| workout |
@@ -65,28 +13,27 @@
65
13
self assert: workout date equals: Date today
66
14
]
67
15
68
Removed:
{ #category : #tests }
16
Added:
{ #category : 'tests' }
69
17
MFTWorkoutTest >> testWorkoutWithPrimaryIsCreatedCorrectly [
70
18
71
19
| workout |
72
Removed:
workout := MFTWorkout primaryMuscle: MFTMuscleGroup back.
20
Added:
workout := MFTWorkout new primaryMuscleGroup:
21
Added:
MFTSQLite3Database allMuscleGroups first.
73
22
self
74
Removed:
assert: workout primaryMuscle englishName equals: 'back';
23
Added:
assert: workout primaryMuscleGroup englishName equals: 'biceps';
75
24
assert: workout date equals: Date today
76
25
]
77
26
78
Removed:
{ #category : #tests }
27
Added:
{ #category : 'tests' }
79
28
MFTWorkoutTest >> testWorkoutWithPrimarySecondaryIsCreatedCorrectly [
80
29
81
30
| workout |
82
Removed:
workout := MFTWorkout
83
Removed:
primaryMuscle: MFTMuscleGroup back
84
Removed:
secondaryMuscles: {
85
Removed:
MFTMuscleGroup arm.
86
Removed:
MFTMuscleGroup chest }.
31
Added:
workout := MFTWorkout new
32
Added:
primaryMuscleGroup: MFTSQLite3Database allMuscleGroups first;
33
Added:
secondaryMuscleGroups: (MFTSQLite3Database allMuscleGroups copyFrom: 2 to: 3).
87
34
self
88
Removed:
assert: workout primaryMuscle englishName equals: 'back';
89
Removed:
assert: workout secondaryMuscles first englishName equals: 'arm';
90
Removed:
assert: (workout secondaryMuscles at: 2) englishName equals: 'chest';
35
Added:
assert: workout primaryMuscleGroup englishName equals: 'biceps';
36
Added:
assert: workout secondaryMuscleGroups first englishName equals: 'triceps';
37
Added:
assert: (workout secondaryMuscleGroups at: 2) englishName equals: 'calf';
91
38
assert: workout date equals: Date today
92
39
]
src/MyFitnessTracker-Tests/package.st
@@ -1,1 +1,1 @@
1
Removed:
Package { #name : #'MyFitnessTracker-Tests' }
1
Added:
Package { #name : 'MyFitnessTracker-Tests' }