- Pharo-dev - lists.pharo.org

[Pharo-project] some patterns I would like to **kill**
by stephane ducasse Oct. 22, 2010

Oct. 22, 2010

Hi I was reading Pluggable and friends I identified some patterns. The respondsTo plague Examples: color := self fillStyle asColor. (self labelMorph respondsTo: #enabled:) ifTrue: [self labelMorph enabled: self enabled]. (self labelMorph respondsTo: #interactionState:) ifTrue: [self labelMorph interactionState: self interactionState] (self labelMorph respondsTo: #enabled:) ifTrue: [ self labelMorph enabled: aBoolean]. (self enabled not and: [self label isMorph and: [(self label respondsTo: #enabled:) not]]) by construction a labelObject should be a morph and it should answer enabled: and the case where this is not the case should be fixed. Using submorphs to avoid one single inst var makes code quite ugly to read: labelMorph "Answer the actual label morph." self hasSubmorphs ifFalse: [^nil]. self firstSubmorph hasSubmorphs ifFalse: [^nil]. ^self firstSubmorph firstSubmorph

2 1

[Pharo-project] About Object and Model
by stephane ducasse Oct. 22, 2010

Oct. 22, 2010

Hi guys I'm reading Object and I have the impression that some methods are in Object while there should be on Model. when: anEventSelector send: aMessageSelector to: anObject exclusive: aValueHolder okToClose.... taskbarIcon taskbarLabel May be some of these methods should grouped in traits, then applied to Model. Then if the user wants something else than Model to play the game he can simply apply a trait. I think that this hierarchical decomposition is often forcing us to stack methods in the wrong place I think that the composition is way stronger and much more flexible than hierarchical ordering. tell me what you think. I would like to have a nice Object class. Stef

2 1

[Pharo-project] What is a primitive method?
by Oscar E A Callau Oct. 22, 2010

Oct. 22, 2010

Hi all, I have a (basic) question: What is a primitive method? In pharo 1.1.1, we have CompiledMethod>>primitive that basically return: 0 if the method is not a primitive method >0 otherwise But if you execute this on i.e. Number>>isNumber or Morph>>#model compiled methods you get that these two are primitive methods. Are they primitive methods? Other (related) question is: When I executed the expression: SystemNavigation default allPrimitiveMethods , I get a OrderedCollection with 5581 elements. Are all those methods, primitive methods? Thanks in advance

3 5

[Pharo-project] a useful check
by Eliot Miranda Oct. 22, 2010

Oct. 22, 2010

Hi All, I just stumbled across a bug of mine which is a rare but easy-to-make slip, that of an unused block, e.g. expr ifTrue: [[something that doesn't get done]]. Here's a check for it (I'll check it in as a SysdtemNavigation method and perhaps the RB includes it in its lint tests). There's one method in Squeak trunk that falls foul of this. "Scan for the byte following each block creation being the pop bytecode." SystemNavigation new browseAllSelect: [:m| | is | is := InstructionStream on: m. is scanFor: [:b| b = 143 and: [(m at: is thirdByte * 256 + is fourthByte + is pc + 4) = 135]]]

1 0

[Pharo-project] Latest OB, category autocompletion does always a lowercase
by Mariano Martinez Peck Oct. 22, 2010

Oct. 22, 2010

Hi. In the latest OB code, when I put "add category" to a method, and I start to type...it automatically finds several categories, but it always put lowercase to the name. For example, I have Package called *MyApp and I want to create a method category for that....when I type, the option showed is *myapp Would be great if this is case sensitive. Cheers Mariano

3 5

[Pharo-project] Explicit ordering of submorphs
by Fernando olivero Oct. 22, 2010

Oct. 22, 2010

Currently, the submorph order isn't explicit. Which means that adding several submorphs in a certain order, is no guarantee that they will appear in the desired order when laid out using a LayoutPolicy. Because the #morphicLayoutNumber is used. I've propose the following: 1. Add Morph>>precedence 2. Add Morph>>orderedSubmorphs 3. Modify the existing LayoutPolicies to use orderedSubmorphs instead of submorphsDo: ISSUE 3136.

1 2

[Pharo-project] Latest OB code, running single test erases the colors of the rest
by Mariano Martinez Peck Oct. 22, 2010

Oct. 22, 2010

Hi. I I have a TestCase, and with cmd + t, I run a particular test method, all the little small bolls from the other test methods are lost and initialized again with gray :( they would be maintained. thanks mariano

1 0

[Pharo-project] Monticello Browser does not answer to key position
by Mariano Martinez Peck Oct. 22, 2010

Oct. 22, 2010

Pharo core version: 12199 Steps to reproduce: 1. Open Monticello browse 2. Select a package 3. Type a letter, for example, 'm' You will see that the selection doesnt move to the next package starting with m. It would be cool to have the same behavior than when browsing methods or classes. http://code.google.com/p/pharo/issues/detail?id=3135 mariano

1 0

Oct. 22, 2010

http://code.google.com/p/pharo/issues/detail?id=3134 On Oct 22, 2010, at 1:47 PM, Mariano Martinez Peck wrote: > Seems to be used by SmartRefStream, but I don't know why. But it is easy to test it. > > This works: > > FileStream forceNewFileNamed: 'test' do: > [ :stream | stream fileOutClass: nil andObject: 'something'. ]. > > (FileStream oldFileNamed: 'test') fileInObjectAndCode. > > > Rename ObjectScanner, and you will get a compiler error. > This is because it is being written in: > > SmartRefStream >> appendClassDefns > > > The ObjectScanner class comment says: > > > An instance of this class is the compiler's context for filing in a SmartRefStream containing instance-specific classes. When the old name of a new object's class conflicts with an existing class name, install a class var in me. It has the old name but points at the new class. The compiler uses it when compiling the code in the fileIn. Fill the SmartRefStream's renamed class dictionary. > > An object fileout: > !ObjectScanner new initialize! "allow me to take control with scanFrom:" > > Player subclass: Player23 instanceVariableNames: 'foo' classVariableNames: '' > poolDictionaries: nil category: 'Instance Specific'! > "I prescan this and (self rename: #Player23 toBe: #Player30)" > > !Player23 methodsFor: 'all' stamp: 'tk 3/9/98 18:58'! "actually sent to Player30" > foo > ^ foo! ! > > !self smartRefStream!<binary representation of the objects>! > > > > On Thu, Oct 21, 2010 at 8:10 PM, stephane ducasse <stephane.ducasse(a)free.fr> wrote: > ObjectScanner does not have any user and I was wondering what was its exact purpose? > Apparently it is related to uniclasses and there are still some left over. > > It is not available in CUIS. > Stef > _______________________________________________ > Pharo-project mailing list > Pharo-project(a)lists.gforge.inria.fr > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project > > _______________________________________________ > Pharo-project mailing list > Pharo-project(a)lists.gforge.inria.fr > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project

1 0

Oct. 22, 2010

> Seems to be used by SmartRefStream, but I don't know why. But it is easy to test it. > > This works: > > FileStream forceNewFileNamed: 'test' do: > [ :stream | stream fileOutClass: nil andObject: 'something'. ]. > > (FileStream oldFileNamed: 'test') fileInObjectAndCode. > > > Rename ObjectScanner, and you will get a compiler error. > This is because it is being written in: > > SmartRefStream >> appendClassDefns > > > The ObjectScanner class comment says: > > > An instance of this class is the compiler's context for filing in a SmartRefStream containing instance-specific classes. When the old name of a new object's class conflicts with an existing class name, install a class var in me. It has the old name but points at the new class. The compiler uses it when compiling the code in the fileIn. Fill the SmartRefStream's renamed class dictionary. > > An object fileout: > !ObjectScanner new initialize! "allow me to take control with scanFrom:" > > Player subclass: Player23 instanceVariableNames: 'foo' classVariableNames: '' > poolDictionaries: nil category: 'Instance Specific'! > "I prescan this and (self rename: #Player23 toBe: #Player30)" > > !Player23 methodsFor: 'all' stamp: 'tk 3/9/98 18:58'! "actually sent to Player30" > foo > ^ foo! ! > > !self smartRefStream!<binary representation of the objects>! > > > > On Thu, Oct 21, 2010 at 8:10 PM, stephane ducasse <stephane.ducasse(a)free.fr> wrote: > ObjectScanner does not have any user and I was wondering what was its exact purpose? > Apparently it is related to uniclasses and there are still some left over. > > It is not available in CUIS. > Stef > _______________________________________________ > Pharo-project mailing list > Pharo-project(a)lists.gforge.inria.fr > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project > > _______________________________________________ > Pharo-project mailing list > Pharo-project(a)lists.gforge.inria.fr > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project

1 0