October 2018 - Pharo-users - lists.pharo.org

Re: [Pharo-users] Tonel difficulty

by Esteban Lorenzano

Until yesterday, smalltalkCI was failing with Pharo 6.1 and Tonel because Tonel version present on 6.1 was too old and not adapted to latest Metacello. I made a backport yesterday (to Tonel 1.0.9) so *now* it should work (always with latest metacello). Can you verify that? Cheers, Esteban > On 7 Oct 2018, at 15:49, Cyril Ferlicot <cyril.ferlicot(a)gmail.com> wrote: > > > > On dim. 7 oct. 2018 at 15:28, Norbert Hartl <norbert(a)hartl.name <mailto:norbert@hartl.name>> wrote: > Iâve created a new repository and chose to use tonel for its file format. But as in my previous attempts I cannot make it work. > > I test my repo with travis for pharo 6.1 and pharo 7. Using > > SmalltalkCISpec { > #loading : [ > SCIMetacelloLoadSpec { > #baseline : 'ArangoDB', > #directory : 'source', > #load : [ 'Tests' ], > #platforms : [ #pharo ] > } > ] > } > > Hi, > > Can you describe the problem you get with this one please? > > > it succeeds in pharo7 and fails in pharo 6.1. I think this is because 6.1 cannot handle tonel. But using > > SmalltalkCISpec { > #loading : [ > SCIMetacelloLoadSpec { > #baseline : 'ArangoDB', > #directory : 'source', > #load : [ 'Tests' ], > #useLatestMetacello: true, > #platforms : [ #pharo ] > } > ] > } > > makes it fail in pharo 7 as well. > > Loaded -> BaselineOfMetacello-CompatibleUserName.1526690791 --- https://github.com/Metacello/metacello.git[master <https://github.com/Metacello/metacello.git%5Bmaster>] --- https://github.com/Metacello/metacello.git[master <https://github.com/Metacello/metacello.git%5Bmaster>] > <>Loading baseline of BaselineOfMetacello...MetacelloNameNotDefinedError: project group, or package named: 'FileTree' not found when used in requires: or includes: field of package: 'Metacello-FileTree' for version: baseline of BaselineOfMetacello. > <>[ MetacelloNameNotDefinedError > <> signal: > <> 'project group, or package named: ' , specName printString > <> , ' not found when used in requires: or includes: field of package: ' > <> , self name printString , ' for version: ' > <> , aVersionSpec versionString , ' of ' , aVersionSpec projectLabel > <> , '.'. > <>nil "return nil if resumed" ] in [ :specName | > Any ideas? > > Norbert > > -- > Cyril Ferlicot > https://ferlicot.fr <https://ferlicot.fr/>

Oct. 7, 2018

Re: [Pharo-users] Tonel difficulty

by Cyril Ferlicot

On dim. 7 oct. 2018 at 15:28, Norbert Hartl <norbert(a)hartl.name> wrote: > Iâve created a new repository and chose to use tonel for its file format. > But as in my previous attempts I cannot make it work. > > I test my repo with travis for pharo 6.1 and pharo 7. Using > > SmalltalkCISpec { > #loading : [ > SCIMetacelloLoadSpec { > #baseline : 'ArangoDB', > #directory : 'source', > #load : [ 'Tests' ], > #platforms : [ #pharo ] > } > ] > } > Hi, Can you describe the problem you get with this one please? > it succeeds in pharo7 and fails in pharo 6.1. I think this is because 6.1 > cannot handle tonel. But using > > SmalltalkCISpec { > #loading : [ > SCIMetacelloLoadSpec { > #baseline : 'ArangoDB', > #directory : 'source', > #load : [ 'Tests' ], > #useLatestMetacello: true, > #platforms : [ #pharo ] > } > ] > } > > makes it fail in pharo 7 as well. > > Loaded -> BaselineOfMetacello-CompatibleUserName.1526690791 --- https://github.com/Metacello/metacello.git[master] --- https://github.com/Metacello/metacello.git[master] > Loading baseline of BaselineOfMetacello...MetacelloNameNotDefinedError: project group, or package named: 'FileTree' not found when used in requires: or includes: field of package: 'Metacello-FileTree' for version: baseline of BaselineOfMetacello. > [ MetacelloNameNotDefinedError > signal: > 'project group, or package named: ' , specName printString > , ' not found when used in requires: or includes: field of package: ' > , self name printString , ' for version: ' > , aVersionSpec versionString , ' of ' , aVersionSpec projectLabel > , '.'. > nil "return nil if resumed" ] in [ :specName | > > Any ideas? > > Norbert > > -- Cyril Ferlicot https://ferlicot.fr

Oct. 7, 2018

Re: [Pharo-users] Tonel difficulty

by Sven Van Caekenberghe

> On 7 Oct 2018, at 15:27, Norbert Hartl <norbert(a)hartl.name> wrote: > > I test my repo with travis for pharo 6.1 and pharo 7. Using > > SmalltalkCISpec { > #loading : [ > SCIMetacelloLoadSpec { > #baseline : 'ArangoDB', > #directory : 'source', > #load : [ 'Tests' ], > #platforms : [ #pharo ] > } > ] > } > > it succeeds in pharo7 and fails in pharo 6.1. I think this is because 6.1 cannot handle tonel. Hmm, all the repos that I mentioned in my previous email all use Tonel and run successfully in Travis CI for 7.0 and 6.1. I have no idea why you have problems, but you can try checking out any of mine. (I did have the same problem with the #useLatestMetacello: true option). Sven

Oct. 7, 2018

Tonel difficulty

by Norbert Hartl

Iâve created a new repository and chose to use tonel for its file format. But as in my previous attempts I cannot make it work. I test my repo with travis for pharo 6.1 and pharo 7. Using SmalltalkCISpec { #loading : [ SCIMetacelloLoadSpec { #baseline : 'ArangoDB', #directory : 'source', #load : [ 'Tests' ], #platforms : [ #pharo ] } ] } it succeeds in pharo7 and fails in pharo 6.1. I think this is because 6.1 cannot handle tonel. But using SmalltalkCISpec { #loading : [ SCIMetacelloLoadSpec { #baseline : 'ArangoDB', #directory : 'source', #load : [ 'Tests' ], #useLatestMetacello: true, #platforms : [ #pharo ] } ] } makes it fail in pharo 7 as well. Loaded -> BaselineOfMetacello-CompatibleUserName.1526690791 --- https://github.com/Metacello/metacello.git[master] --- https://github.com/Metacello/metacello.git[master] <>Loading baseline of BaselineOfMetacello...MetacelloNameNotDefinedError: project group, or package named: 'FileTree' not found when used in requires: or includes: field of package: 'Metacello-FileTree' for version: baseline of BaselineOfMetacello. <>[ MetacelloNameNotDefinedError <> signal: <> 'project group, or package named: ' , specName printString <> , ' not found when used in requires: or includes: field of package: ' <> , self name printString , ' for version: ' <> , aVersionSpec versionString , ' of ' , aVersionSpec projectLabel <> , '.'. <>nil "return nil if resumed" ] in [ :specName | Any ideas? Norbert

Oct. 7, 2018

Re: [Pharo-users] Text editor + morph

by Hilaire

Hi Hannes, Thanks for the tips and the reference, which I did not know about until now. I will take a close look to it. Hilaire Le 07/10/2018 Ã 09:04, H. Hirzel a Ã©critÂ : > I would put it differently: > > Use an object and embed Text editors and DrGeo canvas objects. > This idea is taken out of a paper about literate programming by > Trygver Reenskaug > I cc him, maybe he is interested in answering. -- Dr. Geo http://drgeo.eu

Oct. 7, 2018

Re: [Pharo-users] Text editor + morph

by H. Hirzel

Hello Hilaire Your question is >> In Pharo, do we have a text editor where it is possible to embed >> arbitrary Morph object? I would put it differently: Use an object and embed Text editors and DrGeo canvas objects. This idea is taken out of a paper about literate programming by Trygver Reenskaug I cc him, maybe he is interested in answering. http://folk.uio.no/trygver/1989/1989.10.1-LiterateProgrammingOOPSLA.pdf An environment for literate Smalltalk programming He implemented a 'Galley editor'. The following is a simplified version of the idea. A TextMorph actually can work as a text editor as the following example will show. It uses a AlignmentMorph (called 'column') which has three submorphs, two of them being TextMorph objects: 1. aTextMorph 2. aDrGeoCanvas This is the result of DrGeoCanvas minimal which you implemented last week. 3. aTextMorph The text morphs are editable. Some fine tuning of TextMorph editing will be needed (pop-up menu, maybe keyboard shortcuts, alignment. But as a whole following a Squeak implementation should do the job ( http://wiki.squeak.org/squeak/837 ) The code | column box1 headingText box2 box3 ptA ptB ptC angle segA segB segC | column := AlignmentMorph newColumn cellPositioning: #topLeft. column hResizing: #shrinkWrap. column vResizing: #shrinkWrap. headingText := 'Right triangle (AE) / right-angled triangle (BE)' asText allBold. box1 := TextMorph new leftFlush. box1 contents: headingText. box1 backgroundColor: Color white. column addMorphBack: box1. c := DrGeoCanvas minimal. ptA := c point: 0@0. ptA name: 'A'. ptB := c point: 4@3. ptB name: 'B'. ptC := c point: 4@0. ptC name: 'C'. angle := c angle: ptB to: ptC to: ptA. angle show. c segment: ptC to: ptA. segA :=c segment: ptC to: ptB. segA name: 'a'. segB := c segment: ptC to: ptA. segB name: 'b'. segC := c segment: ptA to: ptB. segC name: 'c'. box2 := c. column addMorphBack: box2 view. box3 := TextMorph new leftFlush. box3 contents: 'a triangle in which one angle is a right angle'. box3 backgroundColor: Color lightGray. column addMorphBack: box3. column openInWorld. I think this road can be extended for a nice extended Dynabook implementation A stack of boxes or cells following the Jupyter notebook idea. Later on put it into a window or re-implementation of a BookMorph (a 'light version'). Maybe in Pharo there are also other TextEditors which are fine. But a TextMorph seems to do the job. Regards Hannes On 10/6/18, Hilaire <hilaire(a)drgeo.eu> wrote: > If there are no such text editor, is there a best candidate to inherit > from and extend? > > I have about no knowledge regarding the text editor implementations in > Pharo. > > Hilaire > > > Le 03/10/2018 Ã 18:31, Hilaire a Ã©crit : >> In Pharo, do we have a text editor where it is possible to embed >> arbitrary Morph object? > > -- > Dr. Geo > http://drgeo.eu > > > >

Oct. 7, 2018

Re: [Pharo-users] Pharo7, consistent image freeze/deadlock on snapshotAndQuit

by Ben Coman

> > On 26 July 2018 at 00:46, Johan Brichau <johan(a)inceptive.be> wrote: > > Hi, > > > > I ran into a freeze issue when trying to save and/or quit an image after > loading Seaside3 and Zinc (not an infrequent combination :) > > > > The cause seems to be that terminating processes in a `shutDown` handler > (called on image shutdown / snapshot) leads to a deadlock (somewhere). > > Both Comet and Zinc will send #terminate to a process when an image is > quit or saved. If I disable one of those, the deadlock does not occur. > > > > I managed to reconstruct the issue with a simple example, attached. > > > > The attached Freeze class creates two processes (that loop with a > Delay>>wait inside) in the `startUp` method (on image start). > > These processes are terminated by the shutdown method (called on image > quit/save). > > However, when you try to quit and/or save the image, you will experience > an image freeze. > > > > Iâm not familiar with the process scheduler, or anything else in this > contextâ¦ so help would be appreciated while I try to dive further into it :) > > > > To reproduce: just file in the attached file in a Pharo7 image and try > to quit. > > For reference, System Reporter output for my configuration. > > > > Any ideas? > > > > Cheers > > Johan > On Thu, 26 Jul 2018 at 19:06, Ben Coman <btc(a)openinworld.com> wrote: > I don't have a total answer, but can confirm the problem and help > characterize it. > First, great test-snippet. Really nice and concise. > > On Windows it indeed freezes my Pharo 7 image when saving the image. > > It doesn't freeze Pharo 6. > > It doesn't freeze if the test-processes are not terminated. > > It doesn't freeze if the shutdown code runs at a lower priority that > the test-processes. > i.e. it works with these added lines... > shutDown: quitting > "+" |restorePriority| > "+" restorePriority := Processor activeProcess priority. > "+" Processor activeProcess priority: 15. > Process1 ifNotNil:[ Process1 terminate ]. > Process2 ifNotNil: [Process2 terminate ]. > "+" Processor activeProcess priority: restorePriority. > Process1 := Process2 := nil > > > Does that help someone else identify the relevant changes between Pharo 6 > & 7 > to explain the behaviour in more depth. > > cheers -ben > This was being worked on in https://pharo.fogbugz.com/f/cases/22284/Freeze-during-startup >From recent discussion Vincent, I believe I've got my head fully around this... IIUC part of the shutDown/startUp was being run at highestPriority. So your case boiled down to... |process1 process2| Delay delaySchedulerClass: DelaySpinScheduler. "default < build 1273" processA := [ (Delay forSeconds: 10) wait ] forkAt: 20 named: 'processA'. processB := [ (Delay forSeconds: 10) wait ] forkAt: 20 named: 'processB'. 1 second wait. [ processA terminate. processB terminate. "image locked here" ] forkAt: Processor highestPriority. The freeze is due to the #terminate causing the curtailed block in Delay>>wait being run at highestPriority. Delay>>wait self schedule. [delaySemaphore wait] ifCurtailed: [self unschedule]. The first termination (Process A) fills the transfer variable /finishedDelay/ in DelaySpinScheduler>>unschedule: which is normally cleared by "timingSemaphore signal" waking up #handleTimerEvent: running at highestPriority. But with #unschedule: at highestPriority, co-operative scheduling within priorities instead continues execution with the second termination (Process B) which finds /finishedDelay/ still filled and spins forever with no chance of #handleTimerEvent: running to clear the transfer variable. The following instrumentation helps observe this... DelayExperimentalScheduler>>unschedule: aDelay finishedDelay == nil ifTrue: [ finishedDelay := aDelay. "...and this assignment" timingSemaphore signal. ] ifFalse: [ |context| Transcript crShow: Processor activeProcess name, ' finishedDelay not nil'. context := thisContext. [ context = nil ] whileFalse: [ Transcript crShow: ' <-- ', context printString. context := context sender ]]. which then using "Delay delaySchedulerClass: DelayExperimentalSpinScheduler" for the boiled-down-case produces... processB finishedDelay not nil <-- DelayExperimentalSpinScheduler>>unschedule: <-- Delay>>unschedule <-- [ self unschedule ] in Delay>>wait <-- Context>>resume:through: <-- BlockClosure>>ifCurtailed: <-- Delay>>wait <-- [ (Delay forSeconds: 10) wait ] in UndefinedObject>>DoIt <-- BlockClosure>>on:do: <-- BlockClosure>>ensure: <-- [ self value. Processor terminateActive ] in BlockClosure>>newProcess # POSSIBLE FIXES 1. Adding a "Processor yield" like this... DelaySpinScheduler>>unschedule: aDelay [ finishedDelay == nil ifTrue: [ finishedDelay := aDelay. timingSemaphore signal. finishedDelay ifNotNil: [ Processor yield ]. ^true. ]. true. ] whileTrue. 2. Change the #signal semantics to immediately activate a signaled process when signalled/signalling priorities are the same. Maybe like this... StackInterpreter>>resume: aProcess preemptedYieldingIf: yieldImplicitly - "Make aProcess runnable and if its priority is higher than that of the current process, preempt the current process. " + "Make aProcess runnable and if its priority is the same or higher than that of the current process, preempt the current process." | activeProc activePriority newPriority | <inline: false> activeProc := self activeProcess. activePriority := self quickFetchInteger: PriorityIndex ofObject: activeProc. newPriority := self quickFetchInteger: PriorityIndex ofObject: aProcess. - newPriority <= activePriority ifTrue: + newPriority < activePriority ifTrue: [self putToSleep: aProcess yieldingIf: true. ^false]. self putToSleep: activeProc yieldingIf: yieldImplicitly. self transferTo: aProcess. ^true 3. Switching to DelaySemaphoreScheduler which suspends the activeProcess when the transfer variable is not empty. This is default in the latest builds. @Vincent, revising what I said elsewhere that the delay scheduler must be the only process running at highestPriority, I've realised that was an assumption I'd held without detailed consideration. Perhaps that is over constrained. Now understanding better the cause of the freeze, it only affects the spin-scheduler due to its busy-loop in the methods I'd considered only ran at user-priority. So other processes running at highestPriority is probably okay, as long as they have no busy loops. cheers -ben

Oct. 7, 2018

Re: [Pharo-users] Squeak: Compiler evaluate: '3+4' Pharo equivalent = ?

by Ben Coman

On Sun, 7 Oct 2018 at 00:31, H. Hirzel <hannes.hirzel(a)gmail.com> wrote: > Hello > > What is the Pharo equivalent of the Squeak expression > > Compiler evaluate: '3+4' > The direct equivalent is OpalCompiler evaluate: '3+4' but Sven's answer is more in line with good practice. cheers -ben

Oct. 7, 2018

Citezen (bibtex) reading - issue with optional comma after last tag

by Alejandro Fernandez

Hi all, I came across Citezen and its ability to read arbitrary bibtex files. While playing around, I noticed that the version available from the Pharo catalog cannot handle the optional finishing comma after the last tag. E.g. (from http://www.bibtex.org/Format/) Just adding the trailing comma would result in a SmaCCParserError (Token not expected). @article{mrx05, auTHor = "Mr. X", Title = {Something Great}, publisher = "nob" # "ody", YEAR = 2005, } Are you aware of any newer versions of Citezen? I tried to fix it on my own, but was not able to. Yours, Alejandro - Dr. Alejandro FernÃ¡ndez LIFIA - Laboratorio de InvestigaciÃ³n y FormaciÃ³n en InformÃ¡tica Avanzada CIC - ComisiÃ³n de Investigaciones CientÃficas Facultad de InformÃ¡tica; Universidad Nacional de La Plata Calles 50 y 120 La Plata - 1900 Argentina Phone: +54 221 4228252 Ext: 222 e-mail: alejandro.fernandez(a)lifia.info.unlp.edu.ar

Oct. 6, 2018

Re: [Pharo-users] Text editor + morph

by Hilaire

If there are no such text editor, is there a best candidate to inherit from and extend? I have about no knowledge regarding the text editor implementations in Pharo. Hilaire Le 03/10/2018 Ã 18:31, Hilaire a Ã©critÂ : > In Pharo, do we have a text editor where it is possible to embed > arbitrary Morph object? -- Dr. Geo http://drgeo.eu

Oct. 6, 2018