Squeak-dev October 2009

squeak-dev@lists.squeakfoundation.org

84 participants
353 discussions

The Trunk: Compiler-nice.95.mcz
by commits＠source.squeak.org 27 Oct '09

27 Oct '09

Nicolas Cellier uploaded a new version of Compiler to project The Trunk: http://source.squeak.org/trunk/Compiler-nice.95.mcz ==================== Summary ==================== Name: Compiler-nice.95 Author: nice Time: 27 October 2009, 2:58:34 am UUID: 33175bf0-fc6b-7f4f-ba04-3433f42610f9 Ancestors: Compiler-nice.94 Be verbose in case of illegal character This might be usefull if the character is not not visible, or not displayable by current font. =============== Diff against Compiler-nice.94 =============== Item was changed: ----- Method: Scanner>>xIllegal (in category 'multi-character scans') ----- xIllegal "An illegal character was encountered" + self notify: 'Illegal character (char code ' , hereChar charCode , ' 16r' , hereChar charCode hex , ')' at: mark! - self notify: 'Illegal character' at: mark!

1 0

The Trunk: Tools-nice.139.mcz
by commits＠source.squeak.org 27 Oct '09

27 Oct '09

Nicolas Cellier uploaded a new version of Tools to project The Trunk: http://source.squeak.org/trunk/Tools-nice.139.mcz ==================== Summary ==================== Name: Tools-nice.139 Author: nice Time: 27 October 2009, 12:33:28 pm UUID: 469d55be-9009-4f49-879e-35cab285093c Ancestors: Tools-nice.138 (Compiler evaluate: '#x:0') fails to open a SyntaxError. I provide a quick fix hereafter. =============== Diff against Tools-nice.138 =============== Item was changed: ----- Method: SyntaxError>>list (in category 'message list') ----- list "Answer an array of one element made up of the class name, message category, and message selector in which the syntax error was found. This is the single item in the message list of a view/browser on the receiver." + ^ Array with: (class name, ' ', (category ifNil: ['<none>']), ' ', (selector ifNil: ['<none>'])) - selector ifNil: [^ Array with: (class name, ' ', category, ' ', '<none>')]. - ^ Array with: (class name, ' ', category, ' ', selector) !

1 0

The Trunk: Compiler-nice.94.mcz
by commits＠source.squeak.org 27 Oct '09

27 Oct '09

Nicolas Cellier uploaded a new version of Compiler to project The Trunk: http://source.squeak.org/trunk/Compiler-nice.94.mcz ==================== Summary ==================== Name: Compiler-nice.94 Author: nice Time: 27 October 2009, 12:28:57 pm UUID: 42292a5b-3735-fc4b-883b-42249a88aac9 Ancestors: Compiler-nice.93 Ensure usage of #typeTableAt: rather than typeTable ivar to handle Wide characters =============== Diff against Compiler-nice.93 =============== Item was changed: ----- Method: Scanner>>scanAllTokenPositionsInto: (in category 'expression types') ----- scanAllTokenPositionsInto: aBlock "Evaluate aBlock with the start and end positions of all separate non-white-space tokens, including comments." | lastMark | lastMark := 1. [currentComment notNil ifTrue: [currentComment do: [:cmnt| | idx | idx := source originalContents indexOfSubCollection: cmnt startingAt: lastMark. (idx > 0 and: [idx < mark]) ifTrue: [aBlock value: idx - 1 value: (lastMark := idx + cmnt size)]]. currentComment := nil]. mark notNil ifTrue: [(token == #- + and: [(self typeTableAt: hereChar) = #xDigit]) ifTrue: - and: [(typeTable at: hereChar charCode) = #xDigit]) ifTrue: [| savedMark | savedMark := mark. self scanToken. token := token negated. mark := savedMark]. "Compensate for the fact that the parser uses two character lookahead. Normally we must remove the extra two chaacters. But this mustn't happen for the last token at the end of stream." aBlock value: mark value: (source atEnd ifTrue: [tokenType := #doIt. "to cause an immediate ^self" source position] ifFalse: [source position - 2])]. (tokenType = #rightParenthesis or: [tokenType == #doIt]) ifTrue: [^self]. tokenType = #leftParenthesis ifTrue: [self scanToken; scanAllTokenPositionsInto: aBlock] ifFalse: [(tokenType = #word or: [tokenType = #keyword or: [tokenType = #colon]]) ifTrue: [self scanLitWord. token = #true ifTrue: [token := true]. token = #false ifTrue: [token := false]. token = #nil ifTrue: [token := nil]] ifFalse: [(token == #- + and: [(self typeTableAt: hereChar) = #xDigit]) - and: [(typeTable at: hereChar charCode) = #xDigit]) ifTrue: [self scanToken. token := token negated]]]. self scanToken. true] whileTrue!

1 0

Daily Commit Log
by commits＠source.squeak.org 27 Oct '09

27 Oct '09

Changes to Trunk (http://source.squeak.org/trunk.html) in the last 24 hours: http://lists.squeakfoundation.org/pipermail/packages/2009-October/001685.ht… Name: Graphics-jmv.82 Ancestors: Graphics-nice.81 Fixed an issue with the #baseKern of italic underlined StrikeFonts. =============================================

1 0

Shout & Fonts
by Ronald Spengler 26 Oct '09

26 Oct '09

The default grey italic for an incomplete identifier seems horizontally squished to me, making it hard to read. Inspecting: SHTextStylerST80 styleTable ...shows me that the fonts are configured with symbols. Is there a symbol I can add like #wider ? And where would I look to see what these symbols mean? -- Ron

3 2

The Trunk: Graphics-jmv.82.mcz
by commits＠source.squeak.org 26 Oct '09

26 Oct '09

Juan Vuletich uploaded a new version of Graphics to project The Trunk: http://source.squeak.org/trunk/Graphics-jmv.82.mcz ==================== Summary ==================== Name: Graphics-jmv.82 Author: jmv Time: 26 October 2009, 5:55:54 am UUID: 0f557557-88df-416b-bba6-6025b28e6edb Ancestors: Graphics-nice.81 Fixed an issue with the #baseKern of italic underlined StrikeFonts. =============== Diff against Graphics-nice.81 =============== Item was changed: ----- Method: StrikeFont>>baseKern (in category 'accessing') ----- baseKern "Return the base kern value to be used for all characters." | italic | italic := emphasis allMask: 2. + glyphs depth > 1 ifTrue: [ - (self isSynthetic not and: [ glyphs depth > 1 ]) ifTrue: [ ^(italic or: [ pointSize < 9 ]) ifTrue: [ 1 ] ifFalse: [ 0] ]. italic ifFalse: [^ 0]. ^ ((self height-1-self ascent+4)//4 max: 0) "See makeItalicGlyphs" + (((self ascent-5+4)//4 max: 0))!

1 0

Test what primitive is faster #clone, of #basicNew?
by Igor Stasenko 26 Oct '09

26 Oct '09

Hello, creating a new objects is quite fast, but i wonder, what if it could be made even faster for objects of fixed size (not variable sized ones) by using a #clone primitive instead of #basicNew? The trick to use #clone is, that we can keep a 'sample' in class instance variable: Mytestclass class instanceVariableNames: 'sample' Mytestclass class>>initialize sample := self basicNew and then: Mytestclass class>>new ^ sample clone initialize The problem, that i can't make a benchmark , which could really tell the difference between those two ways, so we could be 100% sure what is faster. Any ideas how to bench it? -- Best regards, Igor Stasenko AKA sig.

1 0

Commit log with errors [was: [squeak-dev] Daily Commit Log]
by Igor Stasenko 25 Oct '09

25 Oct '09

Has anyone noticed, the problems with recent commits made by Andreas, which lead to error? 2009/10/25 <commits(a)source.squeak.org>: > Changes to Trunk (http://source.squeak.org/trunk.html) in the last 24 hours: > > http://lists.squeakfoundation.org/pipermail/packages/2009-October/001681.ht… > > Name: Multilingual-ar.54 > Ancestors: Multilingual-nice.53 > > Faster conversions in MultiByteFileStream and friends: > ------------------------------------------------------------------ > Change Set: FasterLatin1Conversion-Part1 > Date: 10 May 2009 > > Install fast latin1 conversion Part1 > > generalize Andreas Raab trick from ByteString>>#squeakToUtf8 > to every converter using class instance variables > ------------------------------------------------------------------ > Change Set: FasterLatin1Conversion-Part2 > Date: 10 May 2009 > > Install fast latin1 conversion Part2 > > Create TextConverter instance variables to handle > latin1 fast conversion + lineEndConventions fast conversion > ------------------------------------------------------------------ > Change Set: FasterLatin1Conversion-Part3 > Date: 10 May 2009 > > Install fast latin1 conversion Part3 > > Use #installLineEndConventionInConverter where due. > that is whenever converter or lineEndConvention are changed in MultiByteFileStream > ------------------------------------------------------------------ > Change Set: FasterLatin1Conversion-Part4 > Date: 10 May 2009 > > Install fast latin1 conversion Part4 > > Install fast latin1 conversion in MultiByteFileStream>>#nextPutAll: > > > ==== ERROR === > > Error: subscript is out of bounds: 0 > > 24 October 2009 4:02:34 am > > VM: unix - a SmalltalkImage > Image: Squeak3.7 [latest update: #5989] > > SecurityManager state: > Restricted: false > FileAccess: true > SocketAccess: true > Working Dir /home/squeaksource > Trusted Dir /home/squeaksource/secure > Untrusted Dir /home/squeaksource/My Squeak > > Array(Object)>>error: > Receiver: #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xDelimiter #xDe...etc... > Arguments and temporary variables: > aString: 'subscript is out of bounds: 0' > Receiver's instance variables: > #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xDelimiter #xDe...etc... > > Array(Object)>>errorSubscriptBounds: > Receiver: #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xDelimiter #xDe...etc... > Arguments and temporary variables: > index: 0 > Receiver's instance variables: > #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xDelimiter #xDe...etc... > > Array(Object)>>at: > Receiver: #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xDelimiter #xDe...etc... > Arguments and temporary variables: > index: 0 > Receiver's instance variables: > #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xDelimiter #xDe...etc... > > Parser(Scanner)>>scanToken > Receiver: a Parser > Arguments and temporary variables: > > Receiver's instance variables: > source: a ReadStream > mark: nil > hereChar: $ > aheadChar: $ > token: nil > tokenType: nil > currentComment: nil > buffer: a WriteStream > typeTable: #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xB...etc... > here: nil > hereType: nil > hereMark: nil > hereEnd: nil > prevMark: nil > prevEnd: nil > encoder: nil > requestor: nil > parseNode: nil > failBlock: [] in Parser>>initPattern:notifying:return: {[^ nil]} > requestorOffset: nil > tempsMark: nil > doitFlag: nil > > > --- The full stack --- > Array(Object)>>error: > Array(Object)>>errorSubscriptBounds: > Array(Object)>>at: > Parser(Scanner)>>scanToken > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - > Parser(Scanner)>>scan: > Parser>>init:notifying:failBlock: > Parser>>initPattern:notifying:return: > Parser>>parseSelector: > ChangeList>>scanCategory:class:meta:stamp: > ChangeList>>scanCategory > [] in ChangeList>>scanFile:from:to: {[:bar | [file position < stopPosition] whileTrue: [bar value: file positi...]} > ProgressInitiationException>>defaultAction > UndefinedObject>>handleSignal: > MethodContext(ContextPart)>>handleSignal: > ProgressInitiationException(Exception)>>signal > ProgressInitiationException>>display:at:from:to:during: > ProgressInitiationException class>>display:at:from:to:during: > String>>displayProgressAt:from:to:during: > ChangeList>>scanFile:from:to: > FilePackage>>fileInFrom: > MCStReader>>loadDefinitions > MCStReader(MCSnapshotReader)>>definitions > [] in MCMczReader>>extractDefinitionsFrom: {[:rc | reader := rc on: member contentStream text. definitions addAll: rea...]} > MCStReader class(Object)>>ifNotNilDo: > MCMczReader>>extractDefinitionsFrom: > [] in MCMczReader>>loadDefinitions {[:m | self extractDefinitionsFrom: m]} > OrderedCollection>>do: > MCMczReader>>loadDefinitions > MCMczReader(MCVersionReader)>>definitions > MCMczReader(MCVersionReader)>>snapshot > [] in SSDiffyTextWriter>>writeVersion:for: {[ancestor ifNil: [self writeSnapshot: reader snapshot] ifNotNil: [patch ...]} > BlockContext>>on:do: > SSDiffyTextWriter>>writeVersion:for: > SSEMailSubscription>>versionAdded:to: > [] in SSProject>>versionAdded: {[each new versionAdded: aVersion to: self]} > [] in BlockContext>>newProcess {[self value. Processor terminateActive]} > > > > > > > > Previous message: [Pkg] The Trunk: Compiler-nice.93.mcz > > Next message: [Pkg] The Trunk: Multilingual-ar.55.mcz > > Messages sorted by: > [ date ] > [ thread ] > [ subject ] > [ author ] > > > > > More information about the Packages > mailing list > > ============================================= > > http://lists.squeakfoundation.org/pipermail/packages/2009-October/001682.ht… > > Name: Multilingual-ar.55 > Ancestors: Multilingual-ar.54 > > Add an installation guard for loading the converter changes. > > ==== ERROR === > > Error: subscript is out of bounds: 0 > > 24 October 2009 4:10:27 am > > VM: unix - a SmalltalkImage > Image: Squeak3.7 [latest update: #5989] > > SecurityManager state: > Restricted: false > FileAccess: true > SocketAccess: true > Working Dir /home/squeaksource > Trusted Dir /home/squeaksource/secure > Untrusted Dir /home/squeaksource/My Squeak > > Array(Object)>>error: > Receiver: #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xDelimiter #xDe...etc... > Arguments and temporary variables: > aString: 'subscript is out of bounds: 0' > Receiver's instance variables: > #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xDelimiter #xDe...etc... > > Array(Object)>>errorSubscriptBounds: > Receiver: #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xDelimiter #xDe...etc... > Arguments and temporary variables: > index: 0 > Receiver's instance variables: > #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xDelimiter #xDe...etc... > > Array(Object)>>at: > Receiver: #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xDelimiter #xDe...etc... > Arguments and temporary variables: > index: 0 > Receiver's instance variables: > #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xDelimiter #xDe...etc... > > Parser(Scanner)>>scanToken > Receiver: a Parser > Arguments and temporary variables: > > Receiver's instance variables: > source: a ReadStream > mark: nil > hereChar: $ > aheadChar: $ > token: nil > tokenType: nil > currentComment: nil > buffer: a WriteStream > typeTable: #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xB...etc... > here: nil > hereType: nil > hereMark: nil > hereEnd: nil > prevMark: nil > prevEnd: nil > encoder: nil > requestor: nil > parseNode: nil > failBlock: [] in Parser>>initPattern:notifying:return: {[^ nil]} > requestorOffset: nil > tempsMark: nil > doitFlag: nil > > > --- The full stack --- > Array(Object)>>error: > Array(Object)>>errorSubscriptBounds: > Array(Object)>>at: > Parser(Scanner)>>scanToken > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - > Parser(Scanner)>>scan: > Parser>>init:notifying:failBlock: > Parser>>initPattern:notifying:return: > Parser>>parseSelector: > ChangeList>>scanCategory:class:meta:stamp: > ChangeList>>scanCategory > [] in ChangeList>>scanFile:from:to: {[:bar | [file position < stopPosition] whileTrue: [bar value: file positi...]} > ProgressInitiationException>>defaultAction > UndefinedObject>>handleSignal: > MethodContext(ContextPart)>>handleSignal: > ProgressInitiationException(Exception)>>signal > ProgressInitiationException>>display:at:from:to:during: > ProgressInitiationException class>>display:at:from:to:during: > String>>displayProgressAt:from:to:during: > ChangeList>>scanFile:from:to: > FilePackage>>fileInFrom: > MCStReader>>loadDefinitions > MCStReader(MCSnapshotReader)>>definitions > [] in MCMczReader>>extractDefinitionsFrom: {[:rc | reader := rc on: member contentStream text. definitions addAll: rea...]} > MCStReader class(Object)>>ifNotNilDo: > MCMczReader>>extractDefinitionsFrom: > [] in MCMczReader>>loadDefinitions {[:m | self extractDefinitionsFrom: m]} > OrderedCollection>>do: > MCMczReader>>loadDefinitions > MCMczReader(MCVersionReader)>>definitions > MCMczReader(MCVersionReader)>>snapshot > [] in SSDiffyTextWriter>>writeVersion:for: {[ancestor ifNil: [self writeSnapshot: reader snapshot] ifNotNil: [patch ...]} > BlockContext>>on:do: > SSDiffyTextWriter>>writeVersion:for: > SSEMailSubscription>>versionAdded:to: > [] in SSProject>>versionAdded: {[each new versionAdded: aVersion to: self]} > [] in BlockContext>>newProcess {[self value. Processor terminateActive]} > > > > > > > > Previous message: [Pkg] The Trunk: Multilingual-ar.54.mcz > > Next message: [Pkg] The Trunk: Multilingual-ar.56.mcz > > Messages sorted by: > [ date ] > [ thread ] > [ subject ] > [ author ] > > > > > More information about the Packages > mailing list > > ============================================= > > http://lists.squeakfoundation.org/pipermail/packages/2009-October/001683.ht… > > Name: Multilingual-ar.56 > Ancestors: Multilingual-ar.55 > > Remove unnecessary installation guard after issueing a config map. > > ==== ERROR === > > Error: subscript is out of bounds: 0 > > 24 October 2009 4:16:26 am > > VM: unix - a SmalltalkImage > Image: Squeak3.7 [latest update: #5989] > > SecurityManager state: > Restricted: false > FileAccess: true > SocketAccess: true > Working Dir /home/squeaksource > Trusted Dir /home/squeaksource/secure > Untrusted Dir /home/squeaksource/My Squeak > > Array(Object)>>error: > Receiver: #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xDelimiter #xDe...etc... > Arguments and temporary variables: > aString: 'subscript is out of bounds: 0' > Receiver's instance variables: > #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xDelimiter #xDe...etc... > > Array(Object)>>errorSubscriptBounds: > Receiver: #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xDelimiter #xDe...etc... > Arguments and temporary variables: > index: 0 > Receiver's instance variables: > #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xDelimiter #xDe...etc... > > Array(Object)>>at: > Receiver: #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xDelimiter #xDe...etc... > Arguments and temporary variables: > index: 0 > Receiver's instance variables: > #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xDelimiter #xDe...etc... > > Parser(Scanner)>>scanToken > Receiver: a Parser > Arguments and temporary variables: > > Receiver's instance variables: > source: a ReadStream > mark: nil > hereChar: $ > aheadChar: $ > token: nil > tokenType: nil > currentComment: nil > buffer: a WriteStream > typeTable: #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xB...etc... > here: nil > hereType: nil > hereMark: nil > hereEnd: nil > prevMark: nil > prevEnd: nil > encoder: nil > requestor: nil > parseNode: nil > failBlock: [] in Parser>>initPattern:notifying:return: {[^ nil]} > requestorOffset: nil > tempsMark: nil > doitFlag: nil > > > --- The full stack --- > Array(Object)>>error: > Array(Object)>>errorSubscriptBounds: > Array(Object)>>at: > Parser(Scanner)>>scanToken > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - > Parser(Scanner)>>scan: > Parser>>init:notifying:failBlock: > Parser>>initPattern:notifying:return: > Parser>>parseSelector: > ChangeList>>scanCategory:class:meta:stamp: > ChangeList>>scanCategory > [] in ChangeList>>scanFile:from:to: {[:bar | [file position < stopPosition] whileTrue: [bar value: file positi...]} > ProgressInitiationException>>defaultAction > UndefinedObject>>handleSignal: > MethodContext(ContextPart)>>handleSignal: > ProgressInitiationException(Exception)>>signal > ProgressInitiationException>>display:at:from:to:during: > ProgressInitiationException class>>display:at:from:to:during: > String>>displayProgressAt:from:to:during: > ChangeList>>scanFile:from:to: > FilePackage>>fileInFrom: > MCStReader>>loadDefinitions > MCStReader(MCSnapshotReader)>>definitions > [] in MCMczReader>>extractDefinitionsFrom: {[:rc | reader := rc on: member contentStream text. definitions addAll: rea...]} > MCStReader class(Object)>>ifNotNilDo: > MCMczReader>>extractDefinitionsFrom: > [] in MCMczReader>>loadDefinitions {[:m | self extractDefinitionsFrom: m]} > OrderedCollection>>do: > MCMczReader>>loadDefinitions > MCMczReader(MCVersionReader)>>definitions > MCMczReader(MCVersionReader)>>snapshot > [] in SSDiffyTextWriter>>writeVersion:for: {[ancestor ifNil: [self writeSnapshot: reader snapshot] ifNotNil: [patch ...]} > BlockContext>>on:do: > SSDiffyTextWriter>>writeVersion:for: > SSEMailSubscription>>versionAdded:to: > [] in SSProject>>versionAdded: {[each new versionAdded: aVersion to: self]} > [] in BlockContext>>newProcess {[self value. Processor terminateActive]} > > > > > > > > Previous message: [Pkg] The Trunk: Multilingual-ar.55.mcz > > Next message: [Pkg] The Trunk: Nebraska-ul.21.mcz > > Messages sorted by: > [ date ] > [ thread ] > [ subject ] > [ author ] > > > > > More information about the Packages > mailing list > > ============================================= > > http://lists.squeakfoundation.org/pipermail/packages/2009-October/001684.ht… > > Name: Nebraska-ul.21 > Ancestors: Nebraska-nice.20 > > - make sure that sockets are closed even when the tests fail in ArbitraryObjectSocketTestCase > - add a small delay to ArbitraryObjectSocketTestCase and StringSocketTestCase to avoid random failures/errors under windows > > ============================================= > > -- Best regards, Igor Stasenko AKA sig.

2 1

ftp client
by Ching de la Serna 25 Oct '09

25 Oct '09

Hi All, I am wondering if someone can point me to a Squeak FTP client? there is a FTP server at SqueakMap but no FTP client. Thanks in advance, Ching de la Serna

2 1

http://ftp.squeak.org/trunk updated
by Andreas Raab 25 Oct '09

25 Oct '09

Folks, FYI, I've uploaded a current updated trunk image to http://ftp.squeak.org/trunk/Squeak3.10.2-Trunk-091024.zip The image includes all the current updates, the adjustment of the selection color as well as a cleanup of the MC repositories (I've left only the inbox and the trunk repo). Cheers, - Andreas

2 3

← Newer
1
...
5
6
7
8
9
10
11
...
36
Older →

Jump to page: