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

Re: [Pharo-project] Issue loading NB

by Igor Stasenko

On 3 May 2012 16:53, Guido Chari <charig(a)gmail.com> wrote: > That works, that was what i had done earlier. > > But as NB is not included in Pharo, and has its wiki page with it own > documentation on how to install it (first link in google if you search for > nativeboost) it may be important or to change the installation instructions > or to make them work? Sure thing :) Actually there is no reason why old way should stop working.. i will just need to change the code to load ConfigurationOfNativeBoost package, since before it was assumed that config in same package (NBInstaller). > > Cheers, > Guido. > > 2012/5/3 Camillo Bruni <camillobruni(a)gmail.com> >> >> AFAIK just using ConfigurationOfNativeBoost works. >> I removed NativeBoostInstaller since this is not the common way to install >> stuff in pharo. >> >> can you try to do >> >> ConfigurationOfNativeBoost loadDevelopment >> >> best >> cami >> >> On 2012-05-03, at 15:12, Guido Chari wrote: >> >> > NativeBoost installer is not loading ConfigurationOfNativeBoost. >> > So the command: 'NBInstaller install' is not working. >> > >> > Cheers, >> > Guido. >> >> > -- Best regards, Igor Stasenko.

May 3, 2012

Re: [Pharo-project] NativeBoost help

by Igor Stasenko

On 2 May 2012 18:40, Luc Fabresse <luc.fabresse(a)gmail.com> wrote: > Hi Igor and other NB Gurus, > > Â A group of students is trying to use NativeBoost to wrap the OpenCV C image > library. > Â The problem we are facing is that the function cvSize return a struct. > > Â Â Â typedef struct { int width; int height; } CvSize; > Â Â Â CV_INLINE Â CvSize Â cvSize( int width, int height ); > > Â But the NBExternalStructure seems to not support that if I understood > correctly. > > Â Â Â NBExternalStructure>>coerceReturn: gen > Â Â Â " ... should we support handling return of external structures? " > Â Â Â self error: 'returning pointer to structure?' > > Â Did I miss something? > Â Any idea or workaround? > there is a workaround. all structs in C is returned via pointer. so, actually a true return type of a function is CvSize* so, what you do is to change the return value to simple void* and then copy the contents of struct into instance of corresponding NBExternalStructure subclass using #fromPointer: method.. to conveniently access its fields values. but this is in general, in your case this function is actually inlined by compiler (as CV_INLINE suggests), so there could be even no exported symbol for it in dynamic library. and the function is actually so simple, that you don't need to wrap it at all. you can just create a subclass of NBExternalStructure , named CvSize, implement fieldDesc method as: fieldsDesc ^ #( int width; int height ) and if you invoke: CvSize new width: 1 height:2 it will be equivalent as if you will call cvSize(1,2) function. > Â Thanks, > > Luc -- Best regards, Igor Stasenko.

May 3, 2012

Re: [Pharo-project] Pharo 2.0: Just need a recompileAll or a real problem in background?

by StÃ©phane Ducasse

Mariano did you add a nice comment to the test because I love when I can read a nice explanation like the one of eliot and then only read the code :). Stef On May 3, 2012, at 6:49 PM, Mariano Martinez Peck wrote: > > > Ok. If I understand this correctly, this is yet ANOTHER thing to test, right? I mean, it does not cover my original problem but another one possible ;) > right? > > I was assuming that my test is a superset of yours, but now I see it is not strict enough. It also needs to compare bindings to see that they're identical. I've attached a stricter version. This says that for any global, it should match either the class's notion of what bindingOf: the key is, or bindingOf: should be nil and the binding should be in Undeclared. If the class answers a different binding through bindingOf: or answers no binding and the binding is not in Undeclared then the variable in the method is wrong. > > > Ok, now we agree :) > I commited this version and removed my previous test. > > Thanks! > > > methodsWithUnboundGlobals > "Get all methods that use undeclared global objects that are not listed in Undeclared. For a clean image the result should be empty." > > "SystemNavigation new methodsWithUnboundGlobals" > > ^self allSelect: > [:m| > m literals anySatisfy: > [:l| > l isVariableBinding > and: [l key isSymbol "avoid class-side methodClass literals" > and: [(m methodClass bindingOf: l key) > ifNil: [(Undeclared associationAt: l key ifAbsent: []) ~~ l] > ifNotNil: [:b| b ~~ l]]]]] > > > So I think with this stricter definition self assert: SystemNavigation new methodsWithUnboundGlobals isEmpty is an adequate test. > > > Thanks Eliot. > > > > And I have 6 methods from the classes SmalltalkImage and ScriptLoader and all the 6 literals are pointing to ScriptLoader. So something weird happened with this class. > Any idea? > > For the moment I will update the test and do a Compiler recompileAll. > > > > > > Association >> #literalEqual: otherLiteral > > "Answer true if the receiver and otherLiteral represent the same > > literal. > > Variable bindings are literally equals only if identical. > > This is how variable sharing works, by preserving identity and changing > > only the value." > > ^self == otherLiteral > > > > instead of the Object implementation. > > > > > >> > >> On 1 May 2012 17:52, Mariano Martinez Peck <marianopeck(a)gmail.com> wrote: > >>> > >>> (Smalltalk globals associationAt: #ScriptLoader) == ((SmalltalkImage >> > >>> #shrinkToCore) literalAt: 4) > >>> gives false when it should be true. If I do a Compiler recompileAll it > >>> gets fixed. So, my question is, is that normal? how could that happen? > >>> is there any real problem behind? > >>> > >>> anyway, can we do a recompileAll for the moment? > >>> > >>> thanks! > >>> > >>> -- > >>> Mariano > >>> http://marianopeck.wordpress.com > >>> > >> > > > > > > > > -- > > Mariano > > http://marianopeck.wordpress.com > > > > > > -- > Best regards, > Igor Stasenko. > > > > > -- > Mariano > http://marianopeck.wordpress.com > > > > > -- > Mariano > http://marianopeck.wordpress.com > > > > > -- > best, > Eliot > > > > > -- > Mariano > http://marianopeck.wordpress.com > > > > > -- > best, > Eliot > > > > > -- > Mariano > http://marianopeck.wordpress.com >

May 3, 2012

Re: [Pharo-project] [update 2.0] #20039

by StÃ©phane Ducasse

So now we will have to put in place a process that load pharo for example from pavel image and load the configuration. I think that this is what we will work on with esteban soon. > I asked for this so many times...the answer was "it will be ready before releasing Pharo 2.0". So far I tried unloading ECompletion and I failed. Strange probably because when we cleaned it it was mainly to load it on top and not been part of the image and because because because there are overridden methods. Stef

May 3, 2012

Re: [Pharo-project] multiple pharo images

by StÃ©phane Ducasse

On May 2, 2012, at 11:20 PM, Francisco Garau wrote: > How about Jenkins putting a build suffix to the images? -- something like Pharo-2.0.build-20040.image + 1 :) > > At the moment, all the build generate files with the same name. > > https://ci.lille.inria.fr/pharo/job/Pharo-2.0/41/ > > 2.0 #20040 > > Pharo-2.0.changes 13069724 > Pharo-2.0.image 18732936 > Pharo-2.0-one-click.zip 19242637 > Pharo-2.0.zip 14962904

May 3, 2012

Re: [Pharo-project] NativeBoost help

by StÃ©phane Ducasse

Igor is on vacation right now. I mean real vacation - no computer :) Stef On May 2, 2012, at 6:40 PM, Luc Fabresse wrote: > Hi Igor and other NB Gurus, > > A group of students is trying to use NativeBoost to wrap the OpenCV C image library. > The problem we are facing is that the function cvSize return a struct. > > typedef struct { int width; int height; } CvSize; > CV_INLINE CvSize cvSize( int width, int height ); > > But the NBExternalStructure seems to not support that if I understood correctly. > > NBExternalStructure>>coerceReturn: gen > " ... should we support handling return of external structures? " > self error: 'returning pointer to structure?' > > Did I miss something? > Any idea or workaround? > > Thanks, > > Luc

May 3, 2012

Re: [Pharo-project] [squeak-dev] The Trunk: Kernel-eem.684.mcz

by StÃ©phane Ducasse

I saw I'm just in a place without internet right now :) Stef On May 2, 2012, at 4:59 PM, Mariano Martinez Peck wrote: > Hi stef. Eliot send us (me and marcus) a private email about these changes and a suggestion for Fuel. > Marcus has already integrates all of these new methods ;) > > On Wed, May 2, 2012 at 4:45 PM, StÃ©phane Ducasse <stephane.ducasse(a)inria.fr> wrote: > > > Begin forwarded message: > >> From: pharo-project-owner(a)lists.gforge.inria.fr >> Subject: Fwd: [squeak-dev] The Trunk: Kernel-eem.684.mcz >> Date: April 30, 2012 6:48:24 PM GMT+02:00 >> To: stephane.ducasse(a)gmail.com >> >> You are not allowed to post to this mailing list, and your message has >> been automatically rejected. If you think that your messages are >> being rejected in error, contact the mailing list owner at >> pharo-project-owner(a)lists.gforge.inria.fr. >> >> >> From: stephane ducasse <stephane.ducasse(a)gmail.com> >> Subject: Fwd: [squeak-dev] The Trunk: Kernel-eem.684.mcz >> Date: April 30, 2012 6:46:40 PM GMT+02:00 >> To: Pharo Development <Pharo-project(a)lists.gforge.inria.fr> >> >> >> >> >> Begin forwarded message: >> >>> From: commits(a)source.squeak.org >>> Subject: [squeak-dev] The Trunk: Kernel-eem.684.mcz >>> Date: April 26, 2012 6:07:56 PM GMT+02:00 >>> To: squeak-dev(a)lists.squeakfoundation.org, packages(a)lists.squeakfoundation.org >>> Reply-To: squeak-dev(a)lists.squeakfoundation.org >>> >>> Eliot Miranda uploaded a new version of Kernel to project The Trunk: >>> http://source.squeak.org/trunk/Kernel-eem.684.mcz >>> >>> ==================== Summary ==================== >>> >>> Name: Kernel-eem.684 >>> Author: eem >>> Time: 26 April 2012, 11:07:37.737 am >>> UUID: e838a325-27ec-4a62-a907-d4059451a046 >>> Ancestors: Kernel-nice.683 >>> >>> Implement endPC numArgs and numTemps for closures >>> and contexts (both block and method activations). >>> Provide CompiledMethod>abstractBytecodeMessagesDo: >>> et al. >>> Implement BlockClosure>isClean to identify self-contained blocks. >>> >>> =============== Diff against Kernel-nice.683 =============== >>> >>> Item was added: >>> + ----- Method: BlockClosure>>abstractBytecodeMessagesDo: (in category 'scanning') ----- >>> + abstractBytecodeMessagesDo: aBlock >>> + "Evaluate aBlock with the sequence of abstract bytecodes in the receiver." >>> + self method >>> + abstractBytecodeMessagesFrom: startpc >>> + to: self endPC >>> + do: aBlock >>> + >>> + "| msgs | >>> + msgs := OrderedCollection new. >>> + (SortedCollection sortBlock: [:a :b| a compare: b caseSensitive: false]) sortBlock >>> + abstractBytecodeMessagesDo: [:msg| msgs add: msg selector]. >>> + msgs"! >>> >>> Item was added: >>> + ----- Method: BlockClosure>>blockCreationBytecodeMessage (in category 'scanning') ----- >>> + blockCreationBytecodeMessage >>> + "Answer the abstract bytecode message that created the receiver." >>> + | blockCreationBytecodeSize | >>> + ^self method abstractBytecodeMessageAt: startpc - (blockCreationBytecodeSize := 4) >>> + >>> + "(SortedCollection sortBlock: [:a :b| a compare: b caseSensitive: false]) sortBlock blockCreationBytecodeMessage"! >>> >>> Item was added: >>> + ----- Method: BlockClosure>>endPC (in category 'accessing') ----- >>> + endPC >>> + ^self blockCreationBytecodeMessage arguments last + startpc - 1! >>> >>> Item was changed: >>> ----- Method: BlockClosure>>hasMethodReturn (in category 'testing') ----- >>> hasMethodReturn >>> "Answer whether the receiver has a method-return ('^') in its code." >>> + | scanner endpc | >>> + scanner := InstructionStream new method: outerContext method pc: startpc. >>> + endpc := self endPC. >>> + scanner scanFor: [:byte | (byte between: 120 and: 124) or: [scanner pc > endpc]]. >>> + ^scanner pc <= endpc! >>> - | myMethod scanner preceedingBytecodeMessage end | >>> - "Determine end of block from the instruction preceding it. >>> - Find the instruction by using an MNU handler to capture >>> - the instruction message sent by the scanner." >>> - myMethod := outerContext method. >>> - scanner := InstructionStream new method: myMethod pc: myMethod initialPC. >>> - [scanner pc < startpc] whileTrue: >>> - [[scanner interpretNextInstructionFor: nil] >>> - on: MessageNotUnderstood >>> - do: [:ex| preceedingBytecodeMessage := ex message]]. >>> - end := preceedingBytecodeMessage arguments last + startpc - 1. >>> - scanner method: myMethod pc: startpc. >>> - scanner scanFor: [:byte | (byte between: 120 and: 124) or: [scanner pc > end]]. >>> - ^scanner pc <= end! >>> >>> Item was added: >>> + ----- Method: BlockClosure>>isClean (in category 'testing') ----- >>> + isClean >>> + "Answer if the receiver does not close-over any variables other than globals, and does >>> + not ^-return (does not close over the home context). Clean blocks are amenable to >>> + being created at compile-time." >>> + self numCopiedValues > 0 ifTrue: >>> + [^false]. >>> + self abstractBytecodeMessagesDo: >>> + [:msg| >>> + (#( pushReceiver >>> + pushReceiverVariable: popIntoReceiverVariable: storeIntoReceiverVariable: >>> + methodReturnConstant: methodReturnReceiver methodReturnTop) >>> + includes: msg selector) ifTrue: >>> + [^false]]. >>> + ^true >>> + >>> + "clean:" >>> + "[] isClean" >>> + "[:a :b| a < b] isClean" >>> + "unclean" >>> + "[^nil] isClean" >>> + "[self class] isClean" >>> + "| v | v := 0. >>> + [v class] isClean"! >>> >>> Item was added: >>> + ----- Method: BlockClosure>>numTemps (in category 'accessing') ----- >>> + numTemps >>> + "Answer the number of temporaries for the receiver; this includes >>> + the number of arguments and the number of copied values." >>> + | blockCreationBytecodeSize | >>> + ^self numCopiedValues >>> + + self numArgs >>> + + (BlockLocalTempCounter >>> + tempCountForBlockAt: startpc - (blockCreationBytecodeSize := 4) >>> + in: self method)! >>> >>> Item was added: >>> + ----- Method: CompiledMethod>>abstractBytecodeMessageAt: (in category 'scanning') ----- >>> + abstractBytecodeMessageAt: pc >>> + "Answer the abstract bytecode message at pc in the receiver." >>> + ^[(InstructionStream new method: self pc: pc) interpretNextInstructionFor: nil] >>> + on: MessageNotUnderstood >>> + do: [:ex| ex message]! >>> >>> Item was added: >>> + ----- Method: CompiledMethod>>abstractBytecodeMessagesDo: (in category 'scanning') ----- >>> + abstractBytecodeMessagesDo: aBlock >>> + "Evaluate aBlock with the sequence of abstract bytecodes in the receiver" >>> + self abstractBytecodeMessagesFrom: self initialPC >>> + to: self endPC >>> + do: aBlock >>> + >>> + "| msgs | >>> + msgs := OrderedCollection new. >>> + CompiledMethod >> #abstractBytecodeMessagesFrom:to: abstractBytecodeMessagesDo: >>> + [:msg| msgs add: msg selector]. >>> + msgs"! >>> >>> Item was added: >>> + ----- Method: CompiledMethod>>abstractBytecodeMessagesFrom:to:do: (in category 'scanning') ----- >>> + abstractBytecodeMessagesFrom: startpc to: endpc do: aBlock >>> + "Evaluate aBlock with the sequence of abstract bytecodes from startpc through endpc in the receiver" >>> + | scanner | >>> + scanner := InstructionStream new method: self pc: startpc. >>> + [scanner pc <= endpc] whileTrue: >>> + [[scanner interpretNextInstructionFor: nil] >>> + on: MessageNotUnderstood >>> + do: [:ex| aBlock value: ex message]] >>> + >>> + "| m msgs | >>> + msgs := OrderedCollection new. >>> + (m := CompiledMethod >> #abstractBytecodeMessagesFrom:to:) >>> + abstractBytecodeMessagesFrom: m initialPC >>> + to: m endPC >>> + do: [:msg| msgs add: msg selector]. >>> + msgs"! >>> >>> Item was added: >>> + ----- Method: MethodContext>>endPC (in category 'private') ----- >>> + endPC >>> + ^closureOrNil >>> + ifNil: [self method endPC] >>> + ifNotNil: [closureOrNil endPC]! >>> >>> Item was added: >>> + ----- Method: MethodContext>>numArgs (in category 'accessing') ----- >>> + numArgs >>> + "Answer the number of arguments for this activation." >>> + ^closureOrNil >>> + ifNil: [method numArgs] >>> + ifNotNil: [closureOrNil numArgs]! >>> >>> Item was added: >>> + ----- Method: MethodContext>>numTemps (in category 'accessing') ----- >>> + numTemps >>> + "Answer the number of temporaries for this activation; this includes >>> + the number of arguments, and for blocks, the number of copied values." >>> + ^closureOrNil >>> + ifNil: [method numTemps] >>> + ifNotNil: [closureOrNil numTemps]! >>> >>> >> >> >> >> > > > > > -- > Mariano > http://marianopeck.wordpress.com >

May 3, 2012

[Pharo-project] ZTimestamp

by Sven Van Caekenberghe

Hi All, I don't like DateAndTime and/or TimeStamp a lot because it forces nanosecond precision and timezones on me, while in most cases I only want second precision and no timezones. Futhermore the class has some quirks that make it hard to understand. So last month I wrote my own, independent, more efficient ZTimestamp. As an experiment, I am releasing it like this: https://github.com/svenvc/ztimestamp I think Dale is really on to something with filetree, git and github. Check it out! Regards, Sven -- Sven Van Caekenberghe http://stfx.eu Smalltalk is the Red Pill

May 3, 2012

Re: [Pharo-project] Adding hooks for well known events in morphic

by GastÃ³n Dall' Oglio

2012/5/2 StÃ©phane Ducasse <stephane.ducasse(a)inria.fr> > > I do not see the difference between signals and event. For that reason, I meant about possibility of reuse this existing implementation, if it was useful for your objectives of course. > And yes we look at the code, it is not a really good idea to use > thisContext for every little notifications. > I see, that is not good :) Maybe that explained the slow result in the benchmark at the below table in that page (Signals doc), compared to Announcement. Regards

May 3, 2012

Re: [Pharo-project] What about making the configuration browser more visible?

by Schwab,Wilhelm K

Sounds great!! ________________________________________ From: pharo-project-bounces(a)lists.gforge.inria.fr [pharo-project-bounces(a)lists.gforge.inria.fr] on behalf of StÃ©phane Ducasse [stephane.ducasse(a)inria.fr] Sent: Wednesday, May 02, 2012 1:37 PM To: Pharo-project(a)lists.gforge.inria.fr Subject: Re: [Pharo-project] What about making the configuration browser more visible? Let me repeat it again (reread the vision document) we will put in place a process that: - check all the configurations of a given repository (for each versions) so for example for MetaRepoForPharo1.4 and MetaRepoForPharo20â¦ - each configuration will be loaded, test runs, rules executed. - we will have inbox for each repository, - if a configuration does not pass, it will move the configurations into an outbox Then people will be able to load configurations that have been loaded and verified. Stef

May 3, 2012