July 2012 - Pharo-users - lists.pharo.org

Pharo 1.4 "Summer" released!

by Esteban Lorenzano

We are proud to announce the summer release of Pharo 1.4! You can find information about Pharo at: http://www.pharo-project.org About this release. We integrated 30 fixes (the rounded number is completely casual) and integrated some tools that users feedback showed as necessary, specially the inclusion of OmniBrowser as part of the core for 1.4. As a result of all this changes and fixes, the stability of this version is a lot better and we are really happy with it. Structural changes to the image: - Backport configurations browser from 2.0. This will easy the loading of packages for everybody, specially newcomers. - Integrated ProfStef. Again, useful for newcomers. - Integrated Spotlight. Easy to find classes and methods. - Integrated OmniBrowser. Nautilus will wait to 2.0 to be core, but it is still loadable. - Integrated Keymapping. This is in fact a sub-product of the inclusion of Spotlight, but the framework is powerful and it deserves its inclusion too :) - Updated Zinc to latest version. Complete list of bugs fixed: - 5665: bug on new ecompletion/ocompletion, http://code.google.com/p/pharo/issues/detail?id=5665 - 5773: Have access to the original event in PLuggableButtonMorph, http://code.google.com/p/pharo/issues/detail?id=5773 - 5584: File Browser not recognizing cs and st if filename has more than one point, http://code.google.com/p/pharo/issues/detail?id=5584 - 5667: Renaming a file just deletes it due to missing #fileNameFromFormattedItem:, http://code.google.com/p/pharo/issues/detail?id=5667 - 5445: Broken command-line arguments in 1.4, http://code.google.com/p/pharo/issues/detail?id=5445 - 5679: Removing a trait does not remove trait methods from class, http://code.google.com/p/pharo/issues/detail?id=5679 - 5722: Be able to remove traits from class definition, http://code.google.com/p/pharo/issues/detail?id=5722 - 5858: DateAndTime >>#hash, http://code.google.com/p/pharo/issues/detail?id=5858 - 5833: More robust allSuperclassesIncluding:, http://code.google.com/p/pharo/issues/detail?id=5833 - 5966: DropListMorph do not pop the list when the text field is clicked, http://code.google.com/p/pharo/issues/detail?id=5966 - 5627: "MessageNotUnderstood: receiver of "displayWorld" is nil" on clicking the red Menu-Halo., http://code.google.com/p/pharo/issues/detail?id=5627 - 5742: BallonMorph shows flyover help using an extra line, http://code.google.com/p/pharo/issues/detail?id=5742 - 6150: During snapshot: Send cr after Transcript message for 1.4, http://code.google.com/p/pharo/issues/detail?id=6150 - 6147: Code completion in all tools for 1.4, http://code.google.com/p/pharo/issues/detail?id=6147 - 6189: [BUG]: Port to Pharo 1.4 - stdin hangs until EOF, http://code.google.com/p/pharo/issues/detail?id=6189 - 6143: MIME decoding and Unicode not working, http://code.google.com/p/pharo/issues/detail?id=6143 - 6188: [BUG]: (1.4) Put back the correct order in #asert:equals:, http://code.google.com/p/pharo/issues/detail?id=6188 - 6187: [Bug]: (1.4) Mouse down events are being processed twice, http://code.google.com/p/pharo/issues/detail?id=6187 - 6117: SimplifiedChineseEnvironment should implement leadingChar, http://code.google.com/p/pharo/issues/detail?id=6117 - 6082: Missed translated selector for the dialog title in the ColorChooserMorph, http://code.google.com/p/pharo/issues/detail?id=6082 - 6231: FileList revert, http://code.google.com/p/pharo/issues/detail?id=6231 - 6303: [BUG]: Completion DNU in Inspector/Object Explorer for 1.4, http://code.google.com/p/pharo/issues/detail?id=6303 - 6305: StartupPreferences "run once" broken, http://code.google.com/p/pharo/issues/detail?id=6305 - 6324: For Pharo 1.4 disable StartupPreferences only for Windows, http://code.google.com/p/pharo/issues/detail?id=6324 - 6313: failing test: MorphicTests.Event.EventHandlerTest.testKeyStrokeFromMorph, http://code.google.com/p/pharo/issues/detail?id=6313 - 6352: StartupPreferences loads non-st files in 1.4, http://code.google.com/p/pharo/issues/detail?id=6352, , - 6373: Add #version to OSPlatform, http://code.google.com/p/pharo/issues/detail?id=6373 - 6366: [Bug]: In 1.4, Finder UI DNU guessTypeByName:, http://code.google.com/p/pharo/issues/detail?id=6366 - 6343: move Windows on screen should take in account the task bar, http://code.google.com/p/pharo/issues/detail?id=6343 - 6386: [BUG]: [1.4]: New ProcessSpecificVariables & Running Processes, http://code.google.com/p/pharo/issues/detail?id=6386 Not bad, isn't? Thanks a lot to all who contributed with fixes, reports and suggestions. The Pharo Team

July 18, 2012

Re: [Pharo-users] The opposite of encodeForHTTP

by Esteban Lorenzano

I wonder why you were lost, with such a clear method name... ;) On Jul 18, 2012, at 2:02 PM, Davide Varvello wrote: > Thanks Sven, > I was looking for String>>decode..whatever... with no luck :-) > Cheers > > -- > View this message in context: http://forum.world.st/The-opposite-of-encodeForHTTP-tp4640491p4640510.html > Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com. >

July 18, 2012

Re: [Pharo-users] The opposite of encodeForHTTP

by Davide Varvello

Thanks Sven, I was looking for String>>decode..whatever... with no luck :-) Cheers -- View this message in context: http://forum.world.st/The-opposite-of-encodeForHTTP-tp4640491p4640510.html Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.

July 18, 2012

Re: [Pharo-users] WaveFront File importer on Pharo

by Javier PimÃ¡s

Wow! this is cool! On Wed, Jul 18, 2012 at 8:35 AM, Jean Baptiste Arnaud < jbaptiste.arnaud(a)gmail.com> wrote: > I have transparency now and i beginning texturing. > I just need to check the rule for drawing to be more accurate with .obj > model (basically change to parameter and take the best result). > I need to parse and to rewrite all the path for texture it did not find > (every texture in fact, blender export in a really strange way). > And in addition there are plenty of different kind of texture and I need > to learn OpenGL. :-) > i already success to texturing the vador starship. I need to generalise > process now. > > > > On Jul 18, 2012, at 7:37 AM, Tudor Girba wrote: > > Very nice! > > Doru > > > On 17 Jul 2012, at 14:21, Jean Baptiste Arnaud wrote: > > Hi, > > Under the pressure of Camillo i publish the code. > > I beginning to do a Wavefront (human readable standard for 3d Obj Model ) > importer on Pharo. > > > So i made a importer. > > Not all the case are manage, only the case I need to import the current > Obj model. > > > And a drawer which is in Alpha version. > > face and normal vector are manage. > > Missing color (in progress), and texturing. > > > You need .obj file and all the .mtl related (open you blender and make it > nice). > > > If you are not running on Mac os comment this code in > GLWorldTest>>#render, the > > > display makeCurrent. > > > else if you running on mac os implement it in > > NBMSAAOffscreenDisplay>>#makeCurrent > > ^driver makeCurrent. > > > My code can be find on JBARepo on squeaksource > > ObjModel Package but you need NBOpenGL (i do a configuration in same place > i just need to be motivated for keep it up to date). > > > So > > put on same folder of the .image your .obj and .mtl file (i am lazy) > (maybe it is VM folder i do not know). > > open a workspace and do > > > "s := ObjImporter importFrom: 'xwing-map.obj'. > > s parse. > > object := s objects. > > > w := GLWorldTest new. > > object do: [:e | w addElement: e]. > > w openInWorld." > > > 3d result with normal > > <Screen Shot 2012-07-17 at 1.59.22 PM.png> > > > > With normal and color but not texture : > > > <Screen Shot 2012-07-17 at 1.58.18 PM.png> > > > Enjoy > > > > > > Best Regards > > Jean Baptiste Arnaud > > jbaptiste.arnaud(a)gmail.com > > > > > > > > > > -- > www.tudorgirba.com > > "To utilize feedback, you first have to acquire it." > > > > Best Regards > Jean Baptiste Arnaud > jbaptiste.arnaud(a)gmail.com > > > > > > > > -- Lic. Javier PimÃ¡s Ciudad de Buenos Aires

July 18, 2012

Re: [Pharo-users] WaveFront File importer on Pharo

by Jean Baptiste Arnaud

I have transparency now and i beginning texturing. I just need to check the rule for drawing to be more accurate with .obj model (basically change to parameter and take the best result). I need to parse and to rewrite all the path for texture it did not find (every texture in fact, blender export in a really strange way). And in addition there are plenty of different kind of texture and I need to learn OpenGL. :-) i already success to texturing the vador starship. I need to generalise process now. On Jul 18, 2012, at 7:37 AM, Tudor Girba wrote: > Very nice! > > Doru > > > On 17 Jul 2012, at 14:21, Jean Baptiste Arnaud wrote: > >> Hi, >> Under the pressure of Camillo i publish the code. >> I beginning to do a Wavefront (human readable standard for 3d Obj Model ) importer on Pharo. >> >> So i made a importer. >> Not all the case are manage, only the case I need to import the current Obj model. >> >> And a drawer which is in Alpha version. >> face and normal vector are manage. >> Missing color (in progress), and texturing. >> >> You need .obj file and all the .mtl related (open you blender and make it nice). >> >> If you are not running on Mac os comment this code in GLWorldTest>>#render, the >> >> display makeCurrent. >> >> else if you running on mac os implement it in >> NBMSAAOffscreenDisplay>>#makeCurrent >> ^driver makeCurrent. >> >> My code can be find on JBARepo on squeaksource >> ObjModel Package but you need NBOpenGL (i do a configuration in same place i just need to be motivated for keep it up to date). >> >> So >> put on same folder of the .image your .obj and .mtl file (i am lazy) (maybe it is VM folder i do not know). >> open a workspace and do >> >> "s := ObjImporter importFrom: 'xwing-map.obj'. >> s parse. >> object := s objects. >> >> w := GLWorldTest new. >> object do: [:e | w addElement: e]. >> w openInWorld." >> >> 3d result with normal >> <Screen Shot 2012-07-17 at 1.59.22 PM.png> >> >> >> With normal and color but not texture : >> >> <Screen Shot 2012-07-17 at 1.58.18 PM.png> >> >> Enjoy >> >> >> >> >> Best Regards >> Jean Baptiste Arnaud >> jbaptiste.arnaud(a)gmail.com >> >> >> >> >> >> >> > > -- > www.tudorgirba.com > > "To utilize feedback, you first have to acquire it." > > Best Regards Jean Baptiste Arnaud jbaptiste.arnaud(a)gmail.com

July 18, 2012

Re: [Pharo-users] The opposite of encodeForHTTP

by Sven Van Caekenberghe

String>>#unescapePercents On 18 Jul 2012, at 12:42, Davide Varvello wrote: > Hi there, > Does exist the opposite method of String>>encodeForHTTP somewhere? > TIA > Davide > > -- > View this message in context: http://forum.world.st/The-opposite-of-encodeForHTTP-tp4640491.html > Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com. >

July 18, 2012

The opposite of encodeForHTTP

by Davide Varvello

Hi there, Does exist the opposite method of String>>encodeForHTTP somewhere? TIA Davide -- View this message in context: http://forum.world.st/The-opposite-of-encodeForHTTP-tp4640491.html Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.

July 18, 2012

Re: [Pharo-users] Smalltalk Quine

by Sven Van Caekenberghe

On 18 Jul 2012, at 09:24, Bernat Romagosa wrote: > Cool one! A much shorter "famous" quine in Smalltalk is: > > [ :s | Transcript show: s; show: s printString ] value: '[ :s | Transcript show: s; show: s printString ] value: ' Aah, that one is so much better, really. I suspected there would be other, but I never saw them. Thanks! > 2012/7/17 Sven Van Caekenberghe <sven(a)beta9.be> > Now that I actually read the Wikipedia article, I made the code smaller and more elegant ;-) > > String streamContents: [ :stream | | lines | > lines := #( > 'String streamContents: [ :stream | | lines |' > ' lines := #(' > ' ).' > ' (lines first: 2) do: [ :each | stream << each; cr ].' > ' lines do: [ :each | stream tab: 2; print: each; cr ].' > ' (lines allButFirst: 2) do: [ :each | stream << each; cr ].' > ' stream nextPut: $]; cr.' > ). > (lines first: 2) do: [ :each | stream << each; cr ]. > lines do: [ :each | stream tab: 2; print: each; cr ]. > (lines allButFirst: 2) do: [ :each | stream << each; cr ]. > stream nextPut: $]; cr. > ] > > On 17 Jul 2012, at 19:03, Sven Van Caekenberghe wrote: > > > By accident I visited the following website today > > > > http://igoro.com/archive/how-to-write-a-self-printing-program/ > > > > It is about writing a self-printing program, also known as a quine > > > > http://en.wikipedia.org/wiki/Quine_(computing) > > > > This has probably been done before, but I had to try to do it in Pharo Smalltalk. > > Paste the following in a Workspace and either print or inspect it. > > > > String streamContents: [ :stream | | lines | > > lines := #( > > 'String streamContents: [ :stream | | lines |' > > ' lines := #(' > > ' ).' > > ' stream' > > ' << ''String streamContents: [ :stream | | lines |''; cr;' > > ' tab; << ''lines := #(''; cr.' > > ' lines do: [ :each | stream tab; tab; print: each; cr ].' > > ' stream tab; << '').''; cr.' > > ' (lines allButFirst: 3) do: [ :each | stream tab; << each; cr ].' > > ' stream tab; << '']''; cr.' > > ). > > stream > > << 'String streamContents: [ :stream | | lines |'; cr; > > tab; << 'lines := #('; cr. > > lines do: [ :each | stream tab; tab; print: each; cr ]. > > stream tab; << ').'; cr. > > (lines allButFirst: 3) do: [ :each | stream tab; << each; cr ]. > > stream tab; << ']'; cr. > > ] > > > > The result _is_ the same, but it is a bit hard to see because String>>#printString renders the printed representation (doubling quotes). To check you can inspect the string and print it on the transcript (after opening it) > > > > Transcript show: self > > > > or you can ask the compiler for help > > > > Compiler evaluate: self readStream > > > > if you inspect the result of the above expression, you can keep on doing this forever. > > > > It is also pretty easy to extend the example with your own code. > > > > String streamContents: [ :stream | | lines | > > lines := #( > > 'String streamContents: [ :stream | | lines |' > > ' lines := #(' > > ' ).' > > ' stream' > > ' << ''String streamContents: [ :stream | | lines |''; cr;' > > ' tab; << ''lines := #(''; cr.' > > ' lines do: [ :each | stream tab; tab; print: each; cr ].' > > ' stream tab; << '').''; cr.' > > ' (lines allButFirst: 3) do: [ :each | stream tab; << each; cr ].' > > ' stream tab; << '']''; cr.' > > ' self inform: ''Cool, no ?''' > > ). > > stream > > << 'String streamContents: [ :stream | | lines |'; cr; > > tab; << 'lines := #('; cr. > > lines do: [ :each | stream tab; tab; print: each; cr ]. > > stream tab; << ').'; cr. > > (lines allButFirst: 3) do: [ :each | stream tab; << each; cr ]. > > stream tab; << ']'; cr. > > self inform: 'Cool, no ?' > > ] > > > > Just add the extra code twice. > > > > Enjoy! > > > > Sven > > > > > > -- > > Sven Van Caekenberghe > > http://stfx.eu > > Smalltalk is the Red Pill > > > > > > > > > > > > > > > > -- > Bernat Romagosa.

July 18, 2012

Re: [Pharo-users] Smalltalk Quine

by Bernat Romagosa

Cool one! A much shorter "famous" quine in Smalltalk is: [ :s | Transcript show: s; show: s printString ] value: '[ :s | Transcript show: s; show: s printString ] value: ' Cheers, 2012/7/17 Sven Van Caekenberghe <sven(a)beta9.be> > Now that I actually read the Wikipedia article, I made the code smaller > and more elegant ;-) > > String streamContents: [ :stream | | lines | > lines := #( > 'String streamContents: [ :stream | | lines |' > ' lines := #(' > ' ).' > ' (lines first: 2) do: [ :each | stream << each; cr > ].' > ' lines do: [ :each | stream tab: 2; print: each; cr > ].' > ' (lines allButFirst: 2) do: [ :each | stream << > each; cr ].' > ' stream nextPut: $]; cr.' > ). > (lines first: 2) do: [ :each | stream << each; cr ]. > lines do: [ :each | stream tab: 2; print: each; cr ]. > (lines allButFirst: 2) do: [ :each | stream << each; cr ]. > stream nextPut: $]; cr. > ] > > On 17 Jul 2012, at 19:03, Sven Van Caekenberghe wrote: > > > By accident I visited the following website today > > > > http://igoro.com/archive/how-to-write-a-self-printing-program/ > > > > It is about writing a self-printing program, also known as a quine > > > > http://en.wikipedia.org/wiki/Quine_(computing) > > > > This has probably been done before, but I had to try to do it in Pharo > Smalltalk. > > Paste the following in a Workspace and either print or inspect it. > > > > String streamContents: [ :stream | | lines | > > lines := #( > > 'String streamContents: [ :stream | | lines |' > > ' lines := #(' > > ' ).' > > ' stream' > > ' << ''String streamContents: [ :stream | | > lines |''; cr;' > > ' tab; << ''lines := #(''; cr.' > > ' lines do: [ :each | stream tab; tab; print: each; > cr ].' > > ' stream tab; << '').''; cr.' > > ' (lines allButFirst: 3) do: [ :each | stream tab; > << each; cr ].' > > ' stream tab; << '']''; cr.' > > ). > > stream > > << 'String streamContents: [ :stream | | lines |'; cr; > > tab; << 'lines := #('; cr. > > lines do: [ :each | stream tab; tab; print: each; cr ]. > > stream tab; << ').'; cr. > > (lines allButFirst: 3) do: [ :each | stream tab; << each; cr ]. > > stream tab; << ']'; cr. > > ] > > > > The result _is_ the same, but it is a bit hard to see because > String>>#printString renders the printed representation (doubling quotes). > To check you can inspect the string and print it on the transcript (after > opening it) > > > > Transcript show: self > > > > or you can ask the compiler for help > > > > Compiler evaluate: self readStream > > > > if you inspect the result of the above expression, you can keep on doing > this forever. > > > > It is also pretty easy to extend the example with your own code. > > > > String streamContents: [ :stream | | lines | > > lines := #( > > 'String streamContents: [ :stream | | lines |' > > ' lines := #(' > > ' ).' > > ' stream' > > ' << ''String streamContents: [ :stream | | > lines |''; cr;' > > ' tab; << ''lines := #(''; cr.' > > ' lines do: [ :each | stream tab; tab; print: each; > cr ].' > > ' stream tab; << '').''; cr.' > > ' (lines allButFirst: 3) do: [ :each | stream tab; > << each; cr ].' > > ' stream tab; << '']''; cr.' > > ' self inform: ''Cool, no ?''' > > ). > > stream > > << 'String streamContents: [ :stream | | lines |'; cr; > > tab; << 'lines := #('; cr. > > lines do: [ :each | stream tab; tab; print: each; cr ]. > > stream tab; << ').'; cr. > > (lines allButFirst: 3) do: [ :each | stream tab; << each; cr ]. > > stream tab; << ']'; cr. > > self inform: 'Cool, no ?' > > ] > > > > Just add the extra code twice. > > > > Enjoy! > > > > Sven > > > > > > -- > > Sven Van Caekenberghe > > http://stfx.eu > > Smalltalk is the Red Pill > > > > > > > > > > > > > -- Bernat Romagosa.

July 18, 2012

Re: [Pharo-users] WaveFront File importer on Pharo

by Tudor Girba

Very nice! Doru On 17 Jul 2012, at 14:21, Jean Baptiste Arnaud wrote: > Hi, > Under the pressure of Camillo i publish the code. > I beginning to do a Wavefront (human readable standard for 3d Obj Model ) importer on Pharo. > > So i made a importer. > Not all the case are manage, only the case I need to import the current Obj model. > > And a drawer which is in Alpha version. > face and normal vector are manage. > Missing color (in progress), and texturing. > > You need .obj file and all the .mtl related (open you blender and make it nice). > > If you are not running on Mac os comment this code in GLWorldTest>>#render, the > > display makeCurrent. > > else if you running on mac os implement it in > NBMSAAOffscreenDisplay>>#makeCurrent > ^driver makeCurrent. > > My code can be find on JBARepo on squeaksource > ObjModel Package but you need NBOpenGL (i do a configuration in same place i just need to be motivated for keep it up to date). > > So > put on same folder of the .image your .obj and .mtl file (i am lazy) (maybe it is VM folder i do not know). > open a workspace and do > > "s := ObjImporter importFrom: 'xwing-map.obj'. > s parse. > object := s objects. > > w := GLWorldTest new. > object do: [:e | w addElement: e]. > w openInWorld." > > 3d result with normal > <Screen Shot 2012-07-17 at 1.59.22 PM.png> > > > With normal and color but not texture : > > <Screen Shot 2012-07-17 at 1.58.18 PM.png> > > Enjoy > > > > > Best Regards > Jean Baptiste Arnaud > jbaptiste.arnaud(a)gmail.com > > > > > > > -- www.tudorgirba.com "To utilize feedback, you first have to acquire it."

July 18, 2012

Re: [Pharo-users] WaveFront File importer on Pharo

by StÃ©phane Ducasse

On Jul 17, 2012, at 2:21 PM, Jean Baptiste Arnaud wrote: > Hi, > Under the pressure of Camillo i publish the code. Thanks camillo :) > I beginning to do a Wavefront (human readable standard for 3d Obj Model ) importer on Pharo. > > So i made a importer. > Not all the case are manage, only the case I need to import the current Obj model. you relax from PhD writing :). > > And a drawer which is in Alpha version. > face and normal vector are manage. > Missing color (in progress), and texturing. > > You need .obj file and all the .mtl related (open you blender and make it nice). > > If you are not running on Mac os comment this code in GLWorldTest>>#render, the > > display makeCurrent. > > else if you running on mac os implement it in > NBMSAAOffscreenDisplay>>#makeCurrent > ^driver makeCurrent. > > My code can be find on JBARepo on squeaksource > ObjModel Package but you need NBOpenGL (i do a configuration in same place i just need to be motivated for keep it up to date). Keep it up to date. > > So > put on same folder of the .image your .obj and .mtl file (i am lazy) (maybe it is VM folder i do not know). > open a workspace and do > > "s := ObjImporter importFrom: 'xwing-map.obj'. > s parse. > object := s objects. > > w := GLWorldTest new. > object do: [:e | w addElement: e]. > w openInWorld." > > 3d result with normal > <Screen Shot 2012-07-17 at 1.59.22 PM.png> > > > With normal and color but not texture : > > <Screen Shot 2012-07-17 at 1.58.18 PM.png> > > Enjoy > > > > > Best Regards > Jean Baptiste Arnaud > jbaptiste.arnaud(a)gmail.com > > > > > > >

July 18, 2012

Re: [Pharo-users] Smalltalk Quine

by Sven Van Caekenberghe

Now that I actually read the Wikipedia article, I made the code smaller and more elegant ;-) String streamContents: [ :stream | | lines | lines := #( 'String streamContents: [ :stream | | lines |' ' lines := #(' ' ).' ' (lines first: 2) do: [ :each | stream << each; cr ].' ' lines do: [ :each | stream tab: 2; print: each; cr ].' ' (lines allButFirst: 2) do: [ :each | stream << each; cr ].' ' stream nextPut: $]; cr.' ). (lines first: 2) do: [ :each | stream << each; cr ]. lines do: [ :each | stream tab: 2; print: each; cr ]. (lines allButFirst: 2) do: [ :each | stream << each; cr ]. stream nextPut: $]; cr. ] On 17 Jul 2012, at 19:03, Sven Van Caekenberghe wrote: > By accident I visited the following website today > > http://igoro.com/archive/how-to-write-a-self-printing-program/ > > It is about writing a self-printing program, also known as a quine > > http://en.wikipedia.org/wiki/Quine_(computing) > > This has probably been done before, but I had to try to do it in Pharo Smalltalk. > Paste the following in a Workspace and either print or inspect it. > > String streamContents: [ :stream | | lines | > lines := #( > 'String streamContents: [ :stream | | lines |' > ' lines := #(' > ' ).' > ' stream' > ' << ''String streamContents: [ :stream | | lines |''; cr;' > ' tab; << ''lines := #(''; cr.' > ' lines do: [ :each | stream tab; tab; print: each; cr ].' > ' stream tab; << '').''; cr.' > ' (lines allButFirst: 3) do: [ :each | stream tab; << each; cr ].' > ' stream tab; << '']''; cr.' > ). > stream > << 'String streamContents: [ :stream | | lines |'; cr; > tab; << 'lines := #('; cr. > lines do: [ :each | stream tab; tab; print: each; cr ]. > stream tab; << ').'; cr. > (lines allButFirst: 3) do: [ :each | stream tab; << each; cr ]. > stream tab; << ']'; cr. > ] > > The result _is_ the same, but it is a bit hard to see because String>>#printString renders the printed representation (doubling quotes). To check you can inspect the string and print it on the transcript (after opening it) > > Transcript show: self > > or you can ask the compiler for help > > Compiler evaluate: self readStream > > if you inspect the result of the above expression, you can keep on doing this forever. > > It is also pretty easy to extend the example with your own code. > > String streamContents: [ :stream | | lines | > lines := #( > 'String streamContents: [ :stream | | lines |' > ' lines := #(' > ' ).' > ' stream' > ' << ''String streamContents: [ :stream | | lines |''; cr;' > ' tab; << ''lines := #(''; cr.' > ' lines do: [ :each | stream tab; tab; print: each; cr ].' > ' stream tab; << '').''; cr.' > ' (lines allButFirst: 3) do: [ :each | stream tab; << each; cr ].' > ' stream tab; << '']''; cr.' > ' self inform: ''Cool, no ?''' > ). > stream > << 'String streamContents: [ :stream | | lines |'; cr; > tab; << 'lines := #('; cr. > lines do: [ :each | stream tab; tab; print: each; cr ]. > stream tab; << ').'; cr. > (lines allButFirst: 3) do: [ :each | stream tab; << each; cr ]. > stream tab; << ']'; cr. > self inform: 'Cool, no ?' > ] > > Just add the extra code twice. > > Enjoy! > > Sven > > > -- > Sven Van Caekenberghe > http://stfx.eu > Smalltalk is the Red Pill > > > > >

July 17, 2012

Smalltalk Quine

by Sven Van Caekenberghe

By accident I visited the following website today http://igoro.com/archive/how-to-write-a-self-printing-program/ It is about writing a self-printing program, also known as a quine http://en.wikipedia.org/wiki/Quine_(computing) This has probably been done before, but I had to try to do it in Pharo Smalltalk. Paste the following in a Workspace and either print or inspect it. String streamContents: [ :stream | | lines | lines := #( 'String streamContents: [ :stream | | lines |' ' lines := #(' ' ).' ' stream' ' << ''String streamContents: [ :stream | | lines |''; cr;' ' tab; << ''lines := #(''; cr.' ' lines do: [ :each | stream tab; tab; print: each; cr ].' ' stream tab; << '').''; cr.' ' (lines allButFirst: 3) do: [ :each | stream tab; << each; cr ].' ' stream tab; << '']''; cr.' ). stream << 'String streamContents: [ :stream | | lines |'; cr; tab; << 'lines := #('; cr. lines do: [ :each | stream tab; tab; print: each; cr ]. stream tab; << ').'; cr. (lines allButFirst: 3) do: [ :each | stream tab; << each; cr ]. stream tab; << ']'; cr. ] The result _is_ the same, but it is a bit hard to see because String>>#printString renders the printed representation (doubling quotes). To check you can inspect the string and print it on the transcript (after opening it) Transcript show: self or you can ask the compiler for help Compiler evaluate: self readStream if you inspect the result of the above expression, you can keep on doing this forever. It is also pretty easy to extend the example with your own code. String streamContents: [ :stream | | lines | lines := #( 'String streamContents: [ :stream | | lines |' ' lines := #(' ' ).' ' stream' ' << ''String streamContents: [ :stream | | lines |''; cr;' ' tab; << ''lines := #(''; cr.' ' lines do: [ :each | stream tab; tab; print: each; cr ].' ' stream tab; << '').''; cr.' ' (lines allButFirst: 3) do: [ :each | stream tab; << each; cr ].' ' stream tab; << '']''; cr.' ' self inform: ''Cool, no ?''' ). stream << 'String streamContents: [ :stream | | lines |'; cr; tab; << 'lines := #('; cr. lines do: [ :each | stream tab; tab; print: each; cr ]. stream tab; << ').'; cr. (lines allButFirst: 3) do: [ :each | stream tab; << each; cr ]. stream tab; << ']'; cr. self inform: 'Cool, no ?' ] Just add the extra code twice. Enjoy! Sven -- Sven Van Caekenberghe http://stfx.eu Smalltalk is the Red Pill

July 17, 2012

WaveFront File importer on Pharo

by Jean Baptiste Arnaud

Hi, Under the pressure of Camillo i publish the code. I beginning to do a Wavefront (human readable standard for 3d Obj Model ) importer on Pharo. So i made a importer. Not all the case are manage, only the case I need to import the current Obj model. And a drawer which is in Alpha version. face and normal vector are manage. Missing color (in progress), and texturing. You need .obj file and all the .mtl related (open you blender and make it nice). If you are not running on Mac os comment this code in GLWorldTest>>#render, the display makeCurrent. else if you running on mac os implement it in NBMSAAOffscreenDisplay>>#makeCurrent ^driver makeCurrent. My code can be find on JBARepo on squeaksource ObjModel Package but you need NBOpenGL (i do a configuration in same place i just need to be motivated for keep it up to date). So put on same folder of the .image your .obj and .mtl file (i am lazy) (maybe it is VM folder i do not know). open a workspace and do "s := ObjImporter importFrom: 'xwing-map.obj'. s parse. object := s objects. w := GLWorldTest new. object do: [:e | w addElement: e]. w openInWorld." 3d result with normal With normal and color but not texture : Enjoy Best Regards Jean Baptiste Arnaud jbaptiste.arnaud(a)gmail.com

July 17, 2012

Re: [Pharo-users] Seaside - Is it worth my time investment or is it already dead...

by Dale Henrichs

Nelson, Seaside has not been abandoned. If the Seaside model of web development is appealing to you[1], then it is worth spending the time learning it... Dale [1] http://book.seaside.st/book/introduction/what-is-seaside ----- Original Message ----- | From: "Nelson Pingitore" <pingitorenelson(a)gmail.com> | To: pharo-users(a)lists.gforge.inria.fr | Sent: Friday, July 13, 2012 6:44:57 PM | Subject: [Pharo-users] Seaside - Is it worth my time investment or is it already dead... | | Is learning Seaside worth my time and effort or has it been abandoned | already? I did not see much change happening at the Seaside web home | page.

July 14, 2012

Re: [Pharo-users] [ANN]: IconBrowser (toy)

by Sean P. DeNigris

philippeback wrote > > Works better like this... > Thanks, Philippe! -- View this message in context: http://forum.world.st/ANN-IconBrowser-toy-tp4639955p4640007.html Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.

July 14, 2012

Re: [Pharo-users] Seaside - Is it worth my time investment or is it already dead...

by Damien Cassou

On Sat, Jul 14, 2012 at 3:44 AM, Nelson Pingitore <pingitorenelson(a)gmail.com> wrote: > Is learning Seaside worth my time and effort or has it been abandoned > already? I did not see much change happening at the Seaside web home page. I see recent commits in http://www.squeaksource.com/Seaside31/ but you might better ask on Seaside mailing list <seaside(a)lists.squeakfoundation.org> -- Damien Cassou http://damiencassou.seasidehosting.st "Lambdas are relegated to relative obscurity until Java makes them popular by not having them." James Iry

July 14, 2012

Re: [Pharo-users] [ANN]: IconBrowser (toy)

by phil＠highoctane.be

Works better like this: "Load Spec if needed" Gofer new url: 'http://ss3.gemstone.com/ss/Spec'; package: 'ConfigurationOfSpec'; load. (ConfigurationOfSpec project version: #stable) load. Gofer it squeaksource3: 'SpdPlayground'; package: 'IconBrowser'; load. 2012/7/14 Mariano Martinez Peck <marianopeck(a)gmail.com> > Excellent. Sean, can you see all those methods (icons) that DO NOT have > senders? because I guess there are A LOT that I haven't seen since a > loooong time ;) > > > On Sat, Jul 14, 2012 at 6:03 AM, Sean P. DeNigris <sean(a)clipperadams.com>wrote: > >> To play with spec, and also because I needed it, I made a little browser >> that >> lists all the icons for the current UITheme and the name (the getter >> unCamelCased) >> >> "Load Spec if needed" >> Gofer new >> url: 'http://ss3.gemstone.com/ss/Spec'; >> package: 'ConfigurationOfSpec'; >> load. >> >> Gofer it >> squeaksource3: 'SpdPlayground'; >> package: 'IconBrowser'; >> load. >> >> You can open it via the world menu under "Tools" >> >> Here (on Nabble) is a screenshot: >> >> http://forum.world.st/file/n4639955/Screen_Shot_2012-07-14_at_12.01.44_AM.p… >> >> Cheers, >> Sean >> >> -- >> View this message in context: >> http://forum.world.st/ANN-IconBrowser-toy-tp4639955.html >> Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com. >> >> > > > -- > Mariano > http://marianopeck.wordpress.com > > -- Philippe Back Dramatic Performance Improvements Mob: +32(0) 478 650 140 | Fax: +32 (0) 70 408 027 Mail: phil(a)highoctane.be| Web: http://philippeback.eu | Blog: http://philippeback.be High Octane SPRL rue cour Boisacq 101 1301 Bierges Belgium

July 14, 2012

Re: [Pharo-users] [ANN]: IconBrowser (toy)

by phil＠highoctane.be

Loaded it in my 1.4 Got: This package depends on the following classes: ComposableModel You must resolve these dependencies before you will be able to load these definitions: IconBrowser menuCommandOn: open spec title catalogModel icons initializeWidgets Select Proceed to continue, or close this window to cancel the operation. Did you did that on a 2.0? 2012/7/14 Mariano Martinez Peck <marianopeck(a)gmail.com> > Excellent. Sean, can you see all those methods (icons) that DO NOT have > senders? because I guess there are A LOT that I haven't seen since a > loooong time ;) > > > On Sat, Jul 14, 2012 at 6:03 AM, Sean P. DeNigris <sean(a)clipperadams.com>wrote: > >> To play with spec, and also because I needed it, I made a little browser >> that >> lists all the icons for the current UITheme and the name (the getter >> unCamelCased) >> >> "Load Spec if needed" >> Gofer new >> url: 'http://ss3.gemstone.com/ss/Spec'; >> package: 'ConfigurationOfSpec'; >> load. >> >> Gofer it >> squeaksource3: 'SpdPlayground'; >> package: 'IconBrowser'; >> load. >> >> You can open it via the world menu under "Tools" >> >> Here (on Nabble) is a screenshot: >> >> http://forum.world.st/file/n4639955/Screen_Shot_2012-07-14_at_12.01.44_AM.p… >> >> Cheers, >> Sean >> >> -- >> View this message in context: >> http://forum.world.st/ANN-IconBrowser-toy-tp4639955.html >> Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com. >> >> > > > -- > Mariano > http://marianopeck.wordpress.com > >

July 14, 2012

Re: [Pharo-users] Seaside - Is it worth my time investment or is it already dead...

by Milan Mimica

Why fixing it if it ain't broken? On 14 July 2012 03:44, Nelson Pingitore <pingitorenelson(a)gmail.com> wrote: > Is learning Seaside worth my time and effort or has it been abandoned > already? I did not see much change happening at the Seaside web home page. -- Milan Mimica http://sparklet.sf.net

July 14, 2012

Re: [Pharo-users] [ANN]: IconBrowser (toy)

by Mariano Martinez Peck

Excellent. Sean, can you see all those methods (icons) that DO NOT have senders? because I guess there are A LOT that I haven't seen since a loooong time ;) On Sat, Jul 14, 2012 at 6:03 AM, Sean P. DeNigris <sean(a)clipperadams.com>wrote: > To play with spec, and also because I needed it, I made a little browser > that > lists all the icons for the current UITheme and the name (the getter > unCamelCased) > > "Load Spec if needed" > Gofer new > url: 'http://ss3.gemstone.com/ss/Spec'; > package: 'ConfigurationOfSpec'; > load. > > Gofer it > squeaksource3: 'SpdPlayground'; > package: 'IconBrowser'; > load. > > You can open it via the world menu under "Tools" > > Here (on Nabble) is a screenshot: > > http://forum.world.st/file/n4639955/Screen_Shot_2012-07-14_at_12.01.44_AM.p… > > Cheers, > Sean > > -- > View this message in context: > http://forum.world.st/ANN-IconBrowser-toy-tp4639955.html > Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com. > > -- Mariano http://marianopeck.wordpress.com

July 14, 2012

[ANN]: IconBrowser (toy)

by Sean P. DeNigris

To play with spec, and also because I needed it, I made a little browser that lists all the icons for the current UITheme and the name (the getter unCamelCased) "Load Spec if needed" Gofer new url: 'http://ss3.gemstone.com/ss/Spec'; package: 'ConfigurationOfSpec'; load. Gofer it squeaksource3: 'SpdPlayground'; package: 'IconBrowser'; load. You can open it via the world menu under "Tools" Here (on Nabble) is a screenshot: http://forum.world.st/file/n4639955/Screen_Shot_2012-07-14_at_12.01.44_AM.p… Cheers, Sean -- View this message in context: http://forum.world.st/ANN-IconBrowser-toy-tp4639955.html Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.

July 14, 2012

Seaside - Is it worth my time investment or is it already dead...

by Nelson Pingitore

Is learning Seaside worth my time and effort or has it been abandoned already? I did not see much change happening at the Seaside web home page.

July 14, 2012

Re: [Pharo-users] Announcements - where do I start?

by Mariano Martinez Peck

http://book.pharo-project.org/book/LanguageAndLibraries/announcements/ On Thu, Jul 12, 2012 at 12:51 PM, phil(a)highoctane.be <phil(a)highoctane.be>wrote: > I have been reading about announcements but can't really get how they > work. > > Is there someone having a little sample or two for me? The PBE2 book sheds > some light on the subject but not enough to comprehend for me. I need some > samples to work from. > > Where should I look? > > Phil > -- Mariano http://marianopeck.wordpress.com

July 12, 2012

Re: [Pharo-users] Announcements - where do I start?

by phil＠highoctane.be

Hi Sven, This makes things much clearer. ZnLogSupport, the cornerstone of announcements usage learning! Thanks, it helped a ton. Phil 2012/7/12 Sven Van Caekenberghe <sven(a)beta9.be> > Hi Phil, > > Announcement are very simple, there is not much to it. It is all about > decoupling. > > If you read some basic overview and looked at the code, you known probably > more than enough to start. > > Another example you could look at it the Zn logging mechanism, category > 'Zinc-HTTP-Logging'. > > At the system level there are some finer/subtle points, but for normal > code it is pretty straightforward I think. > > Sven > > On 12 Jul 2012, at 12:51, phil(a)highoctane.be wrote: > > > I have been reading about announcements but can't really get how they > work. > > > > Is there someone having a little sample or two for me? The PBE2 book > sheds some light on the subject but not enough to comprehend for me. I need > some samples to work from. > > > > Where should I look? > > > > Phil > > > >

July 12, 2012