March 2018 - Pharo-dev - lists.pharo.org

Re: [Pharo-dev] MCMczWriter>>#flush breaks

by Guillermo Polito

On Tue, Mar 13, 2018 at 8:08 PM, Sven Van Caekenberghe <sven(a)stfx.eu> wrote: > Hi, > > I was trying to merge in Zinc changes from the latest Pharo 7 back to the > MC Zinc repos. It seems like MCMczWriter>>#flush breaks [1]. I can save to > the package cache but not to an Http repo, nor copy to it. > Guile, has this been tested, or do you no longer use the old MC ? > I do not use old MC since some time already... I'll take a look at this tomorrow morning. But if this is broken it means it was not covered by tests :/ > > Sven > > [1] > ByteString(Object)>>error: > ByteString(Object)>>errorImproperStore > ByteString>>at:put: > ZipWriteStream(WriteStream)>>nextPut: > [ :ch | self nextPut: ch ] in ZipWriteStream(DeflateStream)>>next:putAll:startingAt: > in Block: [ :ch | self nextPut: ch ] > ByteArray(SequenceableCollection)>>do: > ZipWriteStream(DeflateStream)>>next:putAll:startingAt: > ZipWriteStream(DeflateStream)>>nextPutAll: > ZipStringMember(ZipArchiveMember)>>compressDataTo: > ZipStringMember(ZipArchiveMember)>>writeDataTo: > ZipStringMember(ZipArchiveMember)>>writeTo: > [ :member | > member writeTo: stream. > member endRead ] in ZipArchive>>writeTo: in Block: [ :member | ... > OrderedCollection>>do: > ZipArchive>>writeTo: > MCMczWriter>>flush > MCMczWriter class>>fileOut:on: > MCVersion>>fileOutOn: > [ :s | aVersion fileOutOn: s ] in MCHttpRepository( > MCFileBasedRepository)>>basicStoreVersion: in Block: [ :s | aVersion > fileOutOn: s ] > MCHttpRepository>>entityStreamContents: > MCHttpRepository>>writeStreamForFileNamed:replace:do: > MCHttpRepository(MCFileBasedRepository)>>writeStreamForFileNamed:do: > MCHttpRepository(MCFileBasedRepository)>>basicStoreVersion: > MCHttpRepository(MCRepository)>>storeVersion: > MCHttpRepository(MCFileBasedRepository)>>storeVersion: > [ super storeVersion: aVersion ] in MCHttpRepository>>storeVersion: in > Block: [ super storeVersion: aVersion ] > BlockClosure>>on:do: > MCHttpRepository>>retryOnCredentialRequest: > MCHttpRepository>>storeVersion: > MCWorkingCopyBrowser>>storeVersion:in: > [ self > storeVersion: newVersion in: aRepository; > storeDependencies: newVersion in: aRepository ] in [ [ self > storeVersion: newVersion in: aRepository; > storeDependencies: newVersion in: aRepository ] > ensure: [ (MCVersionInspector new version: newVersion) show ] ] in > MCWorkingCopyBrowser>>basicSaveVersionIn: in Block: [ self... > > > -- Guille Polito Research Engineer Centre de Recherche en Informatique, Signal et Automatique de Lille CRIStAL - UMR 9189 French National Center for Scientific Research - *http://www.cnrs.fr <http://www.cnrs.fr>* *Web:* *http://guillep.github.io* <http://guillep.github.io> *Phone: *+33 06 52 70 66 13

March 13, 2018

MCMczWriter>>#flush breaks

by Sven Van Caekenberghe

Hi, I was trying to merge in Zinc changes from the latest Pharo 7 back to the MC Zinc repos. It seems like MCMczWriter>>#flush breaks [1]. I can save to the package cache but not to an Http repo, nor copy to it. Guile, has this been tested, or do you no longer use the old MC ? Sven [1] ByteString(Object)>>error: ByteString(Object)>>errorImproperStore ByteString>>at:put: ZipWriteStream(WriteStream)>>nextPut: [ :ch | self nextPut: ch ] in ZipWriteStream(DeflateStream)>>next:putAll:startingAt: in Block: [ :ch | self nextPut: ch ] ByteArray(SequenceableCollection)>>do: ZipWriteStream(DeflateStream)>>next:putAll:startingAt: ZipWriteStream(DeflateStream)>>nextPutAll: ZipStringMember(ZipArchiveMember)>>compressDataTo: ZipStringMember(ZipArchiveMember)>>writeDataTo: ZipStringMember(ZipArchiveMember)>>writeTo: [ :member | member writeTo: stream. member endRead ] in ZipArchive>>writeTo: in Block: [ :member | ... OrderedCollection>>do: ZipArchive>>writeTo: MCMczWriter>>flush MCMczWriter class>>fileOut:on: MCVersion>>fileOutOn: [ :s | aVersion fileOutOn: s ] in MCHttpRepository(MCFileBasedRepository)>>basicStoreVersion: in Block: [ :s | aVersion fileOutOn: s ] MCHttpRepository>>entityStreamContents: MCHttpRepository>>writeStreamForFileNamed:replace:do: MCHttpRepository(MCFileBasedRepository)>>writeStreamForFileNamed:do: MCHttpRepository(MCFileBasedRepository)>>basicStoreVersion: MCHttpRepository(MCRepository)>>storeVersion: MCHttpRepository(MCFileBasedRepository)>>storeVersion: [ super storeVersion: aVersion ] in MCHttpRepository>>storeVersion: in Block: [ super storeVersion: aVersion ] BlockClosure>>on:do: MCHttpRepository>>retryOnCredentialRequest: MCHttpRepository>>storeVersion: MCWorkingCopyBrowser>>storeVersion:in: [ self storeVersion: newVersion in: aRepository; storeDependencies: newVersion in: aRepository ] in [ [ self storeVersion: newVersion in: aRepository; storeDependencies: newVersion in: aRepository ] ensure: [ (MCVersionInspector new version: newVersion) show ] ] in MCWorkingCopyBrowser>>basicSaveVersionIn: in Block: [ self...

March 13, 2018

Re: [Pharo-dev] Family contact book ?

by Stephane Ducasse

:) On Tue, Mar 13, 2018 at 5:15 PM, Denis Kudriashov <dionisiydk(a)gmail.com> wrote: > Yes, it is example how access commands from World menu and by global > shortcut (there is section in Commander booklet). > > It will be disabled in next Calypso integration. > > > > 2018-03-13 17:10 GMT+01:00 Stephane Ducasse <stepharo.self(a)gmail.com>: >> >> This is an example for commander :) >> >> >> On Tue, Mar 13, 2018 at 5:08 PM, Sven Van Caekenberghe <sven(a)stfx.eu> >> wrote: >> > There is (probably an example) called 'Family contact book' in the World >> > menu ... weird. >> >

March 13, 2018

Re: [Pharo-dev] Family contact book ?

by Denis Kudriashov

Yes, it is example how access commands from World menu and by global shortcut (there is section in Commander booklet). It will be disabled in next Calypso integration. 2018-03-13 17:10 GMT+01:00 Stephane Ducasse <stepharo.self(a)gmail.com>: > This is an example for commander :) > > > On Tue, Mar 13, 2018 at 5:08 PM, Sven Van Caekenberghe <sven(a)stfx.eu> > wrote: > > There is (probably an example) called 'Family contact book' in the World > menu ... weird. > >

March 13, 2018

Re: [Pharo-dev] Family contact book ?

by Stephane Ducasse

This is an example for commander :) On Tue, Mar 13, 2018 at 5:08 PM, Sven Van Caekenberghe <sven(a)stfx.eu> wrote: > There is (probably an example) called 'Family contact book' in the World menu ... weird.

March 13, 2018

Family contact book ?

by Sven Van Caekenberghe

There is (probably an example) called 'Family contact book' in the World menu ... weird.

March 13, 2018

[Pharo 7.0-dev] Build #694: 21528-Improving-the-Quality-of-the-Bootstrap-process

by ci-pharo-ci-jenkins2＠inria.fr

There is a new Pharo build available! The status of the build #694 was: SUCCESS. The Pull Request #1054 was integrated: "21528-Improving-the-Quality-of-the-Bootstrap-process" Pull request url: https://github.com/pharo-project/pharo/pull/1054 Issue Url: https://pharo.fogbugz.com/f/cases/21528 Build Url: https://ci.inria.fr/pharo-ci-jenkins2/job/Test%20pending%20pull%20request%2…

March 13, 2018

Re: [Pharo-dev] Error opening Zinc MC repository in latest Pharo 7

by Sven Van Caekenberghe

OK, I have a working MC browser again, thanks. > On 13 Mar 2018, at 16:13, Pavel Krivanek <pavel.krivanek(a)gmail.com> wrote: > > Switch to the remotes view and do fetch from the pharo-project > repository. Anyway, this should be not an issue, because as soon as > you will try to create a branch for a new issue, this step should be > done automatically. > > -- Pavel > > 2018-03-13 16:02 GMT+01:00 Sven Van Caekenberghe <sven(a)stfx.eu>: >> I did: >> >> (IceRepositoryCreator new >> location: '/Users/sven/Develop/git/pharo' asFileReference; >> subdirectory: 'src'; >> createRepository) >> register. >> >> But than it says it is out of sync (my local copy is still on an old branch), what is the easiest way to sync up locally (command line) ? >> >>> On 13 Mar 2018, at 15:53, Pavel Krivanek <pavel.krivanek(a)gmail.com> wrote: >>> >>> Hi, try firstly to register the local Pharo repository. For me it something like >>> >>> location := '/tmp/ramdisk/pharo'. >>> (IceRepositoryCreator new >>> location: location asFileReference; >>> subdirectory: 'src'; >>> createRepository) >>> register. >>> >>> --- Pavel >>> >>> >>> >>> 2018-03-13 15:40 GMT+01:00 Sven Van Caekenberghe <sven(a)stfx.eu>: >>>> Well it is so magic that I do not understand what is happening ... >>>> >>>>> On 13 Mar 2018, at 15:32, Guillermo Polito <guillermopolito(a)gmail.com> wrote: >>>>> >>>>> Ah, that's Iceberg's magic proxies I think :/ >>>>> >>>>> On Tue, Mar 13, 2018 at 3:05 PM, Sven Van Caekenberghe <sven(a)stfx.eu> wrote: >>>>> For some reason I can no longer open Zinc's old school MC repository in Pharo-7.0+alpha.build.690.sha.ffd58dcc88a0698be21b52b565a86316799cb25d (32 Bit) >>>>> >>>>> MCHttpRepository >>>>> location: 'http://mc.stfx.eu/ZincHTTPComponents' >>>>> user: '' >>>>> password: ''. >>>>> >>>>>> Open repository (browser UI) >>>>> >>>>> gives me a DNU see [1] >>>>> >>>>> I just don't see what is wrong, maybe it has to do with the latest commit in the repo, (it took a git version number from the image as ancestor), but this code is hard to look at. >>>>> >>>>> Now I am stuck trying to fix a problem with Zinc. >>>>> >>>>> Any help would be appreciated, >>>>> >>>>> Sven >>>>> >>>>> [1] >>>>> >>>>> UndefinedObject(Object)>>doesNotUnderstand: #< >>>>> [ :ancestor | >>>>> (ancestor versionNumber < aVersionArray third >>>>> or: [ ancestor versionNumber = aVersionArray third >>>>> and: [ ancestor author ~= aVersionArray second ] ]) >>>>> ifTrue: [ newer add: ancestor name ] ] in [ :aVersionArray | >>>>> workingCopy ancestors >>>>> do: [ :ancestor | >>>>> (ancestor versionNumber < aVersionArray third >>>>> or: [ ancestor versionNumber = aVersionArray third >>>>> and: [ ancestor author ~= aVersionArray second ] ]) >>>>> ifTrue: [ newer add: ancestor name ] ] ] in [ :workingCopy | >>>>> | versionsForPackage | >>>>> workingCopy ancestors do: [ :ancestor | loaded add: ancestor name ]. >>>>> versionsForPackage := versions >>>>> select: [ :v | v first = workingCopy package name ]. >>>>> versionsForPackage >>>>> do: [ :aVersionArray | >>>>> workingCopy ancestors >>>>> do: [ :ancestor | >>>>> (ancestor versionNumber < aVersionArray third >>>>> or: [ ancestor versionNumber = aVersionArray third >>>>> and: [ ancestor author ~= aVersionArray second ] ]) >>>>> ifTrue: [ newer add: ancestor name ] ] ] ] in MCFileRepositoryInspector>>refresh in Block: [ :ancestor | ... >>>>> Array(SequenceableCollection)>>do: >>>>> [ :aVersionArray | >>>>> workingCopy ancestors >>>>> do: [ :ancestor | >>>>> (ancestor versionNumber < aVersionArray third >>>>> or: [ ancestor versionNumber = aVersionArray third >>>>> and: [ ancestor author ~= aVersionArray second ] ]) >>>>> ifTrue: [ newer add: ancestor name ] ] ] in [ :workingCopy | >>>>> | versionsForPackage | >>>>> workingCopy ancestors do: [ :ancestor | loaded add: ancestor name ]. >>>>> versionsForPackage := versions >>>>> select: [ :v | v first = workingCopy package name ]. >>>>> versionsForPackage >>>>> do: [ :aVersionArray | >>>>> workingCopy ancestors >>>>> do: [ :ancestor | >>>>> (ancestor versionNumber < aVersionArray third >>>>> or: [ ancestor versionNumber = aVersionArray third >>>>> and: [ ancestor author ~= aVersionArray second ] ]) >>>>> ifTrue: [ newer add: ancestor name ] ] ] ] in MCFileRepositoryInspector>>refresh in Block: [ :aVersionArray | ... >>>>> Array(SequenceableCollection)>>do: >>>>> [ :workingCopy | >>>>> | versionsForPackage | >>>>> workingCopy ancestors do: [ :ancestor | loaded add: ancestor name ]. >>>>> versionsForPackage := versions >>>>> select: [ :v | v first = workingCopy package name ]. >>>>> versionsForPackage >>>>> do: [ :aVersionArray | >>>>> workingCopy ancestors >>>>> do: [ :ancestor | >>>>> (ancestor versionNumber < aVersionArray third >>>>> or: [ ancestor versionNumber = aVersionArray third >>>>> and: [ ancestor author ~= aVersionArray second ] ]) >>>>> ifTrue: [ newer add: ancestor name ] ] ] ] in MCFileRepositoryInspector>>refresh in Block: [ :workingCopy | ... >>>>> Array(SequenceableCollection)>>do: >>>>> MCFileRepositoryInspector>>refresh >>>>> [ self refresh. >>>>> MCWorkingCopy addDependent: self ] in MCFileRepositoryInspector>>setRepository:workingCopy: in Block: [ self refresh.... >>>>> [ self value. >>>>> Processor terminateActive ] in BlockClosure>>newProcess in Block: [ self value.... >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> -- >>>>> >>>>> Guille Polito >>>>> Research Engineer >>>>> >>>>> Centre de Recherche en Informatique, Signal et Automatique de Lille >>>>> CRIStAL - UMR 9189 >>>>> French National Center for Scientific Research - http://www.cnrs.fr >>>>> >>>>> Web: http://guillep.github.io >>>>> Phone: +33 06 52 70 66 13 >>>> >>>> >>> >> >> >

March 13, 2018

[Pharo 7.0-dev] Build #693: 21522-Better-support-for-write-barrier-in-MirrorPrimitives

by ci-pharo-ci-jenkins2＠inria.fr

There is a new Pharo build available! The status of the build #693 was: SUCCESS. The Pull Request #1050 was integrated: "21522-Better-support-for-write-barrier-in-MirrorPrimitives" Pull request url: https://github.com/pharo-project/pharo/pull/1050 Issue Url: https://pharo.fogbugz.com/f/cases/21522 Build Url: https://ci.inria.fr/pharo-ci-jenkins2/job/Test%20pending%20pull%20request%2…

March 13, 2018

Re: [Pharo-dev] Error opening Zinc MC repository in latest Pharo 7

by Pavel Krivanek

Switch to the remotes view and do fetch from the pharo-project repository. Anyway, this should be not an issue, because as soon as you will try to create a branch for a new issue, this step should be done automatically. -- Pavel 2018-03-13 16:02 GMT+01:00 Sven Van Caekenberghe <sven(a)stfx.eu>: > I did: > > (IceRepositoryCreator new > location: '/Users/sven/Develop/git/pharo' asFileReference; > subdirectory: 'src'; > createRepository) > register. > > But than it says it is out of sync (my local copy is still on an old branch), what is the easiest way to sync up locally (command line) ? > >> On 13 Mar 2018, at 15:53, Pavel Krivanek <pavel.krivanek(a)gmail.com> wrote: >> >> Hi, try firstly to register the local Pharo repository. For me it something like >> >> location := '/tmp/ramdisk/pharo'. >> (IceRepositoryCreator new >> location: location asFileReference; >> subdirectory: 'src'; >> createRepository) >> register. >> >> --- Pavel >> >> >> >> 2018-03-13 15:40 GMT+01:00 Sven Van Caekenberghe <sven(a)stfx.eu>: >>> Well it is so magic that I do not understand what is happening ... >>> >>>> On 13 Mar 2018, at 15:32, Guillermo Polito <guillermopolito(a)gmail.com> wrote: >>>> >>>> Ah, that's Iceberg's magic proxies I think :/ >>>> >>>> On Tue, Mar 13, 2018 at 3:05 PM, Sven Van Caekenberghe <sven(a)stfx.eu> wrote: >>>> For some reason I can no longer open Zinc's old school MC repository in Pharo-7.0+alpha.build.690.sha.ffd58dcc88a0698be21b52b565a86316799cb25d (32 Bit) >>>> >>>> MCHttpRepository >>>> location: 'http://mc.stfx.eu/ZincHTTPComponents' >>>> user: '' >>>> password: ''. >>>> >>>>> Open repository (browser UI) >>>> >>>> gives me a DNU see [1] >>>> >>>> I just don't see what is wrong, maybe it has to do with the latest commit in the repo, (it took a git version number from the image as ancestor), but this code is hard to look at. >>>> >>>> Now I am stuck trying to fix a problem with Zinc. >>>> >>>> Any help would be appreciated, >>>> >>>> Sven >>>> >>>> [1] >>>> >>>> UndefinedObject(Object)>>doesNotUnderstand: #< >>>> [ :ancestor | >>>> (ancestor versionNumber < aVersionArray third >>>> or: [ ancestor versionNumber = aVersionArray third >>>> and: [ ancestor author ~= aVersionArray second ] ]) >>>> ifTrue: [ newer add: ancestor name ] ] in [ :aVersionArray | >>>> workingCopy ancestors >>>> do: [ :ancestor | >>>> (ancestor versionNumber < aVersionArray third >>>> or: [ ancestor versionNumber = aVersionArray third >>>> and: [ ancestor author ~= aVersionArray second ] ]) >>>> ifTrue: [ newer add: ancestor name ] ] ] in [ :workingCopy | >>>> | versionsForPackage | >>>> workingCopy ancestors do: [ :ancestor | loaded add: ancestor name ]. >>>> versionsForPackage := versions >>>> select: [ :v | v first = workingCopy package name ]. >>>> versionsForPackage >>>> do: [ :aVersionArray | >>>> workingCopy ancestors >>>> do: [ :ancestor | >>>> (ancestor versionNumber < aVersionArray third >>>> or: [ ancestor versionNumber = aVersionArray third >>>> and: [ ancestor author ~= aVersionArray second ] ]) >>>> ifTrue: [ newer add: ancestor name ] ] ] ] in MCFileRepositoryInspector>>refresh in Block: [ :ancestor | ... >>>> Array(SequenceableCollection)>>do: >>>> [ :aVersionArray | >>>> workingCopy ancestors >>>> do: [ :ancestor | >>>> (ancestor versionNumber < aVersionArray third >>>> or: [ ancestor versionNumber = aVersionArray third >>>> and: [ ancestor author ~= aVersionArray second ] ]) >>>> ifTrue: [ newer add: ancestor name ] ] ] in [ :workingCopy | >>>> | versionsForPackage | >>>> workingCopy ancestors do: [ :ancestor | loaded add: ancestor name ]. >>>> versionsForPackage := versions >>>> select: [ :v | v first = workingCopy package name ]. >>>> versionsForPackage >>>> do: [ :aVersionArray | >>>> workingCopy ancestors >>>> do: [ :ancestor | >>>> (ancestor versionNumber < aVersionArray third >>>> or: [ ancestor versionNumber = aVersionArray third >>>> and: [ ancestor author ~= aVersionArray second ] ]) >>>> ifTrue: [ newer add: ancestor name ] ] ] ] in MCFileRepositoryInspector>>refresh in Block: [ :aVersionArray | ... >>>> Array(SequenceableCollection)>>do: >>>> [ :workingCopy | >>>> | versionsForPackage | >>>> workingCopy ancestors do: [ :ancestor | loaded add: ancestor name ]. >>>> versionsForPackage := versions >>>> select: [ :v | v first = workingCopy package name ]. >>>> versionsForPackage >>>> do: [ :aVersionArray | >>>> workingCopy ancestors >>>> do: [ :ancestor | >>>> (ancestor versionNumber < aVersionArray third >>>> or: [ ancestor versionNumber = aVersionArray third >>>> and: [ ancestor author ~= aVersionArray second ] ]) >>>> ifTrue: [ newer add: ancestor name ] ] ] ] in MCFileRepositoryInspector>>refresh in Block: [ :workingCopy | ... >>>> Array(SequenceableCollection)>>do: >>>> MCFileRepositoryInspector>>refresh >>>> [ self refresh. >>>> MCWorkingCopy addDependent: self ] in MCFileRepositoryInspector>>setRepository:workingCopy: in Block: [ self refresh.... >>>> [ self value. >>>> Processor terminateActive ] in BlockClosure>>newProcess in Block: [ self value.... >>>> >>>> >>>> >>>> >>>> >>>> >>>> -- >>>> >>>> Guille Polito >>>> Research Engineer >>>> >>>> Centre de Recherche en Informatique, Signal et Automatique de Lille >>>> CRIStAL - UMR 9189 >>>> French National Center for Scientific Research - http://www.cnrs.fr >>>> >>>> Web: http://guillep.github.io >>>> Phone: +33 06 52 70 66 13 >>> >>> >> > >

March 13, 2018