April 2011 - Pharo-users - lists.pharo.org

Re: [Pharo-users] Metacellobrowser feedback

by Dale Henrichs

Johan, Thanks for the excellent feedback ... You have touched on some issues that I am aware of and appreciate your suggestions ... you have also touched on some issues that I hadn't thought about ... I want to let your feedback marinate a bit ... you have provided enough detail that I think I understand where the improvements are needed, but I'm not sure I know the right way to address them ... yet. Please continue to let us know about your learning adventure:) Dale On 04/22/2011 02:36 PM, Johan Fabry wrote: > Hi all, > > I'd like to give a bit of feeback on the metacello browser. First > some context: I am aware of the core concepts of configuration > management, but because of lack of time I never got to learn > Metacello. So I thought this browser would be ideal for me, I gave it > a go, and I'd like to report on my experience. > > The first try did not work at all for me, because I started with a > configuration that is too complex. So lets start with the second try, > something simpler, and first get that sorted out before we do the > complex one. Here we go: I have a SqueakSource project > TraitsApplication with one package TraitsApplication which contains > TraitsApplication and TraitsApplication-Tests categories (and the > former contains a TraitsApplication class :-P ). Following the > prompts in the browser I was able to make a configuration and save it > to SqueakSource, without any real problems. So the cool thing is, I > made my first Metacello config today and it even works :-) > > One issue is how to load my creation. I am used to a big do-it that > gets the config via Gofer and contains '(Smalltalk at: > #ConfigurationOfFoo) perform: #loadDefault'. Many configs do it like > this, as a user I considered it a standard convention. But this turns > out not to work, because no loadDefault has been defined. Perchance I > remembered how I had to load MetacelloBrowser > '(ConfigurationOfMetacelloBrowser project version: #stable) load' and > adapting it to TraitsApplication (not forgetting > version:#development) made it to work. So, the question: why is there > no #loadDefault generated, nor an obvious way to specify what the > default should be? (At least for simple cases of the configuration, > like this one) > > The second issue is the UI. It is confusing at times, there are > multiple issues and I list them in random order - Why can I not click > on '+Configuration' when there is no configuration selected in the > left hand side? - What do the unit-test icons at the left of the > configs and baselines-versions-... mean? I turn them green by > double-clicking on them, which also gets me an inspector on an empty > collection. Huh? - The context menu is too big and confusing. It > should be subdivided and ordered by group. Submenus are in order I > think. - What are groups? The help menu does not enlighten me. > > Next up: making a config for AspectMaps (the first thing I tried and > that did not work). But this is for another day ... -- Johan Fabry > jfabry(a)dcc.uchile.cl - http://dcc.uchile.cl/~jfabry PLEIAD Lab - > Computer Science Department (DCC) - University of Chile > > >

April 22, 2011

Re: [Pharo-users] How to break out of endless loop using code?

by Dale Henrichs

Try something like this: | process | process := [ x := MyClass2 new. x myLoop ] fork. (Delay forSeconds: 10) wait. process terminate. With #fork, you are running the loop in a background process. #fork returns the process instance. Wait a bit using Delay and then send #terminate to the process ... If you stash `process` into a global you can let it run away while you do work in the foreground. Depending upon how tight the loop is, you may need to put in a `Processor yield` statement to give the foreground process a chance to run ... you should also look into process priorities. Dale On 04/21/2011 01:08 PM, DougEdmunds wrote: > I created a class that generates an endless loop. For this example, the loop > just prints 1-10, back and forth. I'd like to stop the loop by using code, > but when it is running, I can't type anything in a workspace. The only way > I can stop it is by a manual interrupt (on XP, using Alt-<period key>) > > Typical run: > x := MyClass2 new. > x myLoop. > > I want to type "x stopLoop" which would set the running variable to false. > > How do I do this? > > -------- > > 'From Pharo1.3a of ''18 January 2011'' [Latest update: #13144] on 21 April > 2011 at 12:59:14 pm'! > Object subclass: #MyClass2 > instanceVariableNames: 'running' > classVariableNames: '' > poolDictionaries: '' > category: 'Sandbox0419'! > > !MyClass2 methodsFor: 'as yet unclassified' stamp: 'DougEdmunds 4/21/2011 > 12:54'! > initialize > super initialize. > running := true. > Transcript clear. > Transcript show: 'try to stop the loop somehow' . > ! ! > > !MyClass2 methodsFor: 'as yet unclassified' stamp: 'DougEdmunds 4/21/2011 > 12:54'! > myLoop > > "running is an instance variable, initialized to true." > > | x up | > Transcript clear. > x := 1. > up := true. > [Transcript show: x; cr. > x>= 10 ifTrue: [up :=false]. > x<= 1 ifTrue: [up := true]. > up ifTrue: [x := x + 1] ifFalse: [x := x - 1]. > (Delay forSeconds: 1) wait. > running ifFalse: [^ x]. > ] repeat. > ! ! > > !MyClass2 methodsFor: 'as yet unclassified' stamp: 'DougEdmunds 4/21/2011 > 12:55'! > stopLoop > running := false. > ! ! > -------- > > -- > View this message in context: http://forum.world.st/How-to-break-out-of-endless-loop-using-code-tp3466747… > Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com. >

April 21, 2011

Re: [Pharo-users] ++ -- again

by Ted F.A. van Gaalen

'dnanietiM izeÃ¼rG' asSchweizerString reversed, '!' O dear, I've really stirred up++ things :o) Coincidently I, was in Helvetiae today, 110 km from where I currently live (Ravensburg) near Appenzell, had an unprepared ascend++ from Wasserau to the higher Seealpsee. So beautiful. Lungs bursting, heart pumping. but now i feel good! Get away from those screens from time to time! New for me: Looked up Helvetia in a bird's eye view. thanks. Will read more there too. How far does one go? I do like the SQL extension though. Not that I am important or so, far from it, but you can read more about me on linkedIn. I am trying to switch from many other languages/systems to Smalltalk, with the goal of finding a job where I can use it sooner better than later. I did often mainframe (PL/1, Cobol, DB2) projects with the same kind of fun as someone working on old locomotives on a historic railway. I have made my CV as a Seaside Smalltalk app, could put it in a Monticello package and would like to ask you to take a look at it and tell me how I am doing? If so: but where to place the .mcz? it contains a html tree as well. The idea is to put it on a Seaside server for everyone to see.(especially those who could employ me, as i am currently without work) There will be more than just the CV, e.g. UML diagrams and a technical description. Thanks. Won't write so much off topic next time, sorry :o) On Thu, Apr 21, 2011 at 7:19 PM, Igor Stasenko <siguctua(a)gmail.com> wrote: > On 21 April 2011 18:06, Lukas Renggli <renggli(a)gmail.com> wrote: >>> So, what is your point? >> >> To prove your (quoted) sentence wrong: "And it works only for numbers >> (no pointers >> in smalltalk) and so, completely falls out of object model." >> > > Sure it is. Unless you turn it into message send with trick which you > described above. > But then it become even worse from performance point of view, because > of use of block closure for doing simple increment. > > so, people will be punished from using > > i++ > > instead of > > i := i + 1 > > which i finding amusing :) > > > -- > Best regards, > Igor Stasenko AKA sig. > >

April 21, 2011

Re: [Pharo-users] How to break out of endless loop using code?

by Mariano Martinez Peck

On Thu, Apr 21, 2011 at 10:08 PM, DougEdmunds <dougedmunds(a)gmail.com> wrote: > I created a class that generates an endless loop. For this example, the > loop > just prints 1-10, back and forth. I'd like to stop the loop by using code, > but when it is running, I can't type anything in a workspace. The only way > I can stop it is by a manual interrupt (on XP, using Alt-<period key>) > > I have no idea how to do it. But all I know is that no matter whether you use a UI or type something manually, at the end everything is an object + message send. So..what I am saying is that you can check what the interruption keys does and do it by code or take the idea and do something similar. Check UserInterruptHandler, its users, etc... Cheers Mariano BTW if you find it, let us know > Typical run: > x := MyClass2 new. > x myLoop. > > I want to type "x stopLoop" which would set the running variable to false. > > How do I do this? > > -------- > > 'From Pharo1.3a of ''18 January 2011'' [Latest update: #13144] on 21 April > 2011 at 12:59:14 pm'! > Object subclass: #MyClass2 > instanceVariableNames: 'running' > classVariableNames: '' > poolDictionaries: '' > category: 'Sandbox0419'! > > !MyClass2 methodsFor: 'as yet unclassified' stamp: 'DougEdmunds 4/21/2011 > 12:54'! > initialize > super initialize. > running := true. > Transcript clear. > Transcript show: 'try to stop the loop somehow' . > ! ! > > !MyClass2 methodsFor: 'as yet unclassified' stamp: 'DougEdmunds 4/21/2011 > 12:54'! > myLoop > > "running is an instance variable, initialized to true." > > | x up | > Transcript clear. > x := 1. > up := true. > [Transcript show: x; cr. > x >= 10 ifTrue: [up :=false]. > x <= 1 ifTrue: [up := true]. > up ifTrue: [x := x + 1] ifFalse: [x := x - 1]. > (Delay forSeconds: 1) wait. > running ifFalse: [^ x]. > ] repeat. > ! ! > > !MyClass2 methodsFor: 'as yet unclassified' stamp: 'DougEdmunds 4/21/2011 > 12:55'! > stopLoop > running := false. > ! ! > -------- > > -- > View this message in context: > http://forum.world.st/How-to-break-out-of-endless-loop-using-code-tp3466747… > Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com. > > -- Mariano http://marianopeck.wordpress.com

April 21, 2011

Re: [Pharo-users] How to break out of endless loop using code?

by Alain_Rastoul

Hi Doug, If you run your code in a workspace with 'do-it' command, it runs in the UI smalltalk process and the only way to cancel it is the cancel key You shoud run your code in a separate process like: x := MyClass2 new [x myLoop ] forkAt: Processor systemBackgroundPriority. forkAt:... forks the block in another smalltalk process. like this you will be able to tell your x object to stop looping from your workspace (by setting a boolean in your object's member), or you could terminate it or debug it with the Process browser. HTH, Cheers Alain "DougEdmunds" <dougedmunds(a)gmail.com> a Ã©crit dans le message de news: 1303416534118-3466747.post(a)n4.nabble.com... >I created a class that generates an endless loop. For this example, the >loop > just prints 1-10, back and forth. I'd like to stop the loop by using code, > but when it is running, I can't type anything in a workspace. The only > way > I can stop it is by a manual interrupt (on XP, using Alt-<period key>) > > Typical run: > x := MyClass2 new. > x myLoop. > > I want to type "x stopLoop" which would set the running variable to false. > > How do I do this? > > -------- > > 'From Pharo1.3a of ''18 January 2011'' [Latest update: #13144] on 21 April > 2011 at 12:59:14 pm'! > Object subclass: #MyClass2 > instanceVariableNames: 'running' > classVariableNames: '' > poolDictionaries: '' > category: 'Sandbox0419'! > > !MyClass2 methodsFor: 'as yet unclassified' stamp: 'DougEdmunds 4/21/2011 > 12:54'! > initialize > super initialize. > running := true. > Transcript clear. > Transcript show: 'try to stop the loop somehow' . > ! ! > > !MyClass2 methodsFor: 'as yet unclassified' stamp: 'DougEdmunds 4/21/2011 > 12:54'! > myLoop > > "running is an instance variable, initialized to true." > > | x up | > Transcript clear. > x := 1. > up := true. > [Transcript show: x; cr. > x >= 10 ifTrue: [up :=false]. > x <= 1 ifTrue: [up := true]. > up ifTrue: [x := x + 1] ifFalse: [x := x - 1]. > (Delay forSeconds: 1) wait. > running ifFalse: [^ x]. > ] repeat. > ! ! > > !MyClass2 methodsFor: 'as yet unclassified' stamp: 'DougEdmunds 4/21/2011 > 12:55'! > stopLoop > running := false. > ! ! > -------- > > -- > View this message in context: > http://forum.world.st/How-to-break-out-of-endless-loop-using-code-tp3466747… > Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com. > >

April 21, 2011

Re: [Pharo-users] How to break out of endless loop using code?

by StÃ©phane Ducasse

using different process and having synchronisation point to communicate with it? Stef On Apr 21, 2011, at 10:08 PM, DougEdmunds wrote: > I created a class that generates an endless loop. For this example, the loop > just prints 1-10, back and forth. I'd like to stop the loop by using code, > but when it is running, I can't type anything in a workspace. The only way > I can stop it is by a manual interrupt (on XP, using Alt-<period key>) > > Typical run: > x := MyClass2 new. > x myLoop. > > I want to type "x stopLoop" which would set the running variable to false. > > How do I do this? > > -------- > > 'From Pharo1.3a of ''18 January 2011'' [Latest update: #13144] on 21 April > 2011 at 12:59:14 pm'! > Object subclass: #MyClass2 > instanceVariableNames: 'running' > classVariableNames: '' > poolDictionaries: '' > category: 'Sandbox0419'! > > !MyClass2 methodsFor: 'as yet unclassified' stamp: 'DougEdmunds 4/21/2011 > 12:54'! > initialize > super initialize. > running := true. > Transcript clear. > Transcript show: 'try to stop the loop somehow' . > ! ! > > !MyClass2 methodsFor: 'as yet unclassified' stamp: 'DougEdmunds 4/21/2011 > 12:54'! > myLoop > > "running is an instance variable, initialized to true." > > | x up | > Transcript clear. > x := 1. > up := true. > [Transcript show: x; cr. > x >= 10 ifTrue: [up :=false]. > x <= 1 ifTrue: [up := true]. > up ifTrue: [x := x + 1] ifFalse: [x := x - 1]. > (Delay forSeconds: 1) wait. > running ifFalse: [^ x]. > ] repeat. > ! ! > > !MyClass2 methodsFor: 'as yet unclassified' stamp: 'DougEdmunds 4/21/2011 > 12:55'! > stopLoop > running := false. > ! ! > -------- > > -- > View this message in context: http://forum.world.st/How-to-break-out-of-endless-loop-using-code-tp3466747… > Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com. >

April 21, 2011

How to break out of endless loop using code?

by DougEdmunds

I created a class that generates an endless loop. For this example, the loop just prints 1-10, back and forth. I'd like to stop the loop by using code, but when it is running, I can't type anything in a workspace. The only way I can stop it is by a manual interrupt (on XP, using Alt-<period key>) Typical run: x := MyClass2 new. x myLoop. I want to type "x stopLoop" which would set the running variable to false. How do I do this? -------- 'From Pharo1.3a of ''18 January 2011'' [Latest update: #13144] on 21 April 2011 at 12:59:14 pm'! Object subclass: #MyClass2 instanceVariableNames: 'running' classVariableNames: '' poolDictionaries: '' category: 'Sandbox0419'! !MyClass2 methodsFor: 'as yet unclassified' stamp: 'DougEdmunds 4/21/2011 12:54'! initialize super initialize. running := true. Transcript clear. Transcript show: 'try to stop the loop somehow' . ! ! !MyClass2 methodsFor: 'as yet unclassified' stamp: 'DougEdmunds 4/21/2011 12:54'! myLoop "running is an instance variable, initialized to true." | x up | Transcript clear. x := 1. up := true. [Transcript show: x; cr. x >= 10 ifTrue: [up :=false]. x <= 1 ifTrue: [up := true]. up ifTrue: [x := x + 1] ifFalse: [x := x - 1]. (Delay forSeconds: 1) wait. running ifFalse: [^ x]. ] repeat. ! ! !MyClass2 methodsFor: 'as yet unclassified' stamp: 'DougEdmunds 4/21/2011 12:55'! stopLoop running := false. ! ! -------- -- View this message in context: http://forum.world.st/How-to-break-out-of-endless-loop-using-code-tp3466747… Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.

April 21, 2011

[COTDC] 53 - AnimatedGIFReadWriter

by laurent laffont

Today: AnimatedGIFReadWriter Comment Of The Day Contest - One Day One Comment Rules: #1: Each day a not commented class is elected. Each day the best comment will be integrated with name of the author(s). #2: If you cannot comment it, deprecate it. Results: http://code.google.com/p/pharo/wiki/CommentOfTheDayContest Laurent Laffont - @lolgzs <http://twitter.com/#!/lolgzs> Pharo Smalltalk Screencasts: http://www.pharocasts.com/ Blog: http://magaloma.blogspot.com/ Developer group: http://cara74.seasidehosting.st

April 21, 2011

Re: [Pharo-users] [Pharo-project] [COTDC] 52 - PCXReadWriter

by laurent laffont

http://code.google.com/p/pharo/issues/detail?id=4072 Thanks Guillermo. Laurent. On Thu, Apr 21, 2011 at 10:40 AM, StÃ©phane Ducasse < stephane.ducasse(a)inria.fr> wrote: > open a bug entry and put your fix :) > > Stef > > On Apr 21, 2011, at 1:05 AM, Guillermo Polito wrote: > > > I am an Image ReadWriter supposed to be in charge of PCX file encoding > and decoding. > > > > Actually, as my instances does not implement understandsImageFormat, they > use the default ^false implementation and I cannot be used. > > I don't have uses in the image also :). > > > > But in case I am fixed, the code to open a morph with a pcx image is: > > > > PCXReadWriter formFromFileNamed: 'anImage.pcx'. > > > > > > ;) > > Guille > > > > On Wed, Apr 20, 2011 at 3:17 PM, laurent laffont < > laurent.laffont(a)gmail.com> wrote: > > Today: PCXReadWriter > > > > > > Comment Of The Day Contest - One Day One Comment > > Rules: > > #1: Each day a not commented class is elected. Each day the best comment > will be integrated with name of the author(s). > > #2: If you cannot comment it, deprecate it. > > Results: http://code.google.com/p/pharo/wiki/CommentOfTheDayContest > > > > Laurent > > > > >

April 21, 2011

Re: [Pharo-users] ++ -- again

by Igor Stasenko

On 21 April 2011 18:06, Lukas Renggli <renggli(a)gmail.com> wrote: >> So, what is your point? > > To prove your (quoted) sentence wrong: "And it works only for numbers > (no pointers > in smalltalk) and so, completely falls out of object model." > Sure it is. Unless you turn it into message send with trick which you described above. But then it become even worse from performance point of view, because of use of block closure for doing simple increment. so, people will be punished from using i++ instead of i := i + 1 which i finding amusing :) -- Best regards, Igor Stasenko AKA sig.

April 21, 2011