| tests |
| testBack
|
self newApplicationWithRootClass: WACounter.
self establishSession.
self
followAnchor: (self lastResponse anchorWithLabel: '++').
self
followAnchor: (self lastResponse anchorWithLabel: '++').
self assert: self component count = 2.
self back.
self
followAnchor: (self lastResponse anchorWithLabel: '++').
self assert: self component count = 2
|
| testDecrement
|
self newApplicationWithRootClass: WACounter.
self establishSession.
self followAnchor: (self lastResponse anchorWithLabel: '--').
self assert: self component count = -1.
self followAnchor: (self lastResponse anchorWithLabel: '--').
self assert: self component count = -2
|
| testIncrement
|
self newApplicationWithRootClass: WACounter.
self establishSession.
self followAnchor: (self lastResponse anchorWithLabel: '++').
self assert: self component count = 1.
self followAnchor: (self lastResponse anchorWithLabel: '++').
self assert: self component count = 2
|
| testInitialState
|
self newApplicationWithRootClass: WACounter.
self establishSession.
self assert: self component count = 0
|