The mistake is simple. You have to write as follows (just replace cell for self in two lines before should and shouldnt):

testCellOnState
� � � | cell |
� � � cell := BlankCell new.
� � � self should: [ cell isOff ].
� � � self shouldnt: �[ cell isOn ].



2014-04-02 16:12 GMT+03:00 Roelof Wobben <r.wobben@home.nl>:
Mark Rizun schreef op 2-4-2014 15:07:

Could you give me the code of test that fails?



I can but I did already.

The code is :


testCellOnState
� � � | cell |
� � � cell := BlankCell new.
� � � cell should: [ cell isOff ].
� � � cell shouldnt: �[ cell isOn ].

And this is a code which succeeced:

estCellExitSides
� � �| cell exit |
� � cell := BlankCell new.
� � exit := cell exitSideFor: #north.
� � self should: [ exit = #south ].
� � exit := cell exitSideFor: #east.
� � self should: [ exit = #west ].
� � exit := cell exitSideFor: #south.
� � self should: [ exit = #north ].
� � exit := cell exitSideFor: #west.
� � self should: [ exit = #east ].

Roelof