tim Rowledge uploaded a new version of Tests to project The Trunk: http://source.squeak.org/trunk/Tests-tpr.496.mcz
==================== Summary ====================
Name: Tests-tpr.496 Author: tpr Time: 2 January 2023, 4:40:09.512233 pm UUID: 96704432-617d-473f-80fd-356b81e93542 Ancestors: Tests-ct.495
Make the SoundTest>>#testStoreSamples correctly delete the file post-test
=============== Diff against Tests-ct.495 ===============
Item was changed: ----- Method: SoundTest>>testStoreSamples (in category 'tests') ----- testStoreSamples
| sound fileName arrayBytes fileBytes | sound := PluckedSound default. fileName := 'tempPluck.wav'. "Write to file" fileBytes := [ sound storeWAVOnFileNamed: fileName. FileStream oldFileNamed: fileName do: [:stream | stream binary contents]] ensure: [ + FileDirectory default deleteFileNamed: fileName]. - FileDirectory deleteFilePath: fileName]. "Write to array" arrayBytes := ByteArray streamContents: [:stream | sound storeWAVSamplesOn: stream]. "Compare" self assert: fileBytes equals: arrayBytes.!
packages@lists.squeakfoundation.org