Mantis - Squeak
Viewing Issue Advanced Details
3709 Morphic minor always 05-24-06 06:51 07-12-06 22:22
DF  
 
normal  
closed 3.9  
fixed  
none    
none 3.9  
0003709: Fix for TileMorphTest >>#testSoundTile
In 3.9b-7032 TileMorphTest>>#testSoundTile fails because it sends arrowAction: 1 and then expects the codeString ('silence') but in this version codeString returns another sound name.
I have never used TileMorph but looking in the code, I guess that the intention of the test was that after #arrowAction: 1 (1 is a delta), the next #soundChoice has to be the #literal of the TileMorph.
So I changed the test from:

testSoundTile
    "self debug: #testSoundTile"
    | tile dummy |
    dummy _ Morph new.
    tile _ SoundTile new literal: 'croak'.
    dummy addMorph: tile.
    tile arrowAction: 1.
    self assert: tile codeString = '(''silence'')'.

to:

testSoundTile

    | tile dummy expectedCodeString |

    dummy := Morph new.
    tile := SoundTile new.
    tile literal: tile soundChoices first.
    dummy addMorph: tile.
    tile arrowAction: 1.
    expectedCodeString := '(', tile soundChoices second printString, ')'.

    self assert: tile codeString = expectedCodeString
        description: '#codeString should be the next sound choice'
 MorphicTestFixes.1.cs [^] (530 bytes) 05-24-06 06:51

Notes
(0005815)
MarcusDenker   
07-12-06 22:22   
added