May 2012 - Pharo-dev - lists.pharo.org

Re: [Pharo-project] Redirecting Transcript

by Mariano Martinez Peck

On Thu, May 10, 2012 at 9:27 AM, Sven Van Caekenberghe <sven(a)beta9.be>wrote: > > On 10 May 2012, at 04:47, Sean P. DeNigris wrote: > > > There were several list threads about redirecting the Transcript e.g. to > > stdout... Is this available now in Pharo? If so, how do I redirect it to > > stdout? > > Have a look at NonInteractiveTranscript. > > ---- > > I am NonInteractiveTranscript, a replacement for Transcript, writing > everything to a file or stdout. > > This is useful when running headless. > > NonInteractiveTranscript file install. > > To connect to the output stream of the virtual machine process choose > stdout. > > NonInteractiveTranscript stdout install. > > An example, using various methods. > > | transcript | > transcript := NonInteractiveTranscript new. > transcript cr; << 'This is a test'; space; print: #(1 2 3). > transcript cr; nextPut: $|; tab; nextPut: $#; nextPutAll: '-1-'; space; > print: Float pi. > Collection subclassesDo: [ :each | transcript cr; print: each ]. > transcript crShow: 'Done!'. > transcript close. > > --- > > There is more in Pharo than you think ;-) > And even more black magic. Since you can do: Smalltalk at #Transcript put: NonInteractiveTranscript hahahah > > > Sven > > > -- > Sven Van Caekenberghe > http://stfx.eu > Smalltalk is the Red Pill > > > > > > -- Mariano http://marianopeck.wordpress.com

May 10, 2012

Re: [Pharo-project] FileList efficiency could hardly be worse

by Mariano Martinez Peck

Thanks Nicolas. I would appreciate any effort in this directory since I also have a 10gb package-cache and yes, I know it is slow. If you can provive a slice :) On Thu, May 10, 2012 at 9:44 AM, StÃ©phane Ducasse <stephane.ducasse(a)inria.fr > wrote: > :) > > indeed. Imagine my 10 GB package cache. > > Stef > > > On May 10, 2012, at 12:18 AM, Nicolas Cellier wrote: > > > The efficiency of FileList>>listForPattern: is something which should > > deserve a bit more care. > > > > It tries to sort the files, for example by name, but wants to display > > directory first > > ^ [ :x :y | |xIsDir| > > ((xIsDir := x isDirectory) = y isDirectory) > > ifTrue: [ x basename <= y basename ] > > ifFalse: [ > > "directories always precede files" > > xIsDir ]] > > > > Alas, this isDirectory test cost you an arm: > > > > FileReference>>isDirectory > > ^ filesystem isDirectory: path > > > > FileSystem>>isDirectory: aResolvable > > "Resolve the argument, and answer true if the result refers > > to a directory, false if it refers to a file or doesn't exist." > > > > ^ store isDirectory: (self resolve: aResolvable) > > > > FileSystemStore>>isDirectory: aPath > > aPath isRoot ifTrue: [ ^ true ]. > > self > > nodeAt: aPath > > ifPresent: [ :entry | ^ self basicIsDirectory: entry ] > > ifAbsent: [ ^ false ]. > > > > DiskStore>>nodeAt: aPath ifPresent: presentBlock ifAbsent: absentBlock > > | name| > > aPath isRoot ifTrue: [ ^ presentBlock value: self rootNode ]. > > "| encodedPath encodedBasename entry | > > encodedPath := Primitives encode: (self stringFromPath: aPath > parent). > > encodedBasename := Primitives encode: aPath basename. > > entry := Primitives lookupDirectory: encodedPath filename: > encodedBasename. > > ^ entry == #badDirectoryPath > > ifTrue: absentBlock > > ifFalse: [ > > entry at: 1 put: aPath basename. > > presentBlock value: entry ]." > > name := aPath basename. > > self > > directoryAt: aPath parent > > ifAbsent: absentBlock > > nodesDo: > > [ :entry | > > (self filename: (entry at: 1) matches: name) > > ifTrue: [ ^ presentBlock value: entry ] ]. > > ^ absentBlock value > > > > Arghh, it scans the whole parent directory again! > > If sort is O(n log n), then we transform it into O(2 n^2 log n). > > > > Try to browse your package-cache if you're not a chicken. > > Seriously, it's unusable... > > > > Nicolas > > > > > -- Mariano http://marianopeck.wordpress.com

May 10, 2012

Re: [Pharo-project] [Vm-dev] Re: StackVM on iOS: the return

by Mariano Martinez Peck

On Thu, May 10, 2012 at 9:51 AM, Esteban Lorenzano <estebanlm(a)gmail.com>wrote: > > Hi, > > yes... cmake is still not making a good job on creating xcode projects. > For now, I touch that manually after generation, I still didn't find the > time to correct it... if you find a way, please let me know. > > Indeed. I had the same problem but no working solution. See: http://forum.world.st/Problem-with-external-plugins-with-automated-XCode-pr… > btw... I think this vm related stuff belongs to vm-dev list, I'm > redirecting there. > > best, > Esteban > > On May 10, 2012, at 9:46 AM, phil(a)highoctane.be wrote: > > > Hello > > > > I've been updating the blessed/ thing from git (pull, merge master), > taken a fresh image, loaded the 4.7 and generated sources. > > > > Cmake and fix works. > > > > Project opens in XCode 4.3 > > > > But... > > > > The linking step fails because the .a files for the plugins aren't found. > > > > I can't figure out why since all this Cmake machinery makes a ton of > scripts all over the place. > > > > Any clue to get me out of that? > > > > Thanks! > > > > Philippe Back > > -- Mariano http://marianopeck.wordpress.com

May 10, 2012

Re: [Pharo-project] StackVM on iOS: the return

by Esteban Lorenzano

Hi, yes... cmake is still not making a good job on creating xcode projects. For now, I touch that manually after generation, I still didn't find the time to correct it... if you find a way, please let me know. btw... I think this vm related stuff belongs to vm-dev list, I'm redirecting there. best, Esteban On May 10, 2012, at 9:46 AM, phil(a)highoctane.be wrote: > Hello > > I've been updating the blessed/ thing from git (pull, merge master), taken a fresh image, loaded the 4.7 and generated sources. > > Cmake and fix works. > > Project opens in XCode 4.3 > > But... > > The linking step fails because the .a files for the plugins aren't found. > > I can't figure out why since all this Cmake machinery makes a ton of scripts all over the place. > > Any clue to get me out of that? > > Thanks! > > Philippe Back

May 10, 2012

[Pharo-project] StackVM on iOS: the return

by phil＠highoctane.be

Hello I've been updating the blessed/ thing from git (pull, merge master), taken a fresh image, loaded the 4.7 and generated sources. Cmake and fix works. Project opens in XCode 4.3 But... The linking step fails because the .a files for the plugins aren't found. I can't figure out why since all this Cmake machinery makes a ton of scripts all over the place. Any clue to get me out of that? Thanks! Philippe Back

May 10, 2012

Re: [Pharo-project] Strangest object ever seen?

by StÃ©phane Ducasse

On May 10, 2012, at 1:19 AM, Francisco Garau wrote: > It also happened on a 20032 image (see screenshot). > > Smalltalk cleanUp didn't solve the issue here. > > Please, note the Unnamed Changeset with a Dictionaryâ¦ Tx Franscico Indeed it looks like something weird happened. Stef > > - Francisco > > On 9 May 2012 20:27, Pavel Krivanek <pavel.krivanek(a)gmail.com> wrote: > On Wed, May 9, 2012 at 3:39 PM, StÃ©phane Ducasse > <stephane.ducasse(a)inria.fr> wrote: > >>> Now I do not understand why this guy cannot get printed. > >>> > >>> I do not see why > >>> > >>> ClassDescription>>printOn: aStream > >>> aStream nextPutAll: self name > >>> > >>> Metaclass>>name > >>> "Answer a String that is the name of the receiver, either 'Metaclass' or > >>> the name of the receiver's class followed by ' class'." > >>> > >>> thisClass == nil > >>> ifTrue: [^'a Metaclass'] > >>> ifFalse: [^thisClass name , ' class'] > >>> > >>> self first soleInstance printString > >>> -> leads to have emergency debugger. > > > > you do not get emergency! > > I do not like when we do not get the same bugsâ¦ > > on some inst vars and expressions I get the emergency evaluator. > > > > > > >> self name shows: > >> > >> a Dictionary(#DependentsFields->a WeakIdentityKeyDictionary(a > >> CategoryWidget->a DependentsArray(a PluggableIconListMorph(217841664)) > >> a ContextVariablesInspector->a DependentsArray(a > >> PluggableListMorph(445382656) a PluggableTextMorph(1046216704)) a > >> ContextVariablesInspector->a DependentsArray(a > >> PluggableListMorph(290193408) ... ) > >> > >> The source of printing problems will be in thisClass. > >> > >> The next interesting thing is that it has no pointers and it is > >> removed after garbageCollect. > > > > So this is a good news :). > > The question is what produced such strange object and how many similar > ones we still have in the image. It can have very unwelcome > consequences - for example the segmentation faults on Fuel packages > exports when executed from command line. But from workspace it behaves > differently. > > -- Pavel > > > > >> > >> -- Pavel > >> > >> > >> > >> > >>> Stef > >>> > >>> > >>> > >>> > >>> > >> > > > > > > > <Screen shot 2012-05-10 at 00.12.55.png>

May 10, 2012

Re: [Pharo-project] FileList efficiency could hardly be worse

by StÃ©phane Ducasse

:) indeed. Imagine my 10 GB package cache. Stef On May 10, 2012, at 12:18 AM, Nicolas Cellier wrote: > The efficiency of FileList>>listForPattern: is something which should > deserve a bit more care. > > It tries to sort the files, for example by name, but wants to display > directory first > ^ [ :x :y | |xIsDir| > ((xIsDir := x isDirectory) = y isDirectory) > ifTrue: [ x basename <= y basename ] > ifFalse: [ > "directories always precede files" > xIsDir ]] > > Alas, this isDirectory test cost you an arm: > > FileReference>>isDirectory > ^ filesystem isDirectory: path > > FileSystem>>isDirectory: aResolvable > "Resolve the argument, and answer true if the result refers > to a directory, false if it refers to a file or doesn't exist." > > ^ store isDirectory: (self resolve: aResolvable) > > FileSystemStore>>isDirectory: aPath > aPath isRoot ifTrue: [ ^ true ]. > self > nodeAt: aPath > ifPresent: [ :entry | ^ self basicIsDirectory: entry ] > ifAbsent: [ ^ false ]. > > DiskStore>>nodeAt: aPath ifPresent: presentBlock ifAbsent: absentBlock > | name| > aPath isRoot ifTrue: [ ^ presentBlock value: self rootNode ]. > "| encodedPath encodedBasename entry | > encodedPath := Primitives encode: (self stringFromPath: aPath parent). > encodedBasename := Primitives encode: aPath basename. > entry := Primitives lookupDirectory: encodedPath filename: encodedBasename. > ^ entry == #badDirectoryPath > ifTrue: absentBlock > ifFalse: [ > entry at: 1 put: aPath basename. > presentBlock value: entry ]." > name := aPath basename. > self > directoryAt: aPath parent > ifAbsent: absentBlock > nodesDo: > [ :entry | > (self filename: (entry at: 1) matches: name) > ifTrue: [ ^ presentBlock value: entry ] ]. > ^ absentBlock value > > Arghh, it scans the whole parent directory again! > If sort is O(n log n), then we transform it into O(2 n^2 log n). > > Try to browse your package-cache if you're not a chicken. > Seriously, it's unusable... > > Nicolas >

May 10, 2012

Re: [Pharo-project] Redirecting Transcript

by Sven Van Caekenberghe

On 10 May 2012, at 04:47, Sean P. DeNigris wrote: > There were several list threads about redirecting the Transcript e.g. to > stdout... Is this available now in Pharo? If so, how do I redirect it to > stdout? Have a look at NonInteractiveTranscript. ---- I am NonInteractiveTranscript, a replacement for Transcript, writing everything to a file or stdout. This is useful when running headless. NonInteractiveTranscript file install. To connect to the output stream of the virtual machine process choose stdout. NonInteractiveTranscript stdout install. An example, using various methods. | transcript | transcript := NonInteractiveTranscript new. transcript cr; << 'This is a test'; space; print: #(1 2 3). transcript cr; nextPut: $|; tab; nextPut: $#; nextPutAll: '-1-'; space; print: Float pi. Collection subclassesDo: [ :each | transcript cr; print: each ]. transcript crShow: 'Done!'. transcript close. --- There is more in Pharo than you think ;-) Sven -- Sven Van Caekenberghe http://stfx.eu Smalltalk is the Red Pill

May 10, 2012

Re: [Pharo-project] SimpleLiteralArrayParser

by H. Hirzel

P.S. The ANSI Standard [1] 3.4.6 Literals A literal is a syntactic construct that that directly describes a statically created object. Instances of several classes of objects can be represented literally. These include numbers, characters, strings, symbols, message selectors, and arrays. Each type of literal is discussed in individual sections below. For each type of literal, a protocol is specified to which objects of that literal form must conform. <literal> ::= <number literal> | <string literal> | <character literal> | <symbol literal> | <selector literal> | <array literal> 3.4.6.6 Array Literals An array literal is a sequenced collection with numeric keys which may contain any number of other literals. <array literal> ::= '#(' <array element>* ')' <array element> ::= <literal> | identifier The value of an array literal is an object that implements the <sequencedReadableCollection> protocol. The elements of an array literal can consist of any combination of literal forms. If an identifier appears as an <array element> and it is one of the reserved identifiers nil, true or false the value of the corresponding element of the collection is the value of that reserved identifier. The meaning is undefined if any other identifier is used as an <array element>. If an <array literal> has no <array element>clauses the collection has no elements [1] NCITS J20 DRAFT of ANSI Smalltalk Standard December, 1997 revision 1.9 Draft American National Standard for Information Systems - Programming Languages - Smalltalk accessed through http://wiki.squeak.org/squeak/172 On 5/10/12, H. Hirzel <hannes.hirzel(a)gmail.com> wrote: > Hi StÃ©phane > > Goran writes here > http://goran.krampe.se/2012/05/08/literal-arrays-vs-json-vs-ston-vs-tirade/ > > <citation> > Literal Smalltalk arrays > > The simplest notation of all in the lineup is the literal array syntax > in Smalltalk. The example below covers all its capabilities AFAIK (in > Pharo/Squeak), please tell me if I missed anything: > > #(4711 3.4 16r3F 'string' #symbol #'another-symbol' (nested array) > #(one more) true false nil $x #[12 32]) > > </citation> > > Do you agree that this covers everything in terms of literal arrays? > > --Hannes > > On 4/24/12, StÃ©phane Ducasse <stephane.ducasse(a)inria.fr> wrote: >> Mariano >> >> read the metacello mailing list mails I sent. I hate hate hate repeating >> myself. >> >> I started to work on the LIteralArrayParser so that we do not have the >> problem in the future. >> >> Stef >> >> On Apr 24, 2012, at 12:52 PM, Mariano Martinez Peck wrote: >> >>> >>> >>> On Tue, Apr 24, 2012 at 12:43 PM, StÃ©phane Ducasse >>> <stephane.ducasse(a)inria.fr> wrote: >>> > Hi guys >>> > >>> > We should develop a simple Literal Array parser that is dialect >>> > independant >>> > so that we can avoid using JSON for meta data. So I will start to >>> > develop. I will start to write some tests and do it test first. >>> > >>> > Gofer new >>> > repository: 'http://ss3.gemstone.com/ss/SimpleLiteralArrayParser'; >>> > package: 'SimpleLiteralArrayParser'; >>> > load >>> > >>> > Now I still wonder what do we do about floats. May be the situation >>> > changed but Squeak and VW floats were not the same. >>> > >>> > I don't get it. You define your own float format, and then each >>> > dialect >>> > parses it and converts it to their correspondant format... Now, I do >>> > not know the format >>> > differences so I do not know which one take :). >>> >>> It can work for simple scenario but if you save a float with e120 and >>> save >>> it and you get e70 >>> then you are in trouble. >>> >>> You are not in trouble. And if you are, then you are exactlty the same >>> as >>> if you were using a literal parser. >>> You have a specification. You say that floats are written in THIS XXX >>> text >>> representation. Nobody cares how your floats are represented inside your >>> Smalltalk. For JSON you write floats in a particular way, explained by >>> the >>> JSON specification. >>> Then, when you code the parser, you will need to crate an instance of >>> Float from the string. Each dialect will know how to do that. >>> So, again, where is the problem? >>> And how the literal parser would solve it? because I think it will >>> happen the same. >>> >>> Cheers, >>> >>> >>> >>> Stef >>> >>> >>> >>> -- >>> Mariano >>> http://marianopeck.wordpress.com >>> >> >> >> >

May 10, 2012

Re: [Pharo-project] tentative schedule for the pharo conference

by Marcus Denker

On May 9, 2012, at 11:23 PM, Francisco Garau wrote: > Hi Stef - there is one hour difference between the iCal and HTML versions. this is because you are in england? > > It starts at 9am, correct? > yes. > - Francisco > > On 9 May 2012 12:20, StÃ©phane Ducasse <Stephane.Ducasse(a)inria.fr> wrote: > Hi guys > > Here is a tentative schedule for the forth coming conference. > > ICAL: > https://www.google.com/calendar/ical/2d97rjlqso704v09d49sgcsjec%40group.cal… > > HTML: > https://www.google.com/calendar/embed?src=2d97rjlqso704v09d49sgcsjec%40grou… > > > please lets us know if you have any idea feedback. > -- > > Sef > > <Screen shot 2012-05-09 at 22.19.52.png> -- Marcus Denker -- http://marcusdenker.de

May 10, 2012