Nicolas Cellier uploaded a new version of Graphics to project The Trunk:
http://source.squeak.org/trunk/Graphics-nice.78.mcz==================== Summary ====================
Name: Graphics-nice.78
Author: nice
Time: 5 October 2009, 10:23:47 am
UUID: 9d65b8d9-3b98-4920-a65d-8d0c2588b973
Ancestors: Graphics-jmv.77
Fix
http://bugs.squeak.org/view.php?id=6450Let CharacterScanner honour the stops argument rather than using stopConditions instVar.
=============== Diff against Graphics-jmv.77 ===============
Item was changed:
----- Method: CharacterScanner>>scanCharactersFrom:to:in:rightX:stopConditions:kern: (in category 'scanning') -----
scanCharactersFrom: startIndex to: stopIndex in: sourceString rightX: rightX stopConditions: stops kern: kernDelta
| startEncoding selector |
(sourceString isByteString) ifTrue: [^ self basicScanCharactersFrom: startIndex to: stopIndex in: sourceString rightX: rightX stopConditions: stops kern: kernDelta.].
(sourceString isWideString) ifTrue: [
startIndex > stopIndex ifTrue: [lastIndex := stopIndex. ^ stops at: EndOfRun].
startEncoding := (sourceString at: startIndex) leadingChar.
selector := EncodedCharSet scanSelectorAt: startEncoding.
+ ^ self perform: selector withArguments: (Array with: startIndex with: stopIndex with: sourceString with: rightX with: stops with: kernDelta).
- ^ self perform: selector withArguments: (Array with: startIndex with: stopIndex with: sourceString with: rightX with: stopConditions with: kernDelta).
].
^ stops at: EndOfRun
!