Squeak-dev February 2014

squeak-dev@lists.squeakfoundation.org

71 participants
188 discussions

Squeak 4.5: Graphics-nice.289.mcz
by commits＠source.squeak.org 19 Feb '14

19 Feb '14

Chris Muller uploaded a new version of Graphics to project Squeak 4.5: http://source.squeak.org/squeak45/Graphics-nice.289.mcz ==================== Summary ==================== Name: Graphics-nice.289 Author: nice Time: 17 February 2014, 11:29:40.779 pm UUID: e809bcbf-53e1-420b-846a-9e86e0dd1f06 Ancestors: Graphics-nice.288 Fix incorrect display of underscore and caret in case of WideString displayed in DejaVu sans Strike fonts. Those fonts map caret Character (ascii 94) and underscore Character (ascii 95) to xTable at: 128 and 129 to avoid display of up and left arrow (thanks to characterToGlypMap ivar) But some StrikeFont methods did access directly the xTable, ignoring the indirection characterToGlypMap. This is incorrect, and lead to various layout problems because widthOf: correctly takes the indirection into account. Among those problems we can cite: - incorrect measurement of strings, - unconsistent placement of cursor, - weird text selection This fix is a serious candidate for inclusion in 4.5 release, but I let the maintainer decide... =============== Diff against Graphics-nice.288 =============== Item was changed: ----- Method: StrikeFont>>characterFormAt: (in category 'character shapes') ----- characterFormAt: character "Answer a Form copied out of the glyphs for the argument, character." | ascii leftX rightX | + ascii := self codeForCharacter: character. - ascii := character charCode. (ascii between: minAscii and: maxAscii) ifFalse: [ascii := maxAscii + 1]. leftX := xTable at: ascii + 1. rightX := xTable at: ascii + 2. leftX < 0 ifTrue: [^ glyphs copy: (0@0 corner: 0@self height)]. ^ glyphs copy: (leftX @ 0 corner: rightX @ self height)! Item was removed: - ----- Method: StrikeFont>>characterFormAtMulti: (in category 'character shapes') ----- - characterFormAtMulti: character - "Answer a Form copied out of the glyphs for the argument, character." - | ascii leftX rightX | - ascii := character charCode. - (ascii between: minAscii and: maxAscii) ifFalse: [ascii := maxAscii + 1]. - leftX := xTable at: ascii + 1. - rightX := xTable at: ascii + 2. - ^ glyphs copy: (leftX @ 0 corner: rightX @ self height)! Item was changed: ----- Method: StrikeFont>>characters:in:displayAt:clippedBy:rule:fillColor:kernDelta:on: (in category 'displaying') ----- characters: anInterval in: sourceString displayAt: aPoint clippedBy: clippingRectangle rule: ruleInteger fillColor: aForm kernDelta: kernDelta on: aBitBlt "Simple, slow, primitive method for displaying a line of characters. No wrap-around is provided." | destPoint | destPoint := aPoint. anInterval do: [:i | | sourceRect leftX ascii rightX | self flag: #yoDisplay. "if the char is not supported, fall back to the specified fontset." + ascii := self codeForCharacter: (sourceString at: i). - ascii := (sourceString at: i) charCode. (ascii < minAscii or: [ascii > maxAscii]) ifTrue: [ascii := maxAscii]. leftX := xTable at: ascii + 1. rightX := xTable at: ascii + 2. sourceRect := leftX@0 extent: (rightX-leftX) @ self height. aBitBlt copyFrom: sourceRect in: glyphs to: destPoint. destPoint := destPoint + ((rightX-leftX+kernDelta)@0). "destPoint printString displayAt: 0@(i*20)"]. ^ destPoint! Item was added: + ----- Method: StrikeFont>>codeForCharacter: (in category 'private') ----- + codeForCharacter: aCharacter + | code | + code := aCharacter charCode. + (self characterToGlyphMap isNil + or: [ characterToGlyphMap size <= code ]) + ifTrue: [^code]. + ^characterToGlyphMap at: code + 1! Item was changed: ----- Method: StrikeFont>>glyphInfoOf:into: (in category 'accessing') ----- glyphInfoOf: aCharacter into: glyphInfoArray "return the glyph info for aCharacter; if I don't have such a character, try my fallback font, if I have one of those. Unlike some other implementors, the returned info for a missing character is not given for the question-mark but rather the zero-ascii char." | code | (self hasGlyphOf: aCharacter) + ifTrue: [code := self codeForCharacter: aCharacter] - ifTrue: [code := aCharacter charCode] ifFalse: [fallbackFont ifNotNil: [^ fallbackFont glyphInfoOf: aCharacter into: glyphInfoArray]. code := 0]. glyphInfoArray at: 1 put: glyphs; at: 2 put: (xTable at: code + 1); at: 3 put: (xTable at: code + 2); at: 4 put: (self ascentOf: aCharacter); at: 5 put: self. ^ glyphInfoArray! Item was changed: ----- Method: StrikeFont>>glyphOf: (in category 'accessing') ----- glyphOf: aCharacter "Answer the width of the argument as a character in the receiver." | code | (self hasGlyphOf: aCharacter) ifFalse: [ fallbackFont ifNotNil: [ ^ fallbackFont glyphOf: aCharacter. ]. ^ (Form extent: 1@self height) fillColor: Color white ]. + code := self codeForCharacter: aCharacter. - code := aCharacter charCode. ^ glyphs copy: (((xTable at: code + 1)@0) corner: (xTable at: code +2)@self height). ! Item was added: + ----- Method: StrikeFont>>hasGlyphForCode: (in category 'multibyte character methods') ----- + hasGlyphForCode: aCharacterCode + + ((aCharacterCode between: self minAscii and: self maxAscii) not) ifTrue: [ + ^ false. + ]. + (xTable at: aCharacterCode + 1) < 0 ifTrue: [ + ^ false. + ]. + ^ true. + ! Item was changed: ----- Method: StrikeFont>>hasGlyphOf: (in category 'multibyte character methods') ----- hasGlyphOf: aCharacter + ^self hasGlyphForCode: (self codeForCharacter: aCharacter) - | code | - code := aCharacter charCode. - ((code between: self minAscii and: self maxAscii) not) ifTrue: [ - ^ false. - ]. - (xTable at: code + 1) < 0 ifTrue: [ - ^ false. - ]. - ^ true. ! Item was removed: - ----- Method: StrikeFont>>leftAndRighOrNilFor: (in category 'private') ----- - leftAndRighOrNilFor: char - - | code leftX | - code := char charCode. - ((code between: self minAscii and: self maxAscii) not) ifTrue: [ - code := $? charCode. - ]. - leftX := xTable at: code + 1. - leftX < 0 ifTrue: [ - code := $? charCode. - leftX := xTable at: code + 1. - ]. - ^ Array with: leftX with: (xTable at: code + 2). - !

1 0

Re: [squeak-dev] Squeak 4.5: Tools-cmm.519.mcz
by Chris Muller 19 Feb '14

19 Feb '14

Something definitely seems wrong with copying from trunk to squeak45. The packages end up empty on squeak45, and I can't even delete them through the web interface. Had to go in and sudo remove them.. On Wed, Feb 19, 2014 at 11:08 AM, <commits(a)source.squeak.org> wrote: > Chris Muller uploaded a new version of Tools to project Squeak 4.5: > http://source.squeak.org/squeak45/Tools-cmm.519.mcz > > ==================== Summary ==================== > > Name: Tools-cmm.519 > Author: cmm > Time: 18 February 2014, 4:17:22.819 pm > UUID: dae6bdb9-8b54-491a-a2a4-0b114f02e10d > Ancestors: Tools-cmm.518 > > - Fix cloning MessageSet's. > - Pointer-chaser, display the id-hash of Morph's in the path to chased object. > > =============== Diff against Tools-cmm.518 =============== > >

1 0

Mantis usage rules du jour
by tim Rowledge 19 Feb '14

19 Feb '14

I'm submitting a bug fix and thought I'd ask what the current favoured procedure is. Simply submitting is as irritating as it ever was in Mantis, but once I've done that, uploaded my fix and made a note about it… what do we do next? To whom might I assign it for action in getting into the image for the next release? Or is that done some other way now? Is there documentation on the current process that I failed to spot? tim -- tim Rowledge; tim(a)rowledge.org; http://www.rowledge.org/tim Strange OpCodes: XO: Execute Operator

15 34

Squeak 4.5: Tests-cmm.290.mcz
by commits＠source.squeak.org 19 Feb '14

19 Feb '14

Chris Muller uploaded a new version of Tests to project Squeak 4.5: http://source.squeak.org/squeak45/Tests-cmm.290.mcz ==================== Summary ==================== Name: Tests-cmm.290 Author: cmm Time: 17 February 2014, 4:35:24.565 pm UUID: f3fccfae-6baf-4093-ba62-e15ef110a687 Ancestors: Tests-cwp.289 Minor factoring. =============== Diff against Tests-cwp.289 =============== Item was changed: ----- Method: BlockLocalTemporariesRemovalTest>>assert:isChangedDuringParsingTo:withRemovalOfTemporariesNamed: (in category 'test helper') ----- + assert: someCode isChangedDuringParsingTo: someOtherCode withRemovalOfTemporariesNamed: someTempNames - assert: someCode isChangedDuringParsingTo: someOtherCode withRemovalOfTemporariesNamed: someTempNames - | failBlock | self sourceCode: someCode. + failBlock := [ self fail ]. + [ self class + compile: self sourceCode + notifying: self + trailer: self class defaultMethodTrailer + ifFail: failBlock ] - failBlock := [self fail]. - [self class - compile: self sourceCode - notifying: self - trailer: self class defaultMethodTrailer - ifFail: failBlock] on: UnusedVariable + do: + [ : aNotification | aNotification openMenuIn: + [ : options : emptyCollection : someText | aNotification resume: + (someTempNames anySatisfy: + [ : tempName | someText beginsWith: tempName ]) ] ]. - do: [:aNotification | aNotification - openMenuIn: [:options :emptyCollection :someText | - (someTempNames anySatisfy: [:tempName | someText startsWith: tempName]) - ifTrue: [aNotification resume: true] - ifFalse: [aNotification resume: false]]]. self assert: self sourceCode = someOtherCode!

1 0

Squeak 4.5: Tools-cmm.518.mcz
by commits＠source.squeak.org 19 Feb '14

19 Feb '14

Chris Muller uploaded a new version of Tools to project Squeak 4.5: http://source.squeak.org/squeak45/Tools-cmm.518.mcz ==================== Summary ==================== Name: Tools-cmm.518 Author: cmm Time: 3 February 2014, 3:40:50.779 pm UUID: 6277da39-26fa-467e-9b30-244ee58b4000 Ancestors: Tools-topa.517 References through named instVars are strong even on weak classes. Fix PointerFinder behavior accordingly. Add comment reminding about the purpose of Object>>#shouldFollowOutboundPointers. =============== Diff against Tools-topa.517 =============== Item was changed: ----- Method: Object>>shouldFollowOutboundPointers (in category '*Tools-Debugger') ----- shouldFollowOutboundPointers + "Allow other subclasses of ProtoObject to hook this method." (self class isPointers or: [ self isCompiledMethod ]) ifFalse: [ ^ false ]. + ^ (self class isWeak not or: [ self class instSize > 0 ]) and: [ self isLiteral not ]! - ^ self class isWeak not and: [ self isLiteral not ]!

1 0

Webteam list is open
by Chris Cunnington 19 Feb '14

19 Feb '14

>("Attempting" because the interwebs seem a bit slower than usual.) Yeaaa... it may not be you. I'm having some trouble logging into the admin panel. I sent an email and it's gone into the void, so there maybe be a technical hiccup here. Chris

2 1

Webteam list is open
by Chris Cunnington 19 Feb '14

19 Feb '14

Technically, I don't think it was every closed. I have an administrator's password now, so that may be useful. Any discussion about squeak.org ideas could move over to that list. http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/webteam Thanks, Chris

2 1

Squeak 4.5: System-dtl.666.mcz
by commits＠source.squeak.org 19 Feb '14

19 Feb '14

Chris Muller uploaded a new version of System to project Squeak 4.5: http://source.squeak.org/squeak45/System-dtl.666.mcz ==================== Summary ==================== Name: System-dtl.666 Author: dtl Time: 15 February 2014, 9:53:14.979 pm UUID: 098b856a-ecc5-498a-bceb-ef3457d3511e Ancestors: System-dtl.665 Sending basicNew to CompiledMethod may crash the VM, so don't do that. =============== Diff against System-dtl.665 ===============

1 0

Squeak 4.5: Tools-cmm.519.mcz
by commits＠source.squeak.org 19 Feb '14

19 Feb '14

Chris Muller uploaded a new version of Tools to project Squeak 4.5: http://source.squeak.org/squeak45/Tools-cmm.519.mcz ==================== Summary ==================== Name: Tools-cmm.519 Author: cmm Time: 18 February 2014, 4:17:22.819 pm UUID: dae6bdb9-8b54-491a-a2a4-0b114f02e10d Ancestors: Tools-cmm.518 - Fix cloning MessageSet's. - Pointer-chaser, display the id-hash of Morph's in the path to chased object. =============== Diff against Tools-cmm.518 ===============

1 0

[GSoC ideas] Squeak
by Bert Freudenberg 19 Feb '14

19 Feb '14

(sending on behalf of Paolo Bonzini, who runs this year's Smalltalk GSoC) Hi folks, ESUG, the European Smalltalk User Group, is applying for this year's Google Summer of Code. As you probably know, the Summer of Code provides the opportunity to fund students to work during the summer on Smalltalk. Please reply to this email (be sure to use "Reply to all") if you have ideas you would like to propose. Please include a summary of the project and links to web pages that can help prospective students to write their application. Please also include the following information: - if applicable, other dialects that you would be willing to mentor this project for - the skill level - name of the mentor(s), email addresses, and possibly any IRC network/channel/nickname where they can be found. Thanks for contributing to ESUG's Summer of Code application! - Bert -

5 6

← Newer
1
...
4
5
6
7
8
9
10
...
19
Older →

Jump to page: