Squeak-dev October 2010

squeak-dev@lists.squeakfoundation.org

79 participants
264 discussions

The Trunk: Kernel-topa.508.mcz
by commits＠source.squeak.org 28 Oct '10

28 Oct '10

Levente Uzonyi uploaded a new version of Kernel to project The Trunk: http://source.squeak.org/trunk/Kernel-topa.508.mcz ==================== Summary ==================== Name: Kernel-topa.508 Author: topa Time: 25 October 2010, 10:30:52.354 am UUID: bd68254c-b0c4-4cd5-9926-6a5caa6c82eb Ancestors: Kernel-ul.507 added missing withAllSuperAndSubclassesDo: =============== Diff against Kernel-ul.507 =============== Item was added: + ----- Method: Behavior>>withAllSuperAndSubclassesDo: (in category 'enumerating') ----- + withAllSuperAndSubclassesDo: aBlock + self allSuperclassesDo: aBlock. + aBlock value: self. + self allSubclassesDo: aBlock!

1 0

The Trunk: ShoutCore-ul.24.mcz
by commits＠source.squeak.org 28 Oct '10

28 Oct '10

Levente Uzonyi uploaded a new version of ShoutCore to project The Trunk: http://source.squeak.org/trunk/ShoutCore-ul.24.mcz ==================== Summary ==================== Name: ShoutCore-ul.24 Author: ul Time: 28 October 2010, 12:46:03.384 am UUID: b53a7851-632d-7f44-b5f0-6bf365ff628d Ancestors: ShoutCore-ul.23 - use the renamed preference #allowUnderscoreAsAssignment =============== Diff against ShoutCore-ul.23 =============== Item was changed: ----- Method: SHParserST80>>allowUnderscoreAssignments (in category 'private') ----- allowUnderscoreAssignments "Query class + preference" ^(classOrMetaClass ifNotNil: [:c | c allowUnderscoreAssignments]) + ifNil: [Scanner allowUnderscoreAsAssignment ]! - ifNil: [Scanner prefAllowUnderscoreAssignments]!

1 0

The Trunk: Compiler-ul.177.mcz
by commits＠source.squeak.org 28 Oct '10

28 Oct '10

Levente Uzonyi uploaded a new version of Compiler to project The Trunk: http://source.squeak.org/trunk/Compiler-ul.177.mcz ==================== Summary ==================== Name: Compiler-ul.177 Author: ul Time: 28 October 2010, 12:44:19.763 am UUID: 4e157cbb-4abd-4649-aeef-0213fdfe1399 Ancestors: Compiler-ul.176 - renamed #prefAllowUnderscoreAssignments to #allowUnderscoreAsAssignment for compatibility AST (and OB) =============== Diff against Compiler-ul.176 =============== Item was added: + ----- Method: Scanner class>>allowUnderscoreAsAssignment (in category 'preferences') ----- + allowUnderscoreAsAssignment + "Accessor for the system-wide preference" + <preference: 'Allow underscore assignments' + category: 'Compiler' + description: 'When true, underscore can be used as assignment operator' + type: #Boolean> + ^AllowUnderscoreAssignments ifNil:[true]! Item was added: + ----- Method: Scanner class>>allowUnderscoreAsAssignment: (in category 'preferences') ----- + allowUnderscoreAsAssignment: aBool + "Accessor for the system-wide preference" + AllowUnderscoreAssignments := aBool! Item was changed: ----- Method: Scanner class>>prefAllowUnderscoreAssignments (in category 'preferences') ----- prefAllowUnderscoreAssignments "Accessor for the system-wide preference" + + self deprecated: 'Use #allowUnderscoreAsAssignment'. + ^self allowUnderscoreAsAssignment! - <preference: 'Allow underscore assignments' - category: 'Compiler' - description: 'When true, underscore can be used as assignment operator' - type: #Boolean> - ^AllowUnderscoreAssignments ifNil:[true]! Item was changed: ----- Method: Scanner class>>prefAllowUnderscoreAssignments: (in category 'preferences') ----- prefAllowUnderscoreAssignments: aBool "Accessor for the system-wide preference" + + self deprecated: 'Use #allowUnderscoreAsAssignment:'. + self allowUnderscoreAsAssignment: aBool! - AllowUnderscoreAssignments := aBool! Item was changed: ----- Method: Scanner>>allowUnderscoreAssignments (in category 'private') ----- allowUnderscoreAssignments "Query preference" + ^self class allowUnderscoreAsAssignment! - ^self class prefAllowUnderscoreAssignments!

1 0

Daily Commit Log
by commits＠source.squeak.org 28 Oct '10

28 Oct '10

Changes to Trunk (http://source.squeak.org/trunk.html) in the last 24 hours: http://lists.squeakfoundation.org/pipermail/packages/2010-October/003854.ht… Name: Compiler-ul.175 Ancestors: Compiler-nice.174 - replace LiteralDictionaries with PluggableDictionaries part 1. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-October/003855.ht… Name: Compiler-ul.176 Ancestors: Compiler-ul.175 - replace LiteralDictionaries with PluggableDictionaries part 2. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-October/003856.ht… Name: Tools-ul.274 Ancestors: Tools-ul.273 - added the default implementation of the completion hook ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-October/003857.ht… Name: System-ul.388 Ancestors: System-eem.387 - added the general implementation of the code completion hook ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-October/003858.ht… Name: Morphic-ul.471 Ancestors: Morphic-eem.470 - integration of the code completion hook to TextMorph >> #keyStroke: using ToolSet - added TextEditor >> #blinkPrevParen: for compatibility with code completion tools - TextEditor >> #blinkPrevParen uses #blinkPrevParen: =============================================

1 0

The Trunk: Morphic-ul.471.mcz
by commits＠source.squeak.org 28 Oct '10

28 Oct '10

Levente Uzonyi uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-ul.471.mcz ==================== Summary ==================== Name: Morphic-ul.471 Author: ul Time: 27 October 2010, 4:10:29.885 am UUID: 4b5b5062-6173-234b-8895-029389451407 Ancestors: Morphic-eem.470 - integration of the code completion hook to TextMorph >> #keyStroke: using ToolSet - added TextEditor >> #blinkPrevParen: for compatibility with code completion tools - TextEditor >> #blinkPrevParen uses #blinkPrevParen: =============== Diff against Morphic-eem.470 =============== Item was changed: ----- Method: TextEditor>>blinkPrevParen (in category 'parenblinking') ----- blinkPrevParen + + self blinkPrevParen: sensor keyboardPeek! - | openDelimiter closeDelimiter level string here hereChar | - string := paragraph text string. - here := pointBlock stringIndex. - openDelimiter := sensor keyboardPeek. - closeDelimiter := '([{' at: (')]}' indexOf: openDelimiter). - level := 1. - [level > 0 and: [here > 2]] - whileTrue: - [hereChar := string at: (here := here - 1). - hereChar = closeDelimiter - ifTrue: - [level := level - 1. - level = 0 - ifTrue: [^ self blinkParenAt: here]] - ifFalse: - [hereChar = openDelimiter - ifTrue: [level := level + 1]]]! Item was added: + ----- Method: TextEditor>>blinkPrevParen: (in category 'parenblinking') ----- + blinkPrevParen: aCharacter + + | openDelimiter closeDelimiter level string here hereChar | + string := paragraph text string. + here := pointBlock stringIndex. + openDelimiter := aCharacter. + closeDelimiter := '([{' at: (')]}' indexOf: openDelimiter). + level := 1. + [level > 0 and: [here > 2]] + whileTrue: + [hereChar := string at: (here := here - 1). + hereChar = closeDelimiter + ifTrue: + [level := level - 1. + level = 0 + ifTrue: [^ self blinkParenAt: here]] + ifFalse: + [hereChar = openDelimiter + ifTrue: [level := level + 1]]]! Item was changed: ----- Method: TextMorph>>keyStroke: (in category 'event handling') ----- keyStroke: evt "Handle a keystroke event." self resetBlinkCursor. "don't blink during type-in" + ToolSet + codeCompletionAround: [ + evt keyValue = 13 ifTrue: [ "CR - check for special action" + self crAction ifNotNil: [ :action | + "Note: Code below assumes that this was some + input field reacting on CR. Break the keyboard + focus so that the receiver can be safely deleted." + evt hand newKeyboardFocus: nil. + ^action valueWithEnoughArguments: { evt } ] ]. + self handleInteraction: [ editor readKeyboard ] fromEvent: evt. + "self updateFromParagraph." + super keyStroke: evt "sends to keyStroke event handler, if any" ] + textMorph: self + keyStroke: evt! - evt keyValue = 13 ifTrue: [ "CR - check for special action" - self crAction ifNotNil: [ :action | - "Note: Code below assumes that this was some - input field reacting on CR. Break the keyboard - focus so that the receiver can be safely deleted." - evt hand newKeyboardFocus: nil. - ^action valueWithEnoughArguments: { evt } ] ]. - self handleInteraction: [ editor readKeyboard ] fromEvent: evt. - "self updateFromParagraph." - super keyStroke: evt "sends to keyStroke event handler, if any"!

1 0

The Trunk: System-ul.388.mcz
by commits＠source.squeak.org 28 Oct '10

28 Oct '10

Levente Uzonyi uploaded a new version of System to project The Trunk: http://source.squeak.org/trunk/System-ul.388.mcz ==================== Summary ==================== Name: System-ul.388 Author: ul Time: 27 October 2010, 4:07:56.602 am UUID: 5b74a352-b28a-6b45-82d6-9118a9071ca0 Ancestors: System-eem.387 - added the general implementation of the code completion hook =============== Diff against System-eem.387 =============== Item was added: + ----- Method: ToolSet class>>codeCompletionAround:textMorph:keyStroke: (in category 'completion') ----- + codeCompletionAround: aBlock textMorph: aTextMorph keyStroke: evt + self default ifNil: [aBlock value. ^ self]. + self default codeCompletionAround: aBlock textMorph: aTextMorph keyStroke: evt!

1 0

The Trunk: Tools-ul.274.mcz
by commits＠source.squeak.org 28 Oct '10

28 Oct '10

Levente Uzonyi uploaded a new version of Tools to project The Trunk: http://source.squeak.org/trunk/Tools-ul.274.mcz ==================== Summary ==================== Name: Tools-ul.274 Author: ul Time: 27 October 2010, 4:07:30.901 am UUID: 38bfc5f6-6715-e245-8f73-16c74f0681ce Ancestors: Tools-ul.273 - added the default implementation of the completion hook =============== Diff against Tools-ul.273 =============== Item was added: + ----- Method: StandardToolSet class>>codeCompletionAround:textMorph:keyStroke: (in category 'completion') ----- + codeCompletionAround: aBlock textMorph: aTextMorph keyStroke: evt + ^ aBlock value!

1 0

The Trunk: Compiler-ul.176.mcz
by commits＠source.squeak.org 28 Oct '10

28 Oct '10

Levente Uzonyi uploaded a new version of Compiler to project The Trunk: http://source.squeak.org/trunk/Compiler-ul.176.mcz ==================== Summary ==================== Name: Compiler-ul.176 Author: ul Time: 24 October 2010, 7:33:17.308 am UUID: f99f8cfe-e153-bb4e-b917-74dc15472d5a Ancestors: Compiler-ul.175 - replace LiteralDictionaries with PluggableDictionaries part 2. =============== Diff against Compiler-ul.175 =============== Item was removed: - Dictionary subclass: #LiteralDictionary - instanceVariableNames: '' - classVariableNames: '' - poolDictionaries: '' - category: 'Compiler-Support'! - - !LiteralDictionary commentStamp: '<historical>' prior: 0! - A LiteralDictionary, like an IdentityDictionary, has a special test for equality. In this case it is simple equality between objects of like class. This allows equal Float or String literals to be shared without the possibility of erroneously sharing, say, 1 and 1.0! Item was removed: - ----- Method: LiteralDictionary>>literalEquality:and: (in category 'testing') ----- - literalEquality: x and: y - "Check if two literals should be considered equal and reduced to a single literal. - Delegate this task to the literal themselves, they are aware of their peculiarities and know how to behave." - - ^ x literalEqual: y - ! Item was removed: - ----- Method: LiteralDictionary>>scanFor: (in category 'as yet unclassified') ----- - scanFor: anObject - "Scan the key array for the first slot containing either a nil (indicating an empty slot) or an element that matches anObject. Answer the index of that slot or raise an error if no slot is found. This method will be overridden in various subclasses that have different interpretations for matching elements." - - | index start | - index := start := anObject hash \\ array size + 1. - [ - | element | - ((element := array at: index) == nil or: [ - self literalEquality: element key and: anObject ]) - ifTrue: [ ^index ]. - (index := index \\ array size + 1) = start ] whileFalse. - self errorNoFreeSpace!

1 0

The Trunk: Compiler-ul.175.mcz
by commits＠source.squeak.org 28 Oct '10

28 Oct '10

Levente Uzonyi uploaded a new version of Compiler to project The Trunk: http://source.squeak.org/trunk/Compiler-ul.175.mcz ==================== Summary ==================== Name: Compiler-ul.175 Author: ul Time: 24 October 2010, 7:32:36.364 am UUID: de13fc25-c32d-3444-986d-8d54b0c34689 Ancestors: Compiler-nice.174 - replace LiteralDictionaries with PluggableDictionaries part 1. =============== Diff against Compiler-nice.174 =============== Item was changed: ----- Method: Encoder>>sharableLitIndex: (in category 'encoding') ----- sharableLitIndex: literal "Special access prevents multiple entries for post-allocated super send special selectors" 1 to: literalStream position do: [:index| + (literal literalEqual: (literalStream originalContents at: index)) ifTrue: - (litSet literalEquality: literal and: (literalStream originalContents at: index)) ifTrue: [^index - 1]]. ^self litIndex: literal! Item was changed: ----- Method: VariableNode class>>initialize (in category 'class initialization') ----- initialize "VariableNode initialize. Decompiler initialize" | encoder | encoder := Encoder new. StdVariables := Dictionary new: 16. encoder fillDict: StdVariables with: VariableNode mapping: #('self' 'thisContext' 'super' 'nil' 'false' 'true' ) to: (Array with: LdSelf with: LdThisContext with: LdSuper) , (Array with: LdNil with: LdFalse with: LdTrue). StdSelectors := Dictionary new: 64. encoder fillDict: StdSelectors with: SelectorNode mapping: ((1 to: Smalltalk specialSelectorSize) collect: [:i | Smalltalk specialSelectorAt: i]) to: (SendPlus to: SendPlus + 31). + StdLiterals := PluggableDictionary new equalBlock: [ :x :y | x literalEqual: y ]. - StdLiterals := LiteralDictionary new: 16. encoder fillDict: StdLiterals with: LiteralNode mapping: #(-1 0 1 2 ) to: (LdMinus1 to: LdMinus1 + 3). encoder initScopeAndLiteralTables. NodeNil := encoder encodeVariable: 'nil'. NodeTrue := encoder encodeVariable: 'true'. NodeFalse := encoder encodeVariable: 'false'. NodeSelf := encoder encodeVariable: 'self'. NodeThisContext := encoder encodeVariable: 'thisContext'. NodeSuper := encoder encodeVariable: 'super'! Item was changed: + (PackageInfo named: 'Compiler') postscript: '"Replace all LiteralDictionaries with PluggableDictionaries." + | instances newInstances | + instances := LiteralDictionary allInstances. + newInstances := instances collect: [ :literalDictionary | + | pluggableDictionary | + pluggableDictionary := (PluggableDictionary new: literalDictionary size) + equalBlock: [ :a :b | a literalEqual: b ]; + yourself. + literalDictionary associationsDo: [ :each | + pluggableDictionary add: each ]. + pluggableDictionary ]. + instances elementsForwardIdentityTo: newInstances'! - (PackageInfo named: 'Compiler') postscript: '"After switching to closures, recompile everything" - Utilities compileUsingClosures. - '!

1 0

Re: [Pharo-project] Delay when I upload to Squeaksource 2MB files size
by Tobias Pape 27 Oct '10

27 Oct '10

Am 2010-10-27 um 10:16 schrieb nullPointer: > Seems upload correctly, but when the progress bar is almost ended seems much > more slow... Hence, squeaksource is down. I encountered this behaviour onsite (i.e. here at HPI) whenever a student tried to upload a MCZ, and it failed or hanged, the SqueakSource installation went haywire. So, whenever you encounter failing or endlessly hanging uploads, pleas tell the mailing lists or the box admins, so that squeaksource can be bought up again quickly. So long, -Tobias

2 1

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

Jump to page: