- Pharo-dev - lists.pharo.org

[Pharo-project] [Free Book] Computer Programming using GNU Smalltalk
by Torsten Bergmann Oct. 6, 2009

Oct. 6, 2009

Hi Stef, a new book to add to your list of free Smalltalk books. http://canol.wordpress.com/2009/10/04/computer-programming-using-gnu-smallt… Bye Torsten -- GRATIS fÃ¼r alle GMX-Mitglieder: Die maxdome Movie-FLAT! Jetzt freischalten unter http://portal.gmx.net/de/go/maxdome01

1 0

[Pharo-project] How to edit in the wiki
by Gabriel Cotelli Oct. 6, 2009

Oct. 6, 2009

Hi, I want to update: http://code.google.com/p/pharo/wiki/PackagesTestedInPharoto include packages that I have tested that loads Ok on Pharo. Can anybody give me access to change this? Thanks, Gabriel

2 1

Re: [Pharo-project] [BUG]UndefinedObject(Object)>>doesNotUnderstand: #null
by Damien Cassou Oct. 5, 2009

Oct. 5, 2009

Hi, On Mon, Oct 5, 2009 at 7:19 AM, <anlarionov(a)gmail.com> wrote: > Almost all refactorings ends with this DNU. Is it platform specific? Or > maybe i miss something could you please describe all the steps to reproduce that from a clean download? -- Damien Cassou http://damiencassou.seasidehosting.st "Lambdas are relegated to relative obscurity until Java makes them popular by not having them." James Iry

2 1

[Pharo-project] Update stuck at #10457
by Adrian Lienhard Oct. 5, 2009

Oct. 5, 2009

Hi, I tried to update from an older image and got stuck in update #10457. I get a warning with the following text: "Please note that adding package references as strings (such as 'Kernel-MikeRoberts.408') is no longer supported, because Gofer cannot guess your naming conventions. Adapt your code to either call #addPackage: (for full package names e.g. Gofer), #addVersion: (for complete version names, e.g. Gofer-lr.54) or #addPrefix: (for incomplete version names, e.g. Gofer-lr). This lets Gofer know what exactly you want, and in return it will more likely do what you expect." I click proceed but the warning appears again. After probably 5x proceeding I get a MNU: BytecodeAgnosticMethod>>doesNotUnderstand: #blockExtentsToTempRefs from which I cannot recover. Is this a known issue? Cheers, Adrian

4 5

[Pharo-project] Fwd: [squeak-dev] The Trunk: Compiler-jcg.85.mcz
by StÃ©phane Ducasse Oct. 5, 2009

Oct. 5, 2009

Begin forwarded message: > From: commits(a)source.squeak.org > Date: September 30, 2009 10:14:22 AM GMT+02:00 > To: squeak-dev(a)lists.squeakfoundation.org > Subject: [squeak-dev] The Trunk: Compiler-jcg.85.mcz > Reply-To: squeak-dev(a)lists.squeakfoundation.org > > Joshua Gargus uploaded a new version of Compiler to project The Trunk: > http://source.squeak.org/trunk/Compiler-jcg.85.mcz > > ==================== Summary ==================== > > Name: Compiler-jcg.85 > Author: jcg > Time: 30 September 2009, 1:14:16 am > UUID: 21a5f88d-4107-48c3-b41c-d5ea735319a7 > Ancestors: Compiler-tfel.84 > > Revert to lazy-initialization of method properties, which is used by > the externally-maintained Prolog package (which loads cleanly into > 3.10.2, but not trunk). > > Part 1 of 2... need to first re-add the #properties method to Parser > before changing methods to send it. > > =============== Diff against Compiler-tfel.84 =============== > > Item was added: > + ----- Method: Parser>>properties (in category 'pragmas') ----- > + properties > + ^ properties ifNil: [ properties := AdditionalMethodState new ]! > >

2 2

[Pharo-project] [update] #10467
by Marcus Denker Oct. 5, 2009

Oct. 5, 2009

10467 ----- Issue 1260: [Regression?] Issue 277 (SelfEvaluating Arrays) wasn't integrated in beta-10462 Issue 987: 'stack top' variable on debugger crashes it Issue 1269: findLastOccurenceOfStringFix has broken a previous WideString patch -- Marcus Denker - http://marcusdenker.de PLEIAD Lab - Computer Science Department (DCC) - University of Chile

1 0

[Pharo-project] Fwd: [squeak-dev] The Trunk: Compiler-jcg.87.mcz
by StÃ©phane Ducasse Oct. 5, 2009

Oct. 5, 2009

Begin forwarded message: > From: commits(a)source.squeak.org > Date: October 1, 2009 8:21:58 AM GMT+02:00 > To: squeak-dev(a)lists.squeakfoundation.org > Subject: [squeak-dev] The Trunk: Compiler-jcg.87.mcz > Reply-To: squeak-dev(a)lists.squeakfoundation.org > > Joshua Gargus uploaded a new version of Compiler to project The Trunk: > http://source.squeak.org/trunk/Compiler-jcg.87.mcz > > ==================== Summary ==================== > > Name: Compiler-jcg.87 > Author: jcg > Time: 30 September 2009, 11:21:53 am > UUID: 71bf4e8d-f9f3-4371-a218-ad31a985cfd8 > Ancestors: Compiler-ul.86 > > Revert to lazy-initialization of method properties, which is used by > the externally-maintained Prolog package (which loads cleanly into > 3.10.2, but not trunk). > > Part 2 of 2... need to load -jcg.85 first (this is taken care of by > the Monticello Configuration update-jcg.32.mcm) > > =============== Diff against Compiler-ul.86 =============== > > Item was changed: > ----- Method: Parser>>addPragma: (in category 'pragmas') ----- > addPragma: aPragma > + properties := self properties copyWith: aPragma! > - properties := properties copyWith: aPragma! > > Item was changed: > ----- Method: Parser>>method:context:encoder: (in category > 'expression types') ----- > method: doit context: ctxt encoder: encoderToUse > " pattern [ | temporaries ] block => MethodNode." > > | sap blk prim temps messageComment methodNode | > - properties := AdditionalMethodState new. > encoder := encoderToUse. > sap := self pattern: doit inContext: ctxt. > "sap={selector, arguments, precedence}" > + self properties selector: (sap at: 1). > - properties selector: (sap at: 1). > encoder selector: (sap at: 1). > (sap at: 2) do: [:argNode | argNode beMethodArg]. > doit ifFalse: [self pragmaSequence]. > temps := self temporaries. > messageComment := currentComment. > currentComment := nil. > doit ifFalse: [self pragmaSequence]. > prim := self pragmaPrimitives. > self statements: #() innerBlock: doit. > blk := parseNode. > doit ifTrue: [blk returnLast] > ifFalse: [blk returnSelfIfNoOther: encoder]. > hereType == #doIt ifFalse: [^self expected: 'Nothing more']. > self interactive ifTrue: [self removeUnusedTemps]. > methodNode := self newMethodNode comment: messageComment. > ^methodNode > selector: (sap at: 1) > arguments: (sap at: 2) > precedence: (sap at: 3) > temporaries: temps > block: blk > encoder: encoder > primitive: prim > properties: properties! > > Item was changed: > ----- Method: > MethodNode > >>selector:arguments:precedence:temporaries:block:encoder:primitive: > (in category 'initialize-release') ----- > selector: selOrFalse arguments: args precedence: p temporaries: > temps block: blk encoder: anEncoder primitive: prim > + > + self > + selector: selOrFalse > + arguments: args > + precedence: p > + temporaries: temps > + block: blk encoder: > + anEncoder > + primitive: prim > + properties: AdditionalMethodState new.! > - "Initialize the receiver with respect to the arguments given." > - > - encoder := anEncoder. > - selectorOrFalse := selOrFalse. > - precedence := p. > - arguments := args. > - temporaries := temps. > - block := blk. > - primitive := prim! > > Item was changed: > ----- Method: Parser>>pragmaPrimitives (in category 'pragmas') ----- > pragmaPrimitives > | primitives | > + self properties isEmpty ifTrue: > - properties isEmpty ifTrue: > [^0]. > primitives := properties pragmas select: > [:pragma| > self class primitivePragmaSelectors includes: pragma keyword]. > primitives isEmpty ifTrue: > [^0]. > primitives size > 1 ifTrue: > [^self notify: 'Ambigous primitives']. > ^self perform: primitives first keyword withArguments: primitives > first arguments! > >

2 1

[Pharo-project] Copy for SequenceableCollection subclasses? (Was: Fix for 987)
by Henrik Johansen Oct. 5, 2009

Oct. 5, 2009

Somewhat related, at least I noticed it when debugging this: Sending copy to a LinkedList or a Semaphore will give back an array, since it uses shallowCopy from SequenceableCollection. Probably applies to more of SequenceableCollection's subclasses too, f.ex. DirectoryEntry for which copy leads to an MNU. Another side-effect of strange class-hierarchy, I guess :) Not quite sure how/if you want to implement those differently. Submitted to tracker as Issue1272. Cheers, Henry On Oct 5, 2009, at 1:12 38PM, StÃ©phane Ducasse wrote: > Thanks we will integrate that as soon as we can breath :) > > On Oct 5, 2009, at 12:14 PM, Henrik Johansen wrote: > >> Updated Issue987 with a SLICE in Inbox, which "fixes" the DNU in the >> way below. >> Used printString instead of asString as proposed by HernÃ¡n, as it (in >> principle) should be more robustly implemented and thus more suited >> for debugger display. >> (If sig's idea from some time back was adopted, this should be >> debugString instead of printString, of course). >> >> Cheers, >> Henry >> >> On Oct 5, 2009, at 11:51 23AM, Henrik Johansen wrote:

3 7

[Pharo-project] [BUG]UndefinedObject(Object)>>doesNotUnderstand: #null
by anlarionov＠gmail.com Oct. 5, 2009

Oct. 5, 2009

Almost all refactorings ends with this DNU. Is it platform specific? Or maybe i miss something 5 October 2009 5:17:34 pm VM: unix - i686 - linux-gnu - Pharo0.1 of 16 May 2008 [latest update: #10074] Image: Pharo1.0beta [Latest update: #10466] SecurityManager state: Restricted: false FileAccess: true SocketAccess: true Working Dir /home/mou/development/smalltalk/pharo1.0-10451-BETAweb09.09.3 Trusted Dir /home/mou/development/smalltalk/pharo1.0-10451-BETAweb09.09.3/secure Untrusted Dir /home/mou/development/smalltalk/pharo1.0-10451-BETAweb09.09.3/My Squeak UndefinedObject(Object)>>doesNotUnderstand: #null Receiver: nil Arguments and temporary variables: aMessage: null exception: MessageNotUnderstood: receiver of "null" is nil resumeValue: nil Receiver's instance variables: nil RBMethodNode>>primitiveNode Receiver: <<error during printing>> Arguments and temporary variables: Receiver's instance variables: parent: nil properties: a RBSmallIdentityDictionary(#comments->an OrderedCollection() ) annotations: nil selector: #protocol selectorParts: an Array( RBIdentifierToken('protocol')) body: <<error during printing>> RBMethodNode>>primitiveText Receiver: <<error during printing>> Arguments and temporary variables: set: nil Receiver's instance variables: parent: nil properties: a RBSmallIdentityDictionary(#comments->an OrderedCollection() ) annotations: nil selector: #protocol selectorParts: an Array( RBIdentifierToken('protocol')) body: <<error during printing>> RBMethodNode>>primitiveSources Receiver: <<error during printing>> Arguments and temporary variables: tgs: #() text: nil Receiver's instance variables: parent: nil properties: a RBSmallIdentityDictionary(#comments->an OrderedCollection() ) annotations: nil selector: #protocol selectorParts: an Array( RBIdentifierToken('protocol')) body: <<error during printing>> RBFormatter>>formatTagFor: Receiver: a RBFormatter Arguments and temporary variables: <<error during printing> Receiver's instance variables: codeStream: a WriteStream 'protocol ' lineStart: 10 firstLineLength: 8 tabs: 1 positionDelta: 0 RBFormatter>>acceptSequenceNode: Receiver: a RBFormatter Arguments and temporary variables: <<error during printing> Receiver's instance variables: codeStream: a WriteStream 'protocol ' lineStart: 10 firstLineLength: 8 tabs: 1 positionDelta: 0 RBSequenceNode>>acceptVisitor: Receiver: <<error during printing>> Arguments and temporary variables: aProgramNodeVisitor: a RBFormatter Receiver's instance variables: parent: <<error during printing>> RBFormatter>>visitNode: Receiver: a RBFormatter Arguments and temporary variables: <<error during printing> Receiver's instance variables: codeStream: a WriteStream 'protocol ' lineStart: 10 firstLineLength: 8 tabs: 1 positionDelta: 0 [] in RBFormatter>>acceptMethodNode: Receiver: a RBFormatter Arguments and temporary variables: <<error during printing> Receiver's instance variables: codeStream: a WriteStream 'protocol ' lineStart: 10 firstLineLength: 8 tabs: 1 positionDelta: 0 RBFormatter>>indent:while: Receiver: a RBFormatter Arguments and temporary variables: anInteger: 1 aBlock: [closure] in RBFormatter>>acceptMethodNode: Receiver's instance variables: codeStream: a WriteStream 'protocol ' lineStart: 10 firstLineLength: 8 tabs: 1 positionDelta: 0 RBFormatter>>indentWhile: Receiver: a RBFormatter Arguments and temporary variables: aBlock: [closure] in RBFormatter>>acceptMethodNode: Receiver's instance variables: codeStream: a WriteStream 'protocol ' lineStart: 10 firstLineLength: 8 tabs: 1 positionDelta: 0 RBFormatter>>acceptMethodNode: Receiver: a RBFormatter Arguments and temporary variables: <<error during printing> Receiver's instance variables: codeStream: a WriteStream 'protocol ' lineStart: 10 firstLineLength: 8 tabs: 1 positionDelta: 0 RBMethodNode>>acceptVisitor: Receiver: <<error during printing>> Arguments and temporary variables: aProgramNodeVisitor: a RBFormatter Receiver's instance variables: parent: nil properties: a RBSmallIdentityDictionary(#comments->an OrderedCollection() ) annotations: nil selector: #protocol selectorParts: an Array( RBIdentifierToken('protocol')) body: <<error during printing>> RBFormatter>>visitNode: Receiver: a RBFormatter Arguments and temporary variables: <<error during printing> Receiver's instance variables: codeStream: a WriteStream 'protocol ' lineStart: 10 firstLineLength: 8 tabs: 1 positionDelta: 0 RBFormatter>>format: Receiver: a RBFormatter Arguments and temporary variables: <<error during printing> Receiver's instance variables: codeStream: a WriteStream 'protocol ' lineStart: 10 firstLineLength: 8 tabs: 1 positionDelta: 0 RBMethodNode(RBProgramNode)>>formattedCode Receiver: <<error during printing>> Arguments and temporary variables: Receiver's instance variables: parent: nil properties: a RBSmallIdentityDictionary(#comments->an OrderedCollection() ) annotations: nil selector: #protocol selectorParts: an Array( RBIdentifierToken('protocol')) body: <<error during printing>> RBClass(RBAbstractClass)>>compileTree:classified: Receiver: FCGIServer Arguments and temporary variables: <<error during printing> Receiver's instance variables: name: #FCGIServer newMethods: an IdentityDictionary() instanceVariableNames: an OrderedCollection('handler' 'port' 'socket' 'profile'...etc... model: a RBNamespace superclass: an Object subclasses: an OrderedCollection() removedMethods: nil realClass: FCGIServer classVariableNames: an OrderedCollection() poolDictionaryNames: nil category: nil comment: an Object RBClass(RBAbstractClass)>>compileTree: Receiver: FCGIServer Arguments and temporary variables: <<error during printing> Receiver's instance variables: name: #FCGIServer newMethods: an IdentityDictionary() instanceVariableNames: an OrderedCollection('handler' 'port' 'socket' 'profile'...etc... model: a RBNamespace superclass: an Object subclasses: an OrderedCollection() removedMethods: nil realClass: FCGIServer classVariableNames: an OrderedCollection() poolDictionaryNames: nil category: nil comment: an Object RenameClassRefactoring(Refactoring)>>convertMethod:for:using: Receiver: a RenameClassRefactoring Arguments and temporary variables: <<error during printing> Receiver's instance variables: model: a RBNamespace options: nil className: #FCGIProtocolVersion1 newName: #FCGIAdapter class: FCGIProtocolVersion1 [] in RenameClassRefactoring>>renameReferences Receiver: a RenameClassRefactoring Arguments and temporary variables: replacer: FCGIServer>>protocol method: a ParseTreeRewriter Receiver's instance variables: model: a RBNamespace options: nil className: #FCGIProtocolVersion1 newName: #FCGIAdapter class: FCGIProtocolVersion1 [] in [] in RBNamespace>>allReferencesToClass:do: Receiver: a RBNamespace Arguments and temporary variables: <<error during printing> Receiver's instance variables: changes: FCGIProtocolVersion1 rename: #FCGIAdapter! environment: Smalltalk newClasses: an IdentityDictionary() removedClasses: a Set() changedClasses: an IdentityDictionary(size 494) rootClasses: nil implementorsCache: an IdentityDictionary() sendersCache: an IdentityDictionary() Set>>do: Receiver: a Set(#protocol) Arguments and temporary variables: aBlock: [closure] in [] in RBNamespace>>allReferencesToClass:do: index: 3 each: #protocol indexLimiT: 5 Receiver's instance variables: tally: 1 array: #(nil nil #protocol nil nil) [] in RBNamespace>>allReferencesToClass:do: Receiver: a RBNamespace Arguments and temporary variables: aRBClass: FCGIServer aBlock: FCGIProtocolVersion1 each: [closure] in RenameClassRefactoring>>renameReferences Receiver's instance variables: changes: FCGIProtocolVersion1 rename: #FCGIAdapter! environment: Smalltalk newClasses: an IdentityDictionary() removedClasses: a Set() changedClasses: an IdentityDictionary(size 494) rootClasses: nil implementorsCache: an IdentityDictionary() sendersCache: an IdentityDictionary() [] in RBNamespace>>allClassesDo: Receiver: a RBNamespace Arguments and temporary variables: aBlock: FCGIServer seen: [closure] in RBNamespace>>allReferencesToClass:do: evalBlock: a Set(#FCGIProtocolVersion1) each: FCGIServer class: [closure] in RBNamespace>>allReferencesToClass:do: Receiver's instance variables: changes: FCGIProtocolVersion1 rename: #FCGIAdapter! environment: Smalltalk newClasses: an IdentityDictionary() removedClasses: a Set() changedClasses: an IdentityDictionary(size 494) rootClasses: nil implementorsCache: an IdentityDictionary() sendersCache: an IdentityDictionary() [] in BrowserEnvironment>>classesDo: Receiver: Smalltalk Arguments and temporary variables: aBlock: FCGIServer each: [closure] in RBNamespace>>allClassesDo: Receiver's instance variables: label: nil searchStrings: nil [] in BrowserEnvironment>>allClassesDo: Receiver: Smalltalk Arguments and temporary variables: aBlock: FCGIServer each: [closure] in BrowserEnvironment>>classesDo: Receiver's instance variables: label: nil searchStrings: nil OrderedCollection>>do: Receiver: an OrderedCollection(AColorSelectorMorph ADPCMCodec AIFFFileReader ASTPrettyPrinting ASamp...etc... Arguments and temporary variables: aBlock: [closure] in BrowserEnvironment>>allClassesDo: index: 492 Receiver's instance variables: array: {AColorSelectorMorph . ADPCMCodec . AIFFFileReader . ASTPrettyPrinting ....etc... firstIndex: 1 lastIndex: 4204 SystemDictionary>>allClassesDo: Receiver: Smalltalk Arguments and temporary variables: aBlock: [closure] in BrowserEnvironment>>allClassesDo: Receiver's instance variables: tally: 4332 array: {#PRReferenceRenderer->PRReferenceRenderer . #PRLightBoxView->PRLightBox...etc... cachedClassNames: a SortedCollection(#AColorSelectorMorph #ADPCMCodec #AIFFFile...etc... SystemNavigation>>allClassesDo: Receiver: a SystemNavigation Arguments and temporary variables: aBlock: [closure] in BrowserEnvironment>>allClassesDo: Receiver's instance variables: browserClass: nil hierarchyBrowserClass: nil BrowserEnvironment>>allClassesDo: Receiver: Smalltalk Arguments and temporary variables: aBlock: [closure] in BrowserEnvironment>>classesDo: Receiver's instance variables: label: nil searchStrings: nil BrowserEnvironment>>classesDo: Receiver: Smalltalk Arguments and temporary variables: aBlock: [closure] in RBNamespace>>allClassesDo: Receiver's instance variables: label: nil searchStrings: nil RBNamespace>>allClassesDo: Receiver: a RBNamespace Arguments and temporary variables: aBlock: [closure] in RBNamespace>>allReferencesToClass:do: seen: a Set(#FCGIProtocolVersion1) evalBlock: [closure] in RBNamespace>>allClassesDo: Receiver's instance variables: changes: FCGIProtocolVersion1 rename: #FCGIAdapter! environment: Smalltalk newClasses: an IdentityDictionary() removedClasses: a Set() changedClasses: an IdentityDictionary(size 494) rootClasses: nil implementorsCache: an IdentityDictionary() sendersCache: an IdentityDictionary() RBNamespace>>allReferencesToClass:do: Receiver: a RBNamespace Arguments and temporary variables: aRBClass: FCGIProtocolVersion1 aBlock: [closure] in RenameClassRefactoring>>renameReferences Receiver's instance variables: changes: FCGIProtocolVersion1 rename: #FCGIAdapter! environment: Smalltalk newClasses: an IdentityDictionary() removedClasses: a Set() changedClasses: an IdentityDictionary(size 494) rootClasses: nil implementorsCache: an IdentityDictionary() sendersCache: an IdentityDictionary() RenameClassRefactoring>>renameReferences Receiver: a RenameClassRefactoring Arguments and temporary variables: replacer: a ParseTreeRewriter Receiver's instance variables: model: a RBNamespace options: nil className: #FCGIProtocolVersion1 newName: #FCGIAdapter class: FCGIProtocolVersion1 [] in RenameClassRefactoring>>transform Receiver: a RenameClassRefactoring Arguments and temporary variables: Receiver's instance variables: model: a RBNamespace options: nil className: #FCGIProtocolVersion1 newName: #FCGIAdapter class: FCGIProtocolVersion1 BlockClosure>>ensure: Receiver: [closure] in RenameClassRefactoring>>transform Arguments and temporary variables: aBlock: [closure] in RBNamespace>>performChange:around: returnValue: nil b: nil Receiver's instance variables: outerContext: RenameClassRefactoring>>transform startpc: 33 numArgs: 0 RBNamespace>>performChange:around: Receiver: a RBNamespace Arguments and temporary variables: aCompositeRefactoryChange: FCGIProtocolVersion1 rename: #FCGIAdapter! aBlock: [closure] in RenameClassRefactoring>>transform oldChanges: refactor class, rename Receiver's instance variables: changes: FCGIProtocolVersion1 rename: #FCGIAdapter! environment: Smalltalk newClasses: an IdentityDictionary() removedClasses: a Set() changedClasses: an IdentityDictionary(size 494) rootClasses: nil implementorsCache: an IdentityDictionary() sendersCache: an IdentityDictionary() RBNamespace>>renameClass:to:around: Receiver: a RBNamespace Arguments and temporary variables: aRBClass: FCGIProtocolVersion1 aSymbol: #FCGIAdapter aBlock: [closure] in RenameClassRefactoring>>transform change: FCGIProtocolVersion1 rename: #FCGIAdapter! value: nil dict: nil Receiver's instance variables: changes: FCGIProtocolVersion1 rename: #FCGIAdapter! environment: Smalltalk newClasses: an IdentityDictionary() removedClasses: a Set() changedClasses: an IdentityDictionary(size 494) rootClasses: nil implementorsCache: an IdentityDictionary() sendersCache: an IdentityDictionary() RenameClassRefactoring>>transform Receiver: a RenameClassRefactoring Arguments and temporary variables: Receiver's instance variables: model: a RBNamespace options: nil className: #FCGIProtocolVersion1 newName: #FCGIAdapter class: FCGIProtocolVersion1 --- The full stack --- UndefinedObject(Object)>>doesNotUnderstand: #null RBMethodNode>>primitiveNode RBMethodNode>>primitiveText RBMethodNode>>primitiveSources RBFormatter>>formatTagFor: RBFormatter>>acceptSequenceNode: RBSequenceNode>>acceptVisitor: RBFormatter>>visitNode: [] in RBFormatter>>acceptMethodNode: RBFormatter>>indent:while: RBFormatter>>indentWhile: RBFormatter>>acceptMethodNode: RBMethodNode>>acceptVisitor: RBFormatter>>visitNode: RBFormatter>>format: RBMethodNode(RBProgramNode)>>formattedCode RBClass(RBAbstractClass)>>compileTree:classified: RBClass(RBAbstractClass)>>compileTree: RenameClassRefactoring(Refactoring)>>convertMethod:for:using: [] in RenameClassRefactoring>>renameReferences [] in [] in RBNamespace>>allReferencesToClass:do: Set>>do: [] in RBNamespace>>allReferencesToClass:do: [] in RBNamespace>>allClassesDo: [] in BrowserEnvironment>>classesDo: [] in BrowserEnvironment>>allClassesDo: OrderedCollection>>do: SystemDictionary>>allClassesDo: SystemNavigation>>allClassesDo: BrowserEnvironment>>allClassesDo: BrowserEnvironment>>classesDo: RBNamespace>>allClassesDo: RBNamespace>>allReferencesToClass:do: RenameClassRefactoring>>renameReferences [] in RenameClassRefactoring>>transform BlockClosure>>ensure: RBNamespace>>performChange:around: RBNamespace>>renameClass:to:around: RenameClassRefactoring>>transform - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - RenameClassRefactoring(Refactoring)>>primitiveExecute [] in OR2CmdRenameClassRefactoring(OR2Command)>>performRefactoring: BlockClosure>>ensure: CursorWithMask(Cursor)>>showWhile: OBShoutPlatform(OBMorphicPlatform)>>handleWaitRequest: OBWaitRequest>>handleWith: OBWaitRequest(OBInteractionRequest)>>defaultAction UndefinedObject>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: OBWaitRequest(Exception)>>signal OBWaitRequest class>>block: OR2CmdRenameClassRefactoring(OR2Command)>>waitWhile: OR2CmdRenameClassRefactoring(OR2Command)>>performRefactoring: [] in [] in OR2CmdRenameClassRefactoring(OR2CmdRefactoring)>>execute BlockClosure>>on:do: OR2CmdRenameClassRefactoring(OR2Command)>>handleError: [] in OR2CmdRenameClassRefactoring(OR2CmdRefactoring)>>execute BlockClosure>>on:do: OR2CmdRenameClassRefactoring(OR2CmdRefactoring)>>execute OR2CmdRenameClassRefactoring(O2Command)>>perform:orSendTo: [] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: BlockClosure>>ensure: CursorWithMask(Cursor)>>showWhile: ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent: ToggleMenuItemMorph(MenuItemMorph)>>mouseUp: ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp: MouseButtonEvent>>sentTo: ToggleMenuItemMorph(Morph)>>handleEvent: MorphicEventDispatcher>>dispatchDefault:with: MorphicEventDispatcher>>dispatchEvent:with: ToggleMenuItemMorph(Morph)>>processEvent:using: MorphicEventDispatcher>>dispatchDefault:with: MorphicEventDispatcher>>dispatchEvent:with: MenuMorph(Morph)>>processEvent:using: MenuMorph(Morph)>>processEvent: MenuMorph>>handleFocusEvent: [] in HandMorph>>sendFocusEvent:to:clear: [] in PasteUpMorph>>becomeActiveDuring: BlockClosure>>on:do: PasteUpMorph>>becomeActiveDuring: HandMorph>>sendFocusEvent:to:clear: HandMorph>>sendEvent:focus:clear: HandMorph>>sendMouseEvent: HandMorph>>handleEvent: HandMorph>>processEvents [] in WorldState>>doOneCycleNowFor: Array(SequenceableCollection)>>do: WorldState>>handsDo: WorldState>>doOneCycleNowFor: WorldState>>doOneCycleFor: PasteUpMorph>>doOneCycle [] in Project class>>spawnNewProcess [] in BlockClosure>>newProcess

1 0

Oct. 5, 2009

mc semantics Begin forwarded message: > From: Andreas Raab <andreas.raab(a)gmx.de> > Date: September 30, 2009 4:53:10 PM GMT+02:00 > To: The general-purpose Squeak developers list <squeak-dev(a)lists.squeakfoundation.org > > > Subject: [squeak-dev] Re: The Trunk: Monticello-ar.323.mcz > Reply-To: The general-purpose Squeak developers list <squeak-dev(a)lists.squeakfoundation.org > > > > Miguel Enrique CobÃ¡ Martinez wrote: >> El miÃ©, 30-09-2009 a las 04:39 +0000, commits(a)source.squeak.org >> escribiÃ³: >>> Andreas Raab uploaded a new version of Monticello to project The >>> Trunk: >>> http://source.squeak.org/trunk/Monticello-ar.323.mcz >> Doesn't Monticello has its master repository on the wiresong site? > > It does, but this is an interim experiment with the only purpose of > trying to improve our local situation a little. Plus I have no > commit rights to the upstream repository. Plus I need that now ;-) > > There is always an interesting tension between upstream and > downstream usage and we haven't really found out how to > realistically deal with that tension in a sustained manner. If > anyone has ideas, I'm all ears. > > Cheers, > - Andreas > >>> ==================== Summary ==================== >>> >>> Name: Monticello-ar.323 >>> Author: ar >>> Time: 29 September 2009, 9:38:50 am >>> UUID: 927bef84-8215-0443-afe4-c8575b3a300c >>> Ancestors: Monticello-cwp.322 >>> >>> A small improvement to MC loading. New rules are: >>> - Pass 1: Load class changes first >>> - Pass 2: Compile new / changed methods >>> - Pass 3: Install new / changed methods >>> - Pass 4: Remove old methods >>> This should provide a bit more stability to the loading process. >>> >>> =============== Diff against Monticello-cwp.322 =============== >>> >>> Item was added: >>> + ----- Method: MCMethodDefinition>>asMethodAddition (in category >>> 'accessing') ----- >>> + asMethodAddition >>> + ^MethodAddition new >>> + compile: source >>> + classified: category >>> + withStamp: timeStamp >>> + notifying: (SyntaxError new category: category) >>> + logSource: true >>> + inClass: self actualClass.! >>> >>> Item was changed: >>> ----- Method: MCPackageLoader>>basicLoad (in category 'private') >>> ----- >>> basicLoad >>> errorDefinitions := OrderedCollection new. >>> + [["Pass 1: Load everything but the methods, which are >>> collected in methodAdditions." >>> + additions do: [:ea | + [ea isMethodDefinition + ifTrue: >>> [methodAdditions add: ea asMethodAddition] >>> + ifFalse:[ea load]]on: Error do: [errorDefinitions add: ea]. >>> + ] displayingProgress: 'Reshaping classes...'. >>> + + "Pass 2: We compile new / changed methods" >>> + methodAdditions do:[:ea| ea createCompiledMethod] >>> displayingProgress: 'Compiling...'. >>> - [[ >>> - >>> - "FIXME. Do a separate pass on loading class definitions as the >>> very first thing. >>> - This is a workaround for a problem with the so-called 'atomic' >>> loading (you wish!!) >>> - which isn't atomic at all but mixes compilation of methods with >>> reshapes of classes. >>> - - Since the method is not installed until later, any class >>> reshape in the middle *will* >>> - affect methods in subclasses that have been compiled before. >>> There is probably >>> - a better way of dealing with this by ensuring that the sort >>> order of the definition lists >>> - superclass definitions before methods for subclasses but I need >>> this NOW, and adding >>> - an extra pass ensures that methods are compiled against their >>> new class definitions." >>> + "Pass 3: Install the new / changed methods >>> + (this is a separate pass to allow compiler changes to be loaded)" >>> + methodAdditions do:[:ea| ea installMethod] displayingProgress: >>> 'Installing...'. >>> + + "Pass 4: Remove the obsolete methods" >>> + removals do:[:ea| ea unload] displayingProgress: 'Cleaning >>> up ...'. >>> + + "Try again any delayed definitions" >>> - additions do: [:ea | self loadClassDefinition: ea] >>> displayingProgress: 'Loading classes...'. >>> - >>> - additions do: [:ea | self tryToLoad: ea] displayingProgress: >>> 'Compiling methods...'. >>> - removals do: [:ea | ea unload] displayingProgress: 'Cleaning >>> up...'. >>> self shouldWarnAboutErrors ifTrue: [self warnAboutErrors]. >>> + errorDefinitions do: [:ea | ea load] displayingProgress: >>> 'Reloading...'. >>> + + "Finally, notify observers for the method additions" >>> - errorDefinitions do: [:ea | ea addMethodAdditionTo: >>> methodAdditions] displayingProgress: 'Reloading...'. >>> - methodAdditions do: [:each | each installMethod]. >>> methodAdditions do: [:each | each notifyObservers]. >>> + + additions do: [:ea | ea postloadOver: (self obsoletionFor: >>> ea)] displayingProgress: 'Initializing...' >>> + ] on: InMidstOfFileinNotification do: [:n | n resume: true] >>> + ] ensure: [self flushChangesFile]! >>> - additions do: [:ea | ea postloadOver: (self obsoletionFor: ea)] >>> displayingProgress: 'Initializing...'] >>> - on: InMidstOfFileinNotification - do: [:n | n resume: true]] >>> - ensure: [self flushChangesFile]! >>> >>> > >

1 0