[squeak-dev] The Trunk: MorphicTests-mt.86.mcz
commits at source.squeak.org
commits at source.squeak.org
Sun Apr 17 13:03:17 UTC 2022
Marcel Taeumel uploaded a new version of MorphicTests to project The Trunk:
http://source.squeak.org/trunk/MorphicTests-mt.86.mcz
==================== Summary ====================
Name: MorphicTests-mt.86
Author: mt
Time: 17 April 2022, 3:03:16.089818 pm
UUID: 5be13c0d-1fa7-9945-875f-127f055593e0
Ancestors: MorphicTests-mt.85
Complements Graphics-mt.509 with a test.
(Note that NewParagraph should be moved out of Morphic in the future.)
=============== Diff against MorphicTests-mt.85 ===============
Item was added:
+ TestCase subclass: #NewParagraphTest
+ instanceVariableNames: ''
+ classVariableNames: ''
+ poolDictionaries: ''
+ category: 'MorphicTests-Text Support'!
Item was added:
+ ----- Method: NewParagraphTest>>test01RecomposeWithTrailingLineBreak (in category 'tests') -----
+ test01RecomposeWithTrailingLineBreak
+
+ | text para |
+ text := 'a\b\c\' withCRs asText.
+ para := NewParagraph new.
+
+ para compose: text style: TextStyle default from: 1 in: (0 at 0 extent: 9999 at 999).
+ self assert: 4 equals: para lines size.
+
+ text replaceFrom: 1 to: 0 with: 'x' asText.
+ para recomposeFrom: 1 to: 1 delta: 1.
+ self assert: 4 equals: para lines size. "Keep trailing null-line"
+
+ text replaceFrom: 8 to: 7 with: 'x' asText.
+ para recomposeFrom: 8 to: 8 delta: 1.
+ self assert: 4 equals: para lines size. "No trailing null-line"!
More information about the Squeak-dev
mailing list
|