[squeak-dev] The Trunk: CollectionsTests-mt.364.mcz
commits at source.squeak.org
commits at source.squeak.org
Thu Dec 2 15:06:41 UTC 2021
Marcel Taeumel uploaded a new version of CollectionsTests to project The Trunk:
http://source.squeak.org/trunk/CollectionsTests-mt.364.mcz
==================== Summary ====================
Name: CollectionsTests-mt.364
Author: mt
Time: 2 December 2021, 4:06:39.658715 pm
UUID: ab63b474-7dcb-bf4f-b41d-2a660e2b7a1c
Ancestors: CollectionsTests-mt.363
Complements Collections-mt.966.
=============== Diff against CollectionsTests-mt.363 ===============
Item was added:
+ ----- Method: TextTest>>test08AddAttributeUnless (in category 'tests') -----
+ test08AddAttributeUnless
+
+ | text attributeOne attributeTwo |
+ text := Text fromString: 'Hello World!!'.
+ attributeOne := TextEmphasis bold.
+ attributeTwo := TextColor color: Color yellow.
+ text addAttribute: attributeOne from: 1 to: 5 "Hello".
+ text
+ addAttribute: attributeTwo
+ unless: [:attrs | attrs anySatisfy: [:ea | ea == attributeOne]].
+
+ 1 to: 5 do: [:index |
+ self assert: {attributeOne} equals: (text attributesAt: index)].
+ 6 to: text size do: [:index |
+ self assert: {attributeTwo} equals: (text attributesAt: index)]. !
More information about the Squeak-dev
mailing list
|