Ah, that's Iceberg's magic proxies I think :/

On Tue, Mar 13, 2018 at 3:05 PM, Sven Van Caekenberghe <s...@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
<http://www.cnrs.fr>*


*Web:* *http://guillep.github.io* <http://guillep.github.io>

*Phone: *+33 06 52 70 66 13

Reply via email to