October 2011 - Pharo-dev - lists.pharo.org

[Pharo-project] any news from the RPackage crew?

by Alexandre Bergel

Hi! There are some update problems in RPackage. Is there any progress? Alexandre -- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: Alexandre Bergel http://www.bergel.eu ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.

Oct. 6, 2011

Re: [Pharo-project] Getting and loading each version of a package? (Gofer?)

by Lukas Renggli

FYI: Now that I have an image I see that the method is called #allResolved, not #allReferences. I guess the method comments would have guided you there anyway. Lukas On 6 October 2011 18:30, Schwab,Wilhelm K <bschwab(a)anest.ufl.edu> wrote: > Sounds good from here. > > > > > ________________________________________ > From: pharo-project-bounces(a)lists.gforge.inria.fr [pharo-project-bounces(a)lists.gforge.inria.fr] On Behalf Of Lukas Renggli [renggli(a)gmail.com] > Sent: Thursday, October 06, 2011 9:34 AM > To: Pharo-project(a)lists.gforge.inria.fr > Subject: Re: [Pharo-project] Getting and loading each version of a package? Â Â (Gofer?) > > Way easier is to ask the Gofer instance setup with repositories for > #allReferences. You then get objects with each reachable version, and > can access things like version number, package name, branch name, > author name, ... using the accessors. To load the version you simply > call #load. > > Lukas > > On 6 October 2011 15:28, Schwab,Wilhelm K <bschwab(a)anest.ufl.edu> wrote: >> Mariano, >> >> Below is something that was getting yanked from or with ScriptLoader, so I included it in Migrate. Â The enumerating of versions could be of interest to you. >> >> Bill >> >> >> loadLatestPackage: aString fromRepository: aRepository >> Â Â Â Â "1-10 - too useful to be without really, I created another. Â Shamelessly >> Â Â Â Â stolen from ScriptLoader." >> >> Â Â Â Â | versionsBlock versions tries version | >> >> Â Â Â Â versionsBlock := [ (aRepository allVersionNames select: [ :each | >> Â Â Â Â Â Â Â Â each beginsWith: aString ]) >> Â Â Â Â Â Â Â Â asSortedCollection: [ :a :b | >> Â Â Â Â Â Â Â Â Â Â Â Â (a copyAfterLast: $.) asNumber <= (b copyAfterLast: $.) asNumber]]. >> Â Â Â Â versions := versionsBlock value. >> Â Â Â Â tries := 0. >> Â Â Â Â [ versions isEmpty and: [ tries < 3 ] ] whileTrue: [ >> Â Â Â Â Â Â Â Â versions := versionsBlock value. >> Â Â Â Â Â Â Â Â tries := tries + 1 ]. >> Â Â Â Â versions isEmpty ifTrue: [ self error: 'problems when accessing repository' ]. >> >> Â Â Â Â aRepository versionReaderForFileNamed: (versions last , '.mcz') do: [:reader | >> Â Â Â Â Â Â Â Â version := reader version. >> Â Â Â Â Â Â Â Â version load. >> Â Â Â Â Â Â Â Â version workingCopy repositoryGroup addRepository: aRepository]. >> >> >> ________________________________________ >> From: pharo-project-bounces(a)lists.gforge.inria.fr [pharo-project-bounces(a)lists.gforge.inria.fr] On Behalf Of Mariano Martinez Peck [marianopeck(a)gmail.com] >> Sent: Thursday, October 06, 2011 9:23 AM >> To: Pharo-project(a)lists.gforge.inria.fr >> Subject: Re: [Pharo-project] Getting and loading each version of a package? Â Â (Gofer?) >> >> I need help with only one thing....get the list of version of a package. I can manage the rest... >> So I would like tp get all the versions of the package Fuel of the squeaksource Fuel repo... >> >> thanks in advance, >> >> >> On Thu, Oct 6, 2011 at 11:51 AM, Mariano Martinez Peck <marianopeck(a)gmail.com<mailto:marianopeck@gmail.com>> wrote: >> >> >> On Thu, Oct 6, 2011 at 11:50 AM, HwaJong Oh <daliot.oh(a)gmail.com<mailto:daliot.oh@gmail.com>> wrote: >> Mariano, >> >> For metacello or monticello? >> >> Monticello. >> >> >> >> HwaJong Oh >> >> -- >> View this message in context: http://forum.world.st/Getting-and-loading-each-version-of-a-package-Gofer-t… >> Sent from the Pharo Smalltalk mailing list archive at Nabble.com. >> >> >> >> >> -- >> Mariano >> http://marianopeck.wordpress.com >> >> >> >> >> -- >> Mariano >> http://marianopeck.wordpress.com >> >> >> > > > > -- > Lukas Renggli > www.lukas-renggli.ch > > > -- Lukas Renggli www.lukas-renggli.ch

Oct. 6, 2011

Re: [Pharo-project] Getting and loading each version of a package? (Gofer?)

by Schwab,Wilhelm K

Sounds good from here. ________________________________________ From: pharo-project-bounces(a)lists.gforge.inria.fr [pharo-project-bounces(a)lists.gforge.inria.fr] On Behalf Of Lukas Renggli [renggli(a)gmail.com] Sent: Thursday, October 06, 2011 9:34 AM To: Pharo-project(a)lists.gforge.inria.fr Subject: Re: [Pharo-project] Getting and loading each version of a package? (Gofer?) Way easier is to ask the Gofer instance setup with repositories for #allReferences. You then get objects with each reachable version, and can access things like version number, package name, branch name, author name, ... using the accessors. To load the version you simply call #load. Lukas On 6 October 2011 15:28, Schwab,Wilhelm K <bschwab(a)anest.ufl.edu> wrote: > Mariano, > > Below is something that was getting yanked from or with ScriptLoader, so I included it in Migrate. The enumerating of versions could be of interest to you. > > Bill > > > loadLatestPackage: aString fromRepository: aRepository > "1-10 - too useful to be without really, I created another. Shamelessly > stolen from ScriptLoader." > > | versionsBlock versions tries version | > > versionsBlock := [ (aRepository allVersionNames select: [ :each | > each beginsWith: aString ]) > asSortedCollection: [ :a :b | > (a copyAfterLast: $.) asNumber <= (b copyAfterLast: $.) asNumber]]. > versions := versionsBlock value. > tries := 0. > [ versions isEmpty and: [ tries < 3 ] ] whileTrue: [ > versions := versionsBlock value. > tries := tries + 1 ]. > versions isEmpty ifTrue: [ self error: 'problems when accessing repository' ]. > > aRepository versionReaderForFileNamed: (versions last , '.mcz') do: [:reader | > version := reader version. > version load. > version workingCopy repositoryGroup addRepository: aRepository]. > > > ________________________________________ > From: pharo-project-bounces(a)lists.gforge.inria.fr [pharo-project-bounces(a)lists.gforge.inria.fr] On Behalf Of Mariano Martinez Peck [marianopeck(a)gmail.com] > Sent: Thursday, October 06, 2011 9:23 AM > To: Pharo-project(a)lists.gforge.inria.fr > Subject: Re: [Pharo-project] Getting and loading each version of a package? (Gofer?) > > I need help with only one thing....get the list of version of a package. I can manage the rest... > So I would like tp get all the versions of the package Fuel of the squeaksource Fuel repo... > > thanks in advance, > > > On Thu, Oct 6, 2011 at 11:51 AM, Mariano Martinez Peck <marianopeck(a)gmail.com<mailto:marianopeck@gmail.com>> wrote: > > > On Thu, Oct 6, 2011 at 11:50 AM, HwaJong Oh <daliot.oh(a)gmail.com<mailto:daliot.oh@gmail.com>> wrote: > Mariano, > > For metacello or monticello? > > Monticello. > > > > HwaJong Oh > > -- > View this message in context: http://forum.world.st/Getting-and-loading-each-version-of-a-package-Gofer-t… > Sent from the Pharo Smalltalk mailing list archive at Nabble.com. > > > > > -- > Mariano > http://marianopeck.wordpress.com > > > > > -- > Mariano > http://marianopeck.wordpress.com > > > -- Lukas Renggli www.lukas-renggli.ch

Oct. 6, 2011

Re: [Pharo-project] Renaming "Announcement" into "Event"?

by Lukas Renggli

On 6 October 2011 17:40, Igor Stasenko <siguctua(a)gmail.com> wrote: > On 6 October 2011 17:24, Lukas Renggli <renggli(a)gmail.com> wrote: >>>> why wasting an energy on something, which not gives any benefits? >>> >>> There is a benefit when you teach Pharo and write a book. >> >> Then you should make the Exception hierarchy a subclass of Event too >> and rename all exceptions, because they are all (exceptional) events >> too. >> >>>> i completely agree that proper naming is important. but the framework >>>> was originally designed not by us, >>>> and i think its not quite correct to rename it without asking the author. >>> >>> This is what this email is about :-) >> >> Puns aside: Why not just remove the Announcement class altogether? It >> used to be empty in the original implementation and serves no real >> purpose other than grouping its subclasses. Any object can potentially >> represent an event. >> > err.. an Announcement playing own role as a root class for all announcements. > In same way as Exception is a root of all exceptions, so if you want > to handle all exceptions you putting Exception class. > If you remove the notion of root, then you will need to introduce > something else in order to satisfy 'i wanna handle all > exceptions/events , > no matter what they are'. Object would be your choice for all events then. Lukas -- Lukas Renggli www.lukas-renggli.ch

Oct. 6, 2011

Re: [Pharo-project] Renaming "Announcement" into "Event"?

by Igor Stasenko

On 6 October 2011 17:24, Lukas Renggli <renggli(a)gmail.com> wrote: >>> why wasting an energy on something, which not gives any benefits? >> >> There is a benefit when you teach Pharo and write a book. > > Then you should make the Exception hierarchy a subclass of Event too > and rename all exceptions, because they are all (exceptional) events > too. > >>> i completely agree that proper naming is important. but the framework >>> was originally designed not by us, >>> and i think its not quite correct to rename it without asking the author. >> >> This is what this email is about :-) > > Puns aside: Why not just remove the Announcement class altogether? It > used to be empty in the original implementation and serves no real > purpose other than grouping its subclasses. Any object can potentially > represent an event. > err.. an Announcement playing own role as a root class for all announcements. In same way as Exception is a root of all exceptions, so if you want to handle all exceptions you putting Exception class. If you remove the notion of root, then you will need to introduce something else in order to satisfy 'i wanna handle all exceptions/events , no matter what they are'. > Lukas > > -- > Lukas Renggli > www.lukas-renggli.ch > > -- Best regards, Igor Stasenko.

Oct. 6, 2011

Re: [Pharo-project] Renaming "Announcement" into "Event"?

by Lukas Renggli

>> why wasting an energy on something, which not gives any benefits? > > There is a benefit when you teach Pharo and write a book. Then you should make the Exception hierarchy a subclass of Event too and rename all exceptions, because they are all (exceptional) events too. >> i completely agree that proper naming is important. but the framework >> was originally designed not by us, >> and i think its not quite correct to rename it without asking the author. > > This is what this email is about :-) Puns aside: Why not just remove the Announcement class altogether? It used to be empty in the original implementation and serves no real purpose other than grouping its subclasses. Any object can potentially represent an event. Lukas -- Lukas Renggli www.lukas-renggli.ch

Oct. 6, 2011

Re: [Pharo-project] Renaming "Announcement" into "Event"?

by Igor Stasenko

On 6 October 2011 17:03, Alexandre Bergel <alexandre.bergel(a)me.com> wrote: >> why wasting an energy on something, which not gives any benefits? > > There is a benefit when you teach Pharo and write a book. > I don't see it. You can always say in introduction that Announcements is an event(s) framework. >> i completely agree that proper naming is important. but the framework >> was originally designed not by us, >> and i think its not quite correct to rename it without asking the author. > > This is what this email is about :-) > > Alexandre > >> >> >> On 6 October 2011 16:21, Alexandre Bergel <alexandre.bergel(a)me.com> wrote: >>> What the whole world call "event" we call "announcement". >>> I understand the need for a new name back at the time where Smalltalk has its old event mechanism. But this does not hold anymore I feel. >>> >>> I though about this renaming when working on Pharo by example 2. Having "Event" instead of "Announcement" in the index tells much more what the chapter is about. >>> >>> Alexandre >>> >>> >>> On 6 Oct 2011, at 10:58, Fernando Olivero wrote: >>> >>>> I dont agree entirely with you Alex, nowadays we announce an >>>> announcement, instead of sending events. I mean, >>>> should we start announcing events? >>>> Fernando >>>> >>>> On Thu, Oct 6, 2011 at 3:15 PM, Alexandre Bergel >>>> <alexandre.bergel(a)me.com> wrote: >>>>> Hi! >>>>> >>>>> What about moving our rebelness and energy into innovation rather than giving strange name? :-) >>>>> >>>>> Cheers, >>>>> Alexandre >>>>> -- >>>>> _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: >>>>> Alexandre Bergel Â http://www.bergel.eu >>>>> ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;. >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>> >>> >>> -- >>> _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: >>> Alexandre Bergel Â http://www.bergel.eu >>> ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;. >>> >>> >>> >>> >>> >>> >>> >> >> >> >> -- >> Best regards, >> Igor Stasenko. >> > > -- > _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: > Alexandre Bergel Â http://www.bergel.eu > ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;. > > > > > > > -- Best regards, Igor Stasenko.

Oct. 6, 2011

[Pharo-project] looking for a job

by Cyrille Delaunay

Hello, I just finished my two years contract as engineer in the RMoD team with stephane and I am now looking for a job. I put below a short cv. If you are looking for a smalltalk developer, or know someone that is looking ...., feel free to contact me :) Experience ========= 2009--Present, Research Engineer, INRIA - RMoD team lead by Stephane Ducasse, Villeneuve d'Ascq, France. Development / Refactoring / Capitalization of the reengineering platform Moose (http://www.moosetechnology.org/) in the Pharo environment (Smalltalk, http://www.pharo-project.org/home) *User interface.* Improvement of the Moose user interface, implementation of a library for wizards generation, help for the integration of a new graphic library in Pharo. *Visualizations.* Implementation of several generic visualizations for code source analysis. *C analyzer.* Development and tests for C code import in Moose. Implementation of specific visualizations. *Java extractor.* Participation in the development of a new Java extractor based on eclipse JDT. *PHP extractor.* Implementation (in java) of a PHP extractor based on eclipse PDT . *Quality model.* Participation to the ANR project Squale (Software quality assessment). Integration/implementation of the ideas in Moose. *New Package system for Pharo.* Contribution (Implementation / System integration / Users update / Tests) to the development of a new Package system for Pharo. *Smalltalk-Java interaction.* Evaluation / Tests of libraries to manipulate Java objects from Smalltalk image (JNIPort, JavaConnect). *Meta-modeling. *Improvment and use of the meta-modeling infrastructure used in Moose (Fame). *Analysis reports.* Development of a library for analysis reports generation. *Web development.* Web interface for Moose (using Seaside). Conception of a dashboard (Like the one of Sonar). Skills summary ============ *Visual Works*, 2 years. *Pharo*, 2 years. *Meta-modeling*, 2 years of experience as developer of the meta-described platform Moose. Use/Development of the meta-modeling infrastructure Fame ( http://scg.unibe.ch/wiki/projects/fame/) *Software Analysis*, 2 years of experience as developer/user of the software analysis platform Moose. Actif member of the community, good knowledge of scientific publications, books. Participation to numerous discussions around software analysis. *Software Quality*, Participation with the research team RMoD to the ANR project Squale (Software QUALity Enhancement). *Agile Developpement*, Strong knowledge gained during my studies and my 2,5 years of practice in the RMoD team. *Dynamic Web Development*, Experience in J2EE, .NET gained during my studies. Experience with Seaside (Smalltalk, http://www.seaside.st/) during my 2 years contract in the RMoD team. Education ======== 2008-2009 Master professional IAGL (Engineering et Architecture of Large Softwares), University of Lille 1, Villeneuve d'Ascq, France. 2007-2008 Maitrise in computer sciences, University of Lille 1, Villeneuve d'Ascq, France. 2006-2007 Licence in computer sciences, University of Lille 1, Villeneuve d'Ascq, France. Computer skills ============ Languages: Smalltalk, Java, C/C++, Prolog Web: Seaside, J2EE, ASP .NET IDE: Pharo, Eclipse, NetBeans OS: Mac OS, Linux, Windows Databases: MySQL, PostgreSQL Tools: LaTeX Languages ======== French, Fluent, Native language. English, Intermediate, Read, spoken, written during my contract in the RMoD team (main language of the team).

Oct. 6, 2011

Re: [Pharo-project] Getting and loading each version of a package? (Gofer?)

by StÃ©phane Ducasse

Mariano have a look at the Gofer paper. Here is a script to fetch all the packages of a given project. This is useful to grab all your files and get a version locally. | go | go := Gofer new. go squeaksource: 'Pharo14'. go allResolved do: [:each | self crLog: each packageName. go squeaksource: 'Pharo14'; package: each packageName; fetch] Stef On Oct 6, 2011, at 3:41 PM, Mariano Martinez Peck wrote: > > > On Thu, Oct 6, 2011 at 3:34 PM, Lukas Renggli <renggli(a)gmail.com> wrote: > Way easier is to ask the Gofer instance setup with repositories for > #allReferences. You then get objects with each reachable version, and > can access things like version number, package name, branch name, > author name, ... using the accessors. To load the version you simply > call #load. > > > I couldn't understand anything hahhaha. Can you clarify or give me an example in code? > > thanks! > > Lukas > > On 6 October 2011 15:28, Schwab,Wilhelm K <bschwab(a)anest.ufl.edu> wrote: >> Mariano, >> >> Below is something that was getting yanked from or with ScriptLoader, so I included it in Migrate. The enumerating of versions could be of interest to you. >> >> Bill >> >> >> loadLatestPackage: aString fromRepository: aRepository >> "1-10 - too useful to be without really, I created another. Shamelessly >> stolen from ScriptLoader." >> >> | versionsBlock versions tries version | >> >> versionsBlock := [ (aRepository allVersionNames select: [ :each | >> each beginsWith: aString ]) >> asSortedCollection: [ :a :b | >> (a copyAfterLast: $.) asNumber <= (b copyAfterLast: $.) asNumber]]. >> versions := versionsBlock value. >> tries := 0. >> [ versions isEmpty and: [ tries < 3 ] ] whileTrue: [ >> versions := versionsBlock value. >> tries := tries + 1 ]. >> versions isEmpty ifTrue: [ self error: 'problems when accessing repository' ]. >> >> aRepository versionReaderForFileNamed: (versions last , '.mcz') do: [:reader | >> version := reader version. >> version load. >> version workingCopy repositoryGroup addRepository: aRepository]. >> >> >> ________________________________________ >> From: pharo-project-bounces(a)lists.gforge.inria.fr [pharo-project-bounces(a)lists.gforge.inria.fr] On Behalf Of Mariano Martinez Peck [marianopeck(a)gmail.com] >> Sent: Thursday, October 06, 2011 9:23 AM >> To: Pharo-project(a)lists.gforge.inria.fr >> Subject: Re: [Pharo-project] Getting and loading each version of a package? (Gofer?) >> >> I need help with only one thing....get the list of version of a package. I can manage the rest... >> So I would like tp get all the versions of the package Fuel of the squeaksource Fuel repo... >> >> thanks in advance, >> >> >> On Thu, Oct 6, 2011 at 11:51 AM, Mariano Martinez Peck <marianopeck(a)gmail.com<mailto:marianopeck@gmail.com>> wrote: >> >> >> On Thu, Oct 6, 2011 at 11:50 AM, HwaJong Oh <daliot.oh(a)gmail.com<mailto:daliot.oh@gmail.com>> wrote: >> Mariano, >> >> For metacello or monticello? >> >> Monticello. >> >> >> >> HwaJong Oh >> >> -- >> View this message in context: http://forum.world.st/Getting-and-loading-each-version-of-a-package-Gofer-t… >> Sent from the Pharo Smalltalk mailing list archive at Nabble.com. >> >> >> >> >> -- >> Mariano >> http://marianopeck.wordpress.com >> >> >> >> >> -- >> Mariano >> http://marianopeck.wordpress.com >> >> >> > > > > -- > Lukas Renggli > www.lukas-renggli.ch > > > > > -- > Mariano > http://marianopeck.wordpress.com >

Oct. 6, 2011

Re: [Pharo-project] One Liners to Impress Your Friends

by Peter Hugosson-Miller

On Thu, Oct 6, 2011 at 4:58 PM, Levente Uzonyi <leves(a)elte.hu> wrote: > On Thu, 6 Oct 2011, Sven Van Caekenberghe wrote: > > After reading these two post >> >> 10 CoffeeScript One Liners to Impress Your Friends >> >> http://ricardo.cc/2011/06/02/** >> 10-CoffeeScript-One-Liners-to-**Impress-Your-Friends.html<http://ricardo.cc/2011/06/02/10-CoffeeScript-One-Liners-to-Impress-Your-Fri…> >> >> 10 Scala One Liners to Impress Your Friends >> >> http://solog.co/scala/10-**scala-one-liners-to-impress-** >> your-friends.html<http://solog.co/scala/10-scala-one-liners-to-impress-your-friends.html> >> >> I could not help but think why people get so excited about new languages >> while Smalltalk can and has been doing this for decades. So here are >> Smalltalk versions of their code (not that the examples are all that >> impressive): >> >> "--- 1. Multiple Each Item in a List by 2 ---" >> >> (1 to: 10) collect: [ :each | each * 2 ] >> >> "--- 2. Sum a List of Numbers ---" >> >> (1 to: 1000) inject: 0 into: [ :sum :each | sum + each ] >> >> (1 to: 1000) fold: [ :x :y | x + y ] >> >> (1 to: 1000) reduce: [ :x :y | x + y ] >> >> (1 to: 1000) sum >> >> "--- 3. Verify if Exists in a String ---" >> >> | wordList tweet | >> wordList := #( 'Smalltalk' 'Object-Oriented' 'REST' 'TDD' 'Play >> Framework' ). >> tweet := 'This is an example tweet talking about Smalltalk and >> TDD'. >> wordList anySatisfy: [ :each | tweet includesSubString: each ] >> >> "--- 4. Read in a File ---" >> >> (FileStream fileNamed: 'data.txt') contentsOfEntireFile >> >> "--- 5. Happy Birthday ---" >> >> 1 to: 4 do: [ :each | Transcript crShow: 'Happy Birthday ', (each = >> 3 ifTrue: [ 'dear Mr. President' ] ifFalse: [ 'to You' ]) ] >> >> "--- 6. Filter list of numbers ---" >> >> | passed failed | >> passed := OrderedCollection new. >> failed := OrderedCollection new. >> #(49 58 76 82 88 90) do: [ :each | (each > 60 ifTrue: [ passed ] >> ifFalse: [ failed ] ) add: each ]. >> { passed. failed } >> >> #(49 58 76 82 88 90) groupedBy: [ :each | each > 60 ] >> >> "--- 7. Fetch and Parse an XML or JSON web service ---" >> >> XMLDOMParser parse: (ZnNeoClient new get: ' >> http://search.twitter.com/**search.atom?&q=pharoproject<http://search.twitter.com/search.atom?&q=pharoproject> >> ') >> >> JSJsonParser parse: (ZnNeoClient new get: ' >> http://search.twitter.com/**search.json?&q=pharoproject<http://search.twitter.com/search.json?&q=pharoproject> >> ') >> >> "--- 8. Find minimum (or maximum) in a List ---" >> >> #(14 35 -7 46 98) fold: [ :x :y | x min: y ] >> >> #(14 35 -7 46 98) min >> >> #(14 35 -7 46 98) fold: [ :x :y | x max: y ] >> >> #(14 35 -7 46 98) max >> >> "--- 9. Parallel Processing ---" >> >> "No such standard support, but multithreading is of course >> available" >> >> "--- 10. Sieve of Eratosthenes ---" >> >> "Unreadable code is not a good idea, this is longer but readable" >> >> | primes | >> primes := Array new: 100 withAll: true. >> primes at: 1 put: false. >> 2 to: primes size sqrt ceiling do: [ :each | >> > > You mean #sqrtFloor. > > > (primes at: each) ifTrue: [ >> each * 2 to: primes size by: each do: [ >> :eachMultiple | >> > > Eratostheneses would start from each * each. > > > primes at: eachMultiple put: false ] ] ]. >> OrderedCollection streamContents: [ :stream | >> > > Streaming into an OrderedCollection? Come on... > > Here's a version optimized for readibility & loc: > > Array streamContents: [ :primeStream | > | sieve | > sieve := Array new: 100 withAll: true. > 2 to: sieve size do: [ :each | > (sieve at: each) ifTrue: [ > primeStream nextPut: each. > each * each to: sieve size by: each do: [ > :eachMultiple | > sieve at: eachMultiple put: false ] ] ] ]. > > > Levente That, my friend, is a thing of beauty :-) -- Cheers, Peter > primes doWithIndex: [ :each :index | >> each ifTrue: [ stream nextPut: index ] ] ] >> >> >> Maybe we could turn this into a blog post after some discussion ? >> >> To really show off Smalltalk, we might need a couple more impressive >> examples. >> >> Sven >> >

Oct. 6, 2011