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

Re: [Pharo-dev] Getting all classes referenced by a method

by Tudor Girba

Indeed. I took again a look at it, and I found two bugs. The method looks like this: TBehavior>>referencedClasses "Return the set of classes that are directly referenced by my methods" | answer | answer := Set new. self methods do: [ :cm | answer addAll: ( cm literals select: [ :l | l isKindOf: Association ] thenCollect: #value ) ]. ^ answer 1. The last literal of a method because the last literal always points to the class of the method. Object methods collectAsSet: [ : cm | cm literals last value ] ==> "a Set(Object)" So, we need to ignore the last literal 2. The literals that are Associations can also point to other global literals that are not classes: (ASTCache class>>#initialize) literals allButLast select: [ :l | l isKindOf: Association ] thenCollect: #value ==> "{Smalltalk}" So, a better implementation for a method is: (Object>>#actionMap) literals *allButLast* select: [ :l | l *value* isKindOf: *Class* ] thenCollect: #value I opened a bug: https://pharo.fogbugz.com/f/cases/15550/TBehavior-referencedClasses-is-wrong Cheers, Doru On Sun, May 17, 2015 at 12:24 PM, Nicolai Hess <nicolaihess(a)web.de> wrote: > > > 2015-05-17 11:34 GMT+02:00 stepharo <stepharo(a)free.fr>: > >> >> >> Le 17/5/15 11:07, Yuriy Tymchuk a Ã©crit : >> >>> Hi, it want to rewrite the SmallLint rule which checks whether an >>> abstract class is referenced. First question is whether the rule is really >>> important, because sometimes there are abstract classes with some utility >>> class methods, so maybe we should check whether they are âinstantiatedâ >>> with #new or #basicNew. >>> >> >> indeed this rule is not really revelant. >> >> >>> Now the real question is how do you get all classes referenced by a >>> method. So instead of performing a rule check on a class, do it on a method >>> and find if any of the accessed classes is abstract. >>> >> >> check the literal frame of the methods. When a method refers to a class >> the class binding is in the literal frame of the compiled method. >> > > There is one method to get all referenced classes by a class > > Morph referencedClasses -> MorphLostFocus MorphChanged PolygonMorph > SystemWindow IdentityTransform GLMUIThemeExtraIcons RGMethodDefinition > GTObjectPrinter ..... > > It is defined by TBehavior. > > > > > > >> >> >>> Uko >>> >>> >> >> > -- www.tudorgirba.com "Every thing has its own flow"

May 17, 2015

Re: [Pharo-dev] [Ann] System monitoring for pharo images

by Ben Coman

Thanks for sharing. Running a Zinc server in an insightful way to provide data to an external monitoring tool. cheers -ben On Sun, May 17, 2015 at 2:03 PM, phil(a)highoctane.be <phil(a)highoctane.be> wrote: > Thanks for this!! > Phil > Le 17 mai 2015 01:49, "Norbert Hartl" <norbert(a)hartl.name> a Ã©crit : > >> Finally I've found some time to release some of my code I've been using >> the last years. It is a project around system monitoring. It defines system >> parameters to watch and integrates them with popular tools like munin, >> monit and nagios/icinga/... As an example the following picture shows the >> monitoring of the vm memory over a day. >> >> >> >> System monitoring is basically about monitoring system parameters in >> order to send alerts when thresholds are exceeded or to plot graphs that >> enables one to estimate further progression of image behaviour. >> >> The code is here >> >> http://smalltalkhub.com/#!/~NorbertHartl/Monitoring >> >> and an introduction article (more will follow) to it is here >> >> >> http://norbert.hartl.name/blog/2015/05/16/system-monitoring-for-pharo-image… >> >> Feedback is welcomed! >> >> Hopy you enjoy it. And bug me if you have questions or something is not >> working. >> >> Norbert >> >>

May 17, 2015

GitFiletree conf for pharo 5

by Yuriy Tymchuk

Hi, GitFiletree is not available in the configuration browser of Pharo 5. I usually load if from the meta repo for pharo 4 and it works, but can we get it in pharo 5 meta repo, because itâs a pain to manually load it :) Uko

May 17, 2015

Re: [Pharo-dev] [Pharo-users] [OT] Pharo pi machine

by Merwan Ouddane

Awesome ! I'll try this out :) On 17/05/2015 14:26, Torsten Bergmann wrote: > Got my Raspberry Pi B+ with a TontecÂ® 3.5 touch screen display > to bootstrap into Pharo. > > The Raspberry Pi from CI (https://ci.inria.fr/pharo/view/RaspberryPi/) > worked out of the box on Raspbian. Nice!

May 17, 2015

Re: [Pharo-dev] Getting all classes referenced by a method

by Nicolai Hess

2015-05-17 11:34 GMT+02:00 stepharo <stepharo(a)free.fr>: > > > Le 17/5/15 11:07, Yuriy Tymchuk a Ã©crit : > >> Hi, it want to rewrite the SmallLint rule which checks whether an >> abstract class is referenced. First question is whether the rule is really >> important, because sometimes there are abstract classes with some utility >> class methods, so maybe we should check whether they are âinstantiatedâ >> with #new or #basicNew. >> > > indeed this rule is not really revelant. > > >> Now the real question is how do you get all classes referenced by a >> method. So instead of performing a rule check on a class, do it on a method >> and find if any of the accessed classes is abstract. >> > > check the literal frame of the methods. When a method refers to a class > the class binding is in the literal frame of the compiled method. > There is one method to get all referenced classes by a class Morph referencedClasses -> MorphLostFocus MorphChanged PolygonMorph SystemWindow IdentityTransform GLMUIThemeExtraIcons RGMethodDefinition GTObjectPrinter ..... It is defined by TBehavior. > > >> Uko >> >> > >

May 17, 2015

Re: [Pharo-dev] New CogVMs available

by stepharo

Thanks Eliot! I imagine that seb is from cameroun and in the north cameroun (where french people cannot go because this is too dangerous) and Hayatou is teaching there Smalltalk since we invited him at Lille and gave him my lectures - ESUG also sent books there. Hayatou told me that the internet connection is not really good there (kind of one for the university). So this is really nice to see some of his students asking questions. And thanks for your welcome in french :) Stef Le 15/5/15 17:27, Eliot Miranda a Ã©crit : > Bonjour Seb, et bienvenue! Je suit Anglais et ma Francais et > absolument degoutant, donc je lesse pour autres d'aide vous. Mais > c'est bon d'avoire un autre person entre notre communite. Bon chance! > > 2015-05-15 0:59 GMT-07:00 seb NZOGANG <sebnzogang(a)gmail.com > <mailto:sebnzogang@gmail.com>>: > > Bonjour je suis nouveau dans la Programmation OrientÃ©e Objet sur > pharo.j'utilise la version 4.0 de pharo et j'ai une connaissance assez > avancÃ©e dans la programmation mais ce langage qui viens juste de nous > Ãªtre enseignÃ© est assez nouveau pour moi.et <http://moi.et> c'est > dans l'optique de > cet enseignement qu'il nous a Ã©tÃ© demandÃ© de programmer le jeu tÃ©tris > et je ne sai par ou commencer.merci de m'aider SVP. > > 2015-05-15 6:17 UTC+02:00, Eliot Miranda <eliot.miranda(a)gmail.com > <mailto:eliot.miranda@gmail.com>>: > > at http://www.mirandabanda.org/files/Cog/VM/VM.r3343. > > > > CogVM source as per VMMaker.oscog-eem.1303/r3343 > > > > Cogit: > > Fix the regression with #== in the StackToRegisterMappingCogit; > > a spilled constant must still be dropped from the stack. (fixes the > > width:color: MNU) > > > > Since the method zone does not scavenge PICs, the MNU method in > an MNU PIC > > entry > > cannot be young. If it is, void the cache (load 0 instead of > the method). > > -- > > best, > > Eliot > > > > > > > -- > best, > Eliot

May 17, 2015

Re: [Pharo-dev] New CogVMs available

by stepharo

Hello pay attention that - this mailing-list is english - then you are on the pharo-developers and not pharo-users mailing-list, developers means developers of Pharo itself. - you can register to the Smalltalk-fr mailing-list - do not post in randomthread! Create a new question so that people can follow a discussion. Stef Bonjour je suis nouveau dans la Programmation OrientÃ©e Objet sur pharo.j'utilise la version 4.0 de pharo et j'ai une connaissance assez avancÃ©e dans la programmation mais ce langage qui viens juste de nous Ãªtre enseignÃ© est assez nouveau pour moi.et c'est dans l'optique de cet enseignement qu'il nous a Ã©tÃ© demandÃ© de programmer le jeu tÃ©tris et je ne sai par ou commencer.merci de m'aider SVP. 2015-05-15 6:17 UTC+02:00, Eliot Miranda <eliot.miranda(a)gmail.com>: >> at http://www.mirandabanda.org/files/Cog/VM/VM.r3343. >> >> CogVM source as per VMMaker.oscog-eem.1303/r3343 >> >> Cogit: >> Fix the regression with #== in the StackToRegisterMappingCogit; >> a spilled constant must still be dropped from the stack. (fixes the >> width:color: MNU) >> >> Since the method zone does not scavenge PICs, the MNU method in an MNU PIC >> entry >> cannot be young. If it is, void the cache (load 0 instead of the method). >> -- >> best, >> Eliot >> > >

May 17, 2015

Re: [Pharo-dev] Getting all classes referenced by a method

by stepharo

Le 17/5/15 11:07, Yuriy Tymchuk a Ã©crit : > Hi, it want to rewrite the SmallLint rule which checks whether an abstract class is referenced. First question is whether the rule is really important, because sometimes there are abstract classes with some utility class methods, so maybe we should check whether they are âinstantiatedâ with #new or #basicNew. indeed this rule is not really revelant. > > Now the real question is how do you get all classes referenced by a method. So instead of performing a rule check on a class, do it on a method and find if any of the accessed classes is abstract. check the literal frame of the methods. When a method refers to a class the class binding is in the literal frame of the compiled method. > > Uko >

May 17, 2015

Re: [Pharo-dev] Manifest class values - instance or class side

by stepharo

createManifestNamed: packageName manifestClass := PackageManifest subclass: (self class manifestTag, packageName onlyLetters) asSymbol instanceVariableNames: '' classVariableNames: '' poolDictionaries: '' category: packageName. manifestClass comment: self class manifestClassComment. ^ manifestClass so this is probably a bug, RPackage>>packageManifest ^ (self classes detect: [ :each | each isManifest ] ifNone: [ TheManifestBuilder new createManifestNamed: name]) new Can you fill up an bug entry? Tx

May 17, 2015

Re: [Pharo-dev] Manifest class values - instance or class side

by stepharo

Le 15/5/15 22:48, Sergio Fedi a Ã©crit : > > âWhat about this method? > > RPackage>>packageManifest > ^ (self classes > detect: [ :each | each isManifest ] > ifNone: [ TheManifestBuilder new createManifestNamed: name]) *new* > > Anyone know why does it create an instance of the Manifest instead of > returning the class? Did you check that TheManifestBuilder do not return a class? > (or why are we using instances of Manifests in the image?) >

May 17, 2015