Interesting how Athens drawing will change picture2013/10/12 Nicolas Cellier <nicolas.cellier.aka.nice@gmail.com>
So here is the display mini bench:Squeak revised BitBltDisplayScanner 1077ms / Pharo MultiDisplayScanner 1229ms / Pharo TxText 1584ms
������ | text canvas m1 m2 |
������ canvas := FormCanvas extent:�� 569@399 depth: 32.������ m1 := TextMorph new.
������ text := Compiler evaluate: (FileSystem workingDirectory parent parent parent / 'text.st' ) readStream contentsOfEntireFile .
������ m1 text: text textStyle: TextStyle default.
������ m1 wrapFlag: true.
������ m1 extent: 569@9999999.
������ MessageTally spyOn: [ 100 timesRepeat: [
�������������� m1 drawOn: canvas]].
������ m2 := TxTextMorph new.
������ m2 layoutStrategy: TxWrapTextStrategy new.
������ m2 extent: 569@9999999.
������ m2 newTextContents: text.
������ MessageTally spyOn: [ 100 timesRepeat: [
���� �� ���� m2 drawOn: canvas]].