Marcel Taeumel uploaded a new version of Tools to project The Trunk: http://source.squeak.org/trunk/Tools-mt.1170.mcz
==================== Summary ====================
Name: Tools-mt.1170 Author: mt Time: 4 August 2022, 9:56:14.130989 am UUID: f1a0f561-f71d-624a-8ba4-8c4bdf7999b8 Ancestors: Tools-mt.1169
Adds two utility methods to easily browse the glyphs of fonts as forms. Use it to debug rendering issues.
=============== Diff against Tools-mt.1169 ===============
Item was added: + ----- Method: StrikeFont>>collectAllGlyphs (in category '*Tools-Browsing') ----- + collectAllGlyphs + "Answer all (pre-rendered) glyphs as a collection of forms. + Example: + StrikeFont someInstance collectAllGlyphs explore + " + + | allGlyphs | + allGlyphs := OrderedCollection new: 1000. + self minCodePoint to: self maxCodePoint do: [:codePoint | + (self hasGlyphOf: (Character value: codePoint)) + ifTrue: [allGlyphs add: (self formOf: (Character value: codePoint))]]. + ^ allGlyphs!
Item was added: + ----- Method: TTCFont>>collectAllGlyphs (in category '*Tools-Browsing') ----- + collectAllGlyphs + "Answer all (uncached) glyphs as a collection of forms. Note that the current font cache will not be modified by calling this utility method. + Example: + TTCFont someInstance collectAllGlyphs explore + " + + | allGlyphs | + foregroundColor ifNil: [self foregroundColor: Color black]. + allGlyphs := OrderedCollection new: 1000. + self minCodePoint to: self maxCodePoint do: [:codePoint | + (self hasGlyphOf: (Character value: codePoint)) + ifTrue: [allGlyphs add: (self computeForm: codePoint)]]. + ^ allGlyphs!
squeak-dev@lists.squeakfoundation.org