diff options
| author | Eugen Wissner <belka@caraus.de> | 2025-11-23 17:01:59 +0100 |
|---|---|---|
| committer | Eugen Wissner <belka@caraus.de> | 2025-11-23 17:01:59 +0100 |
| commit | bf11813e4fa859a4833cab226c4ea560765d6d77 (patch) | |
| tree | 480e175d8dbb27376841c27dd4250f89f7bfb9a9 /pharo-mooc/redo/src/MyCounter/CounterTest.class.st | |
| parent | 8568518b57dba05500b63a4e471f8fa65883d10a (diff) | |
| download | book-exercises-bf11813e4fa859a4833cab226c4ea560765d6d77.tar.gz | |
Add ReDo Pharo excercises
Diffstat (limited to 'pharo-mooc/redo/src/MyCounter/CounterTest.class.st')
| -rw-r--r-- | pharo-mooc/redo/src/MyCounter/CounterTest.class.st | 55 |
1 files changed, 55 insertions, 0 deletions
diff --git a/pharo-mooc/redo/src/MyCounter/CounterTest.class.st b/pharo-mooc/redo/src/MyCounter/CounterTest.class.st new file mode 100644 index 0000000..ba2afe5 --- /dev/null +++ b/pharo-mooc/redo/src/MyCounter/CounterTest.class.st @@ -0,0 +1,55 @@ +Class { + #name : #CounterTest, + #superclass : #TestCase, + #category : #MyCounter +} + +{ #category : #tests } +CounterTest >> testCountIsSetAndRead [ + | c | + c := Counter new. + c count: 7. + self assert: c count equals: 7 +] + +{ #category : #tests } +CounterTest >> testCounterWellInitialized [ + self assert: (Counter new increment; increment; count) equals: 2 +] + +{ #category : #tests } +CounterTest >> testDecrement [ + | c | + c := Counter new. + c count: 2. + c decrement; decrement. + self assert: c count equals: 0 +] + +{ #category : #tests } +CounterTest >> testIncrement [ + | c | + c := Counter new. + c count: 2. + c increment; increment. + self assert: c count equals: 4 +] + +{ #category : #tests } +CounterTest >> testInizialize [ + self assert: Counter new count equals: 0 +] + +{ #category : #tests } +CounterTest >> testStartingAt5 [ + | c | + c := Counter startingAt: 5. + self assert: c count equals: 5 +] + +{ #category : #tests } +CounterTest >> testStartingAt5Increment [ + | c | + c := Counter startingAt: 5. + self assert: (c increment; count) equals: 6 +] |
