Add a test for do: aBlock.
Smalltalk subscript indices start at 1, not 0.