Nicolas Cellier uploaded a new version of CollectionsTests to project The Trunk:
http://source.squeak.org/trunk/CollectionsTests-nice.269.mcz ==================== Summary ==================== Name: CollectionsTests-nice.269 Author: nice Time: 20 October 2016, 10:25:24.313721 pm UUID: dca0539f-a0a3-4f11-951b-84d5a3d4cd6a Ancestors: CollectionsTests-nice.268 Rename HalfWord -> DoubleByte according to Eliot's protocol =============== Diff against CollectionsTests-nice.268 =============== Item was added: + ClassTestCase subclass: #DoubleByteArrayTest + instanceVariableNames: '' + classVariableNames: '' + poolDictionaries: '' + category: 'CollectionsTests-Arrayed'! + + !DoubleByteArrayTest commentStamp: 'nice 9/21/2016 21:08' prior: 0! + HalfWordArrayTest are SUnit tests for HalfWordArray. + ! Item was added: + ----- Method: DoubleByteArrayTest>>testAllPossibleValues (in category 'testing') ----- + testAllPossibleValues + | doubleByteArray | + doubleByteArray := (1 to: 65535) as: DoubleByteArray. + 1 to: doubleByteArray size do: [:i | + self assert: (doubleByteArray at: i) = i]! Item was added: + ----- Method: DoubleByteArrayTest>>testByteSize (in category 'testing') ----- + testByteSize + self assert: (DoubleByteArray new: 1) byteSize = 2 "2 bytes are 16 bits"! Item was added: + ----- Method: DoubleByteArrayTest>>testCannotPutNegativeValue (in category 'testing') ----- + testCannotPutNegativeValue + self should: [DoubleByteArray with: -1] raise: Error! Item was added: + ----- Method: DoubleByteArrayTest>>testCannotPutTooLargeValue (in category 'testing') ----- + testCannotPutTooLargeValue + | maxValue | + maxValue := 1 << 16 - 1. + self assert: (DoubleByteArray with: maxValue) first = maxValue. + self should: [DoubleByteArray with: maxValue + 1] raise: Error! Item was added: + ----- Method: DoubleByteArrayTest>>testElementSize (in category 'testing') ----- + testElementSize + self assert: DoubleByteArray new bytesPerElement = 2 "2 bytes are 16 bits"! Item was removed: - ClassTestCase subclass: #HalfWordArrayTest - instanceVariableNames: '' - classVariableNames: '' - poolDictionaries: '' - category: 'CollectionsTests-Arrayed'! - - !HalfWordArrayTest commentStamp: 'nice 9/21/2016 21:08' prior: 0! - HalfWordArrayTest are SUnit tests for HalfWordArray. - ! Item was removed: - ----- Method: HalfWordArrayTest>>testAllPossibleValues (in category 'testing') ----- - testAllPossibleValues - | halfWordArray | - halfWordArray := (1 to: 65535) as: HalfWordArray. - 1 to: halfWordArray size do: [:i | - self assert: (halfWordArray at: i) = i]! Item was removed: - ----- Method: HalfWordArrayTest>>testByteSize (in category 'testing') ----- - testByteSize - self assert: (HalfWordArray new: 1) byteSize = 2 "2 bytes are 16 bits"! Item was removed: - ----- Method: HalfWordArrayTest>>testCannotPutNegativeValue (in category 'testing') ----- - testCannotPutNegativeValue - self should: [HalfWordArray with: -1] raise: Error! Item was removed: - ----- Method: HalfWordArrayTest>>testCannotPutTooLargeValue (in category 'testing') ----- - testCannotPutTooLargeValue - | maxValue | - maxValue := 1 << 16 - 1. - self assert: (HalfWordArray with: maxValue) first = maxValue. - self should: [HalfWordArray with: maxValue + 1] raise: Error! Item was removed: - ----- Method: HalfWordArrayTest>>testElementSize (in category 'testing') ----- - testElementSize - self assert: HalfWordArray new bytesPerElement = 2 "2 bytes are 16 bits"! |
Free forum by Nabble | Edit this page |