[Pkg] The Trunk: Tests-nice.46.mcz

commits at source.squeak.org commits at source.squeak.org
Thu Feb 11 13:44:58 UTC 2010


Nicolas Cellier uploaded a new version of Tests to project The Trunk:
http://source.squeak.org/trunk/Tests-nice.46.mcz

==================== Summary ====================

Name: Tests-nice.46
Author: nice
Time: 11 February 2010, 2:44:55.549 pm
UUID: 8f8c4e25-365e-4442-a1e0-d534b00d72c7
Ancestors: Tests-ar.45

Use literal ByteArray where due

=============== Diff against Tests-ar.45 ===============

Item was changed:
  ----- Method: BitmapStreamTests>>testShortPointArrayWithRefStream2 (in category 'tests-ShortPointArray') -----
  testShortPointArrayWithRefStream2
  	array := ShortPointArray with: 0 at 1 with: 2 at 3.
  	self validateRefStream.
+ 	self assert: stream byteStream contents = #[20 6 15 83 104 111 114 116 80 111 105 110 116 65 114 114 97 121  0 0 0 2  0 0  0 1  0 2  0 3 ]
- 	self assert: stream byteStream contents = (ByteArray withAll: #(20 6 15 83 104 111 114 116 80 111 105 110 116 65 114 114 97 121  0 0 0 2  0 0  0 1  0 2  0 3 ))
  	!

Item was changed:
  ----- Method: BitmapStreamTests>>testShortIntegerArrayReadRefStream2 (in category 'tests-ShortIntegerArray') -----
  testShortIntegerArrayReadRefStream2
+ 	| refStrm |
+ 	refStrm := ReferenceStream on: #[20 6 17 83 104 111 114 116 73 110 116 101 103 101 114 65 114 114 97 121 0 0 0 2 0 0 0 1 0 2 0 3 ] readStream.
- 	|refStrm|
- 	refStrm := ReferenceStream on: ((RWBinaryOrTextStream with: (ByteArray withAll: #(20 6 17 83 104 111 114 116 73 110 116 101 103 101 114 65 114 114 97 121 0 0 0 2 0 0 0 1 0 2 0 3))) reset; binary).
  	self assert: (refStrm next = (ShortIntegerArray with: 0 with: 1 with: 2 with: 3)).!

Item was changed:
  ----- Method: BitmapStreamTests>>testShortIntegerArrayWithRefStream2 (in category 'tests-ShortIntegerArray') -----
  testShortIntegerArrayWithRefStream2
  	array := ShortIntegerArray with: 0 with: 1 with: 2 with: 3.
  	self validateRefStream.
+ 	self assert: stream byteStream contents = #[20 6 17 83 104 111 114 116 73 110 116 101 103 101 114 65 114 114 97 121 0 0 0 2 0 0 0 1 0 2 0 3]
- 	self assert: stream byteStream contents = (ByteArray withAll: #(20 6 17 83 104 111 114 116 73 110 116 101 103 101 114 65 114 114 97 121 0 0 0 2 0 0 0 1 0 2 0 3))
  	
  !

Item was changed:
  ----- Method: BitmapStreamTests>>testShortPointArrayWithSmartRefStream2 (in category 'tests-ShortPointArray') -----
  testShortPointArrayWithSmartRefStream2
  	array := ShortPointArray with: 0 at 1 with: 2 at 3.
  	self validateSmartRefStream.
+ 	self assert: (stream contents asByteArray last: 15) = #[0 0 0 2  0 0  0 1  0 2  0 3  33 13 13 ]
- 	self assert: (stream contents asByteArray last: 15) = (ByteArray withAll: #(0 0 0 2  0 0  0 1  0 2  0 3  33 13 13))
  	!

Item was changed:
  ----- Method: BitmapStreamTests>>testShortRunArrayWithSmartRefStream2 (in category 'tests-ShortRunArray') -----
  testShortRunArrayWithSmartRefStream2
  	array := self createSampleShortRunArray.
  	self validateSmartRefStream.
+ 	self assert: (stream contents asByteArray last: 23) = #[0 0 0 4 0 1 0 0 0 2 0 1 0 3 0 2 0 4 0 3 33 13 13 ]
- 	self assert: (stream contents asByteArray last: 23) = (ByteArray withAll: #(0 0 0 4 0 1 0 0 0 2 0 1 0 3 0 2 0 4 0 3 33 13 13))
  
  !

Item was changed:
  ----- Method: BitmapStreamTests>>testShortIntegerArrayWithSmartRefStream2 (in category 'tests-ShortIntegerArray') -----
  testShortIntegerArrayWithSmartRefStream2
  	array := ShortIntegerArray with: 0 with: 1 with: 2 with: 3.
  	self validateSmartRefStream.
+ 	self assert: (stream contents asByteArray last: 15) = #[0 0 0 2  0 0  0 1  0 2  0 3  33 13 13]
- 	self assert: (stream contents asByteArray last: 15) = (ByteArray withAll: #(0 0 0 2  0 0  0 1  0 2  0 3  33 13 13))
  	
  !



More information about the Packages mailing list