Nicolas Cellier uploaded a new version of Compiler to project The Trunk:
http://source.squeak.org/trunk/Compiler-nice.205.mcz
==================== Summary ====================
Name: Compiler-nice.205
Author: nice
Time: 2 April 2011, 7:27:35.803 pm
UUID: 1ff62b57-d6e2-43b6-8827-db4113196b24
Ancestors: Compiler-ul.204
Don't forget to deoptimize the receiver of an optimized message in case of cascade.
=============== Diff against Compiler-ul.204 ===============
Item was changed:
----- Method: MessageNode>>ensureCanCascade: (in category 'testing') -----
ensureCanCascade: encoder
special > 0 ifTrue:
[special := 0.
selector := encoder encodeSelector: originalSelector.
arguments := originalArguments.
+ receiver isBlockNode ifTrue: [receiver deoptimize].
arguments do:
[:each|
each isBlockNode ifTrue:
[each deoptimize]]]!
Nicolas Cellier uploaded a new version of Compiler to project The Trunk:
http://source.squeak.org/trunk/Compiler-nice.205.mcz
==================== Summary ====================
Name: Compiler-nice.205
Author: nice
Time: 2 April 2011, 7:27:35.803 pm
UUID: 1ff62b57-d6e2-43b6-8827-db4113196b24
Ancestors: Compiler-ul.204
Don't forget to deoptimize the receiver of an optimized message in case of cascade.
=============== Diff against Compiler-ul.204 ===============
Item was changed:
----- Method: MessageNode>>ensureCanCascade: (in category 'testing') -----
ensureCanCascade: encoder
special > 0 ifTrue:
[special := 0.
selector := encoder encodeSelector: originalSelector.
arguments := originalArguments.
+ receiver isBlockNode ifTrue: [receiver deoptimize].
arguments do:
[:each|
each isBlockNode ifTrue:
[each deoptimize]]]!
Nicolas Cellier uploaded a new version of Compiler to project The Trunk:
http://source.squeak.org/trunk/Compiler-nice.205.mcz
==================== Summary ====================
Name: Compiler-nice.205
Author: nice
Time: 2 April 2011, 7:27:35.803 pm
UUID: 1ff62b57-d6e2-43b6-8827-db4113196b24
Ancestors: Compiler-ul.204
Don't forget to deoptimize the receiver of an optimized message in case of cascade.
=============== Diff against Compiler-ul.204 ===============
Item was changed:
----- Method: MessageNode>>ensureCanCascade: (in category 'testing') -----
ensureCanCascade: encoder
special > 0 ifTrue:
[special := 0.
selector := encoder encodeSelector: originalSelector.
arguments := originalArguments.
+ receiver isBlockNode ifTrue: [receiver deoptimize].
arguments do:
[:each|
each isBlockNode ifTrue:
[each deoptimize]]]!
Levente Uzonyi uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-ul.429.mcz
==================== Summary ====================
Name: System-ul.429
Author: ul
Time: 2 April 2011, 2:02:24.802 pm
UUID: 2065453c-d28d-d949-9a84-31226ee986bf
Ancestors: System-nice.428
- added #newParser and #newCompiler to PseudoClass
=============== Diff against System-nice.428 ===============
Item was added:
+ ----- Method: PseudoClass>>newCompiler (in category 'accessing') -----
+ newCompiler
+ "Answer a Compiler suitable for compiling this Behavior"
+ ^self compilerClass new parser: self newParser!
Item was added:
+ ----- Method: PseudoClass>>newParser (in category 'accessing') -----
+ newParser
+ "Answer a Parser suitable for parsing source code in this Behavior"
+ ^self parserClass new!
Levente Uzonyi uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-ul.429.mcz
==================== Summary ====================
Name: System-ul.429
Author: ul
Time: 2 April 2011, 2:02:24.802 pm
UUID: 2065453c-d28d-d949-9a84-31226ee986bf
Ancestors: System-nice.428
- added #newParser and #newCompiler to PseudoClass
=============== Diff against System-nice.428 ===============
Item was added:
+ ----- Method: PseudoClass>>newCompiler (in category 'accessing') -----
+ newCompiler
+ "Answer a Compiler suitable for compiling this Behavior"
+ ^self compilerClass new parser: self newParser!
Item was added:
+ ----- Method: PseudoClass>>newParser (in category 'accessing') -----
+ newParser
+ "Answer a Parser suitable for parsing source code in this Behavior"
+ ^self parserClass new!
Levente Uzonyi uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-ul.429.mcz
==================== Summary ====================
Name: System-ul.429
Author: ul
Time: 2 April 2011, 2:02:24.802 pm
UUID: 2065453c-d28d-d949-9a84-31226ee986bf
Ancestors: System-nice.428
- added #newParser and #newCompiler to PseudoClass
=============== Diff against System-nice.428 ===============
Item was added:
+ ----- Method: PseudoClass>>newCompiler (in category 'accessing') -----
+ newCompiler
+ "Answer a Compiler suitable for compiling this Behavior"
+ ^self compilerClass new parser: self newParser!
Item was added:
+ ----- Method: PseudoClass>>newParser (in category 'accessing') -----
+ newParser
+ "Answer a Parser suitable for parsing source code in this Behavior"
+ ^self parserClass new!
Levente Uzonyi uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-ul.526.mcz
==================== Summary ====================
Name: Morphic-ul.526
Author: ul
Time: 30 March 2011, 4:52:11.048 am
UUID: e80a9f4c-0a19-fd4f-9847-2d8834e29558
Ancestors: Morphic-dtl.525
- added an accessor for TextEditor's model
- updated TextEditor >> #referencesToIt to find bindings using the model if possible. This makes it possible to find references to variables from a shared pool from a browser.
=============== Diff against Morphic-dtl.525 ===============
Item was added:
+ ----- Method: TextEditor>>model (in category 'accessing') -----
+ model
+
+ ^model!
Item was changed:
----- Method: TextEditor>>referencesToIt (in category 'menu messages') -----
referencesToIt
"Open a references browser on the selected symbol"
+ | symbol environment binding |
- | aSymbol |
self selectLine.
+ symbol := self selectedSymbol ifNil: [ ^morph flash ].
+ environment := (model respondsTo: #selectedClassOrMetaClass)
+ ifTrue: [ model selectedClassOrMetaClass ifNil: [ Smalltalk globals ] ]
+ ifFalse: [ Smalltalk globals ].
+ binding := (environment bindingOf: symbol) ifNil: [ ^morph flash ].
+ self systemNavigation browseAllCallsOn: binding!
- ((aSymbol := self selectedSymbol) == nil or:
- [(Smalltalk globals includesKey: aSymbol) not])
- ifTrue: [^ morph flash].
-
- self systemNavigation browseAllCallsOn: (Smalltalk globals associationAt: self selectedSymbol)!
Levente Uzonyi uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-ul.526.mcz
==================== Summary ====================
Name: Morphic-ul.526
Author: ul
Time: 30 March 2011, 4:52:11.048 am
UUID: e80a9f4c-0a19-fd4f-9847-2d8834e29558
Ancestors: Morphic-dtl.525
- added an accessor for TextEditor's model
- updated TextEditor >> #referencesToIt to find bindings using the model if possible. This makes it possible to find references to variables from a shared pool from a browser.
=============== Diff against Morphic-dtl.525 ===============
Item was added:
+ ----- Method: TextEditor>>model (in category 'accessing') -----
+ model
+
+ ^model!
Item was changed:
----- Method: TextEditor>>referencesToIt (in category 'menu messages') -----
referencesToIt
"Open a references browser on the selected symbol"
+ | symbol environment binding |
- | aSymbol |
self selectLine.
+ symbol := self selectedSymbol ifNil: [ ^morph flash ].
+ environment := (model respondsTo: #selectedClassOrMetaClass)
+ ifTrue: [ model selectedClassOrMetaClass ifNil: [ Smalltalk globals ] ]
+ ifFalse: [ Smalltalk globals ].
+ binding := (environment bindingOf: symbol) ifNil: [ ^morph flash ].
+ self systemNavigation browseAllCallsOn: binding!
- ((aSymbol := self selectedSymbol) == nil or:
- [(Smalltalk globals includesKey: aSymbol) not])
- ifTrue: [^ morph flash].
-
- self systemNavigation browseAllCallsOn: (Smalltalk globals associationAt: self selectedSymbol)!
Levente Uzonyi uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-ul.526.mcz
==================== Summary ====================
Name: Morphic-ul.526
Author: ul
Time: 30 March 2011, 4:52:11.048 am
UUID: e80a9f4c-0a19-fd4f-9847-2d8834e29558
Ancestors: Morphic-dtl.525
- added an accessor for TextEditor's model
- updated TextEditor >> #referencesToIt to find bindings using the model if possible. This makes it possible to find references to variables from a shared pool from a browser.
=============== Diff against Morphic-dtl.525 ===============
Item was added:
+ ----- Method: TextEditor>>model (in category 'accessing') -----
+ model
+
+ ^model!
Item was changed:
----- Method: TextEditor>>referencesToIt (in category 'menu messages') -----
referencesToIt
"Open a references browser on the selected symbol"
+ | symbol environment binding |
- | aSymbol |
self selectLine.
+ symbol := self selectedSymbol ifNil: [ ^morph flash ].
+ environment := (model respondsTo: #selectedClassOrMetaClass)
+ ifTrue: [ model selectedClassOrMetaClass ifNil: [ Smalltalk globals ] ]
+ ifFalse: [ Smalltalk globals ].
+ binding := (environment bindingOf: symbol) ifNil: [ ^morph flash ].
+ self systemNavigation browseAllCallsOn: binding!
- ((aSymbol := self selectedSymbol) == nil or:
- [(Smalltalk globals includesKey: aSymbol) not])
- ifTrue: [^ morph flash].
-
- self systemNavigation browseAllCallsOn: (Smalltalk globals associationAt: self selectedSymbol)!