Pharo-dev
By thread
pharo-dev@lists.pharo.org
By month
Messages by month
- ----- 2026 -----
- July
- June
- May
- April
- March
- February
- January
- ----- 2025 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2024 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2023 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2022 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2021 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2020 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2019 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2018 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2017 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2016 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2015 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2014 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2013 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2012 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2011 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2010 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2009 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2008 -----
- December
- November
- October
- September
- August
- July
- June
- May
January 2012
- 118 participants
- 1442 messages
Re: [Pharo-project] Smalltalk for small projects only?
by Schwab,Wilhelm K
Reference, please :) I fully believe it.
Bill
________________________________
From: pharo-project-bounces(a)lists.gforge.inria.fr [pharo-project-bounces(a)lists.gforge.inria.fr] on behalf of Michael Haupt [mhaupt(a)gmail.com]
Sent: Sunday, January 29, 2012 7:44 AM
To: Pharo-project(a)lists.gforge.inria.fr; dimitris chloupis
Subject: Re: [Pharo-project] Smalltalk for small projects only?
Dimitris,
this is very interesting; I've always wanted to read that kind of study. Do you have a pointer?
Thanks,
Michael
Am 29.01.2012 um 08:51 schrieb dimitris chloupis <thekilon(a)yahoo.co.uk<mailto:thekilon@yahoo.co.uk>>:
Maybe not for smalltalk but for python there is a number of surveys that prove that by replacing java with python you can scale down developing time by 2-3x times. By "prove" I mean projects that have actually done that. Not quite a 10x but I think its impressive non the less and I think the numbers wont be very dissimilar for smalltalk
________________________________
From: Michael Haupt <mhaupt(a)gmail.com<mailto:mhaupt@gmail.com>>
To: "Pharo-project(a)lists.gforge.inria.fr<mailto:Pharo-project@lists.gforge.inria.fr>" <Pharo-project(a)lists.gforge.inria.fr<mailto:Pharo-project@lists.gforge.inria.fr>>
Sent: Saturday, 28 January 2012, 23:29
Subject: Re: [Pharo-project] Smalltalk for small projects only?
Janko,
Am 28.01.2012 um 21:08 schrieb Janko Mivšek <janko.mivsek(a)eranova.si<mailto:janko.mivsek@eranova.si>>:
>> I think this is a post that clearly illustrates the big problem with
>> smalltalk. The very fact that is compared with Java and Java survives.
>
> Yes, that 4-5 peole can do what 50 Java people are needed is both a
> blessing and a curse :)
I wanted to ask this earlier: is there actual evidence for this, or is it just boasting?
> Blessing because of productivity, curse because
> we are not able to scale beyond one highly connected development group.
> We don't have project management practices and tools, while Java guys
> have because they need them from the start.
I'm not so sure the people at those Smalltalk firms building software for banks et al. have no project management. Boasting? ;-)
Best,
Michael
Jan. 29, 2012
Re: [Pharo-project] Trying to build CogVM in MacOSX 10.7 Lion
by Nicolas Cellier
I see, the package FreeType-tween.435 is in
http://www.squeaksource.com/FreetypePlugin
There is a spec for it in the squeak branch
(ConfigurationOfVMMaker>>baseline15:)
spec repository: 'http://www.squeaksource.com/FreeTypePlus';
package: 'Freetype'.
But this spec is missing in Pharo...
However, there is a FreeType package already loaded in Pharo
(FreeType-StephaneDucasse.573 in Pharo 1.4) and if we browse this
package history, FreeType-tween.435 is listed as one of its ancestors.
I tried to just add http://www.squeaksource.com/FreeTypePlus in the
list or repository of Monticello package FreeType, but this did not
solve anything.
A workaround that drove me further was to add above spec in Pharo
branch of #basline15:
I still have a warning:
This package depends on the following classes:
Project
You must resolve these dependencies before you will be able to load
these definitions:
beep
I did proceed...
and many deprecation warning too:
The method Class>>addClassVarName: has been deprecated.
Use addClassVarNamed:
Select Proceed to continue, or close this window to cancel the operation.
(same with addInstVarName:)
Then it tried to load FreeType-tween.435 which is not a good thing, we
have a more recent version in image...
This package depends on the following classes:
TextMorphEditor
MultiCanvasCharacterScanner
CanvasCharacterScanner
DisplayScanner
TextLineInterval
You must resolve these dependencies before you will be able to load
these definitions:
cr
paddedSpace
tab
paddedSpace
cr
paddedSpace
tab
justifiedPadFor:font:
alphabeticalGroupsFor:size:
changeSelectionFontTo:
changeTextFont
changeTextFontAlphabeticalMenu
changeTextFontDialog
familyMemberFor:fromFamilies:
fontMenuItemsDisplayWithMenuFont
otherFontSizeDialog:
pointSizeMenuForFamilyMember:parentMenu:active:activePointSize:
Select Proceed to continue, or close this window to cancel the operation.
If I cancel, then I don't know if the whole load is cancelled, or just
this package (no UI feedback).
Else if I proceed, installation of this obsolete package fail...
Arghh.
So another workaround was to change #version15: and to remove FreeType
spec from the #common branch, move it to the #squeak branch, and
declare a more recent version of FreeType in the #pharo branch...
spec
package: 'FreeType' with: 'FreeType-StephaneDucasse.573';
But this specific version should be different in each version of Pharo...
Nicolas
2012/1/29 Nicolas Cellier <nicolas.cellier.aka.nice(a)gmail.com>:
> And when I retry with a specific version, I get another Error because
> FreeType cannot be resolved...
>
> Gofer new
> Â squeaksource: 'MetacelloRepository';
> Â package: 'ConfigurationOfVMMaker';
> Â load.
> ((Smalltalk at: #ConfigurationOfVMMaker) project version: '1.5') perform: #load.
>
> Could that be that the developpers of this configuration missed the
> bug because the item already was in their package-cache?
> I think that relying on the package-cache is a good optimization for
> speed, but should be forbiden when validating the configuration...
>
> Nicolas
>
> 29 January 2012 11:56:37 am
>
> VM: Mac OS - intel - 1068 - CoInterpreter * VMMaker-oscog-nice2.99,
> VMMaker-eem.35, VMMaker-oscog.52, VMMaker-oscog-dtl.63,
> VMMaker.oscog-eem.139 uuid: f0429633-b524-4abb-95fa-e2cf44a37805 Dec
> 4 2011, StackToRegisterMappingCogit * VMMaker-oscog-nice2.99,
> VMMaker-eem.35, VMMaker-oscog.52, VMMaker-oscog-dtl.63,
> VMMaker.oscog-eem.139 uuid: f0429633-b524-4abb-95fa-e2cf44a37805 Dec
> 4 2011, r2519 http://squeakvm.org/svn/squeak/branches/Cog
> Image: Pharo1.4a [Latest update: #14294]
>
> MetacelloFetchingMCSpecLoader(Object)>>error:
> Â Â Â Â Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.2
> [ConfigurationOfVMMaker]
> Â Â Â Â load : FFI-Poo...etc...
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â aString: Â Â Â Â 'Could not resolve: FreeType [FreeType-tween.435] in
> /Users/nicolas/Sm...etc...
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â spec: Â a MetacelloMCVersionSpecLoader
> Â Â Â Â Â Â Â Â operator: Â Â Â nil
> Â Â Â Â Â Â Â Â loaderPolicy: Â a MetacelloLoaderPolicy
> Â Â Â Â Â Â Â Â disablePackageCache: Â Â false
>
> MetacelloFetchingMCSpecLoader(MetacelloCommonMCSpecLoader)>>retryingResolvePackageSpecReferences:gofer:
> Â Â Â Â Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.2
> [ConfigurationOfVMMaker]
> Â Â Â Â load : FFI-Poo...etc...
> Â Â Â Â Arguments and temporary variables:
> <<error during printing>
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â spec: Â a MetacelloMCVersionSpecLoader
> Â Â Â Â Â Â Â Â operator: Â Â Â nil
> Â Â Â Â Â Â Â Â loaderPolicy: Â a MetacelloLoaderPolicy
> Â Â Â Â Â Â Â Â disablePackageCache: Â Â false
>
> [| references nearestReference cachedReference externalReference
> loadedVersionInfos mcVersion |
> self flag: #cleanup.
> Â Â Â Â cachedReference := self resolvePackageSpec: packageSpec cachedGofer:
> self loaderPolicy cacheGofer.
> Â Â Â Â (cachedReference ~~ nil
> Â Â Â Â Â Â Â Â Â Â Â Â and: [packageSpec getFile ~~ nil])
> Â Â Â Â Â Â Â Â ifTrue: [cachedReference name = packageSpec file
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â ifTrue: [^ self]].
> Â Â Â Â references := self retryingResolvePackageSpecReferences: packageSpec
> gofer: gofer.
> Â Â Â Â nearestReference := references last asMetacelloCachingResolvedReference.
> Â Â Â Â (cachedReference ~~ nil
> Â Â Â Â Â Â Â Â Â Â Â Â and: [cachedReference name = nearestReference name])
> Â Â Â Â Â Â Â Â ifTrue: [^ self].
> Â Â Â Â (self ignoreImage not
> Â Â Â Â Â Â Â Â Â Â Â Â and: [(loadedVersionInfos := self ancestorsFor: packageSpec) ~~ nil])
> Â Â Â Â Â Â Â Â ifTrue: [loadedVersionInfos
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â do: [:info |
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â info name = nearestReference name
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â ifTrue: [^ self].
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â nil]].
> Â Â Â Â externalReference := (references
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â select: [:ref | ref name = nearestReference name]) first
> asMetacelloCachingResolvedReference.
> Â Â Â Â self repositoryMap at: externalReference name put: externalReference
> repository.
> Â Â Â Â (self
> Â Â Â Â Â Â Â Â resolveDependencies: externalReference
> Â Â Â Â Â Â Â Â nearest: nearestReference
> Â Â Â Â Â Â Â Â into: (OrderedCollection with: nearestReference))
> Â Â Â Â Â Â Â Â do: [:reference |
> Â Â Â Â Â Â Â Â Â Â Â Â | pSpec l |
> Â Â Â Â Â Â Â Â Â Â Â Â mcVersion := reference version.
> Â Â Â Â Â Â Â Â Â Â Â Â (l := (GoferVersionReference name: reference name)
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â resolveAllWith: self loaderPolicy cacheGofer) isEmpty
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â ifTrue: [self cacheRepository storeVersion: mcVersion.
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â reference == nearestReference
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â ifTrue: [pSpec := packageSpec]
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â ifFalse: [pSpec := packageSpec project packageSpec.
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â pSpec name: mcVersion info].
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â self loadData
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â addVersion: mcVersion
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â versionInfo: mcVersion info
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â resolvedReference: reference
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â packageSpec: pSpec]].
> Â Â Â Â self loaderPolicy resetCacheGofer.
> Â Â Â Â self preLoad: packageSpec.
> Â Â Â Â (MetacelloDirective
> Â Â Â Â Â Â Â Â loadPackage: packageSpec
> Â Â Â Â Â Â Â Â externalReference: externalReference
> Â Â Â Â Â Â Â Â loader: self)
> Â Â Â Â Â Â Â Â addTo: self loadDirective.
> Â Â Â Â self postLoad: packageSpec.
> Â Â Â Â Transcript cr; show: 'Fetched -> ' , externalReference name , ' --- '
> , externalReference repository description , ' --- ' ,
> nearestReference repository description] in
> MetacelloFetchingMCSpecLoader>>linearLoadPackageSpec:gofer:
> Â Â Â Â Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.2
> [ConfigurationOfVMMaker]
> Â Â Â Â load : FFI-Poo...etc...
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â packageSpec: Â Â spec
> Â Â Â Â name: 'FreeType';
> Â Â Â Â file: 'FreeType-tween.435'.
> Â Â Â Â Â Â Â Â gofer: Â a MetacelloGofer
> Â Â Â Â Â Â Â Â references: Â Â nil
> Â Â Â Â Â Â Â Â nearestReference: Â Â Â nil
> Â Â Â Â Â Â Â Â cachedReference: Â Â Â Â nil
> Â Â Â Â Â Â Â Â externalReference: Â Â Â nil
> Â Â Â Â Â Â Â Â loadedVersionInfos: Â Â nil
> Â Â Â Â Â Â Â Â mcVersion: Â Â Â #(nil)
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â spec: Â a MetacelloMCVersionSpecLoader
> Â Â Â Â Â Â Â Â operator: Â Â Â nil
> Â Â Â Â Â Â Â Â loaderPolicy: Â a MetacelloLoaderPolicy
> Â Â Â Â Â Â Â Â disablePackageCache: Â Â false
>
> [:bar |
> bar value: 1.
> Â Â Â Â aBlock value.
> Â Â Â Â bar value: 2] in MetacelloPharoPlatform>>do:displaying:
> Â Â Â Â Receiver: a MetacelloPharoPlatform
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â aBlock: Â Â Â Â [:barValArg |
> | barVal return newBarSize |
> barVal := barValArg.
> Â Â Â Â retur...etc...
> Â Â Â Â Â Â Â Â bar: Â Â [| references nearestReference cachedReference
> externalReference loadedVer...etc...
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â bypassProgressBars: Â Â false
> Â Â Â Â Â Â Â Â bypassGoferLoadUpdateCategories: Â Â Â Â false
>
> [result := workBlock value: progress] in [[result := workBlock value: progress]
> Â Â Â Â Â Â Â Â on: ProgressNotification
> Â Â Â Â Â Â Â Â do: [:ex |
> Â Â Â Â Â Â Â Â Â Â Â Â ex extraParam isString
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put:
> ex extraParam].
> Â Â Â Â Â Â Â Â Â Â Â Â ex resume]] in ProgressInitiationException>>defaultMorphicAction
> Â Â Â Â Receiver: ProgressInitiationException
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â progress: Â Â Â [:barValArg |
> | barVal return newBarSize |
> barVal := barValArg.
> Â Â Â Â ret...etc...
> Â Â Â Â Â Â Â Â result: Â Â Â Â #(nil)
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â messageText: Â Â nil
> Â Â Â Â Â Â Â Â tag: Â Â nil
> Â Â Â Â Â Â Â Â signaler: Â Â Â 'Fetching FreeType-tween.435'
> Â Â Â Â Â Â Â Â signalContext: Â ProgressInitiationException(Exception)>>signal
> Â Â Â Â Â Â Â Â handlerContext: Â Â Â Â nil
> Â Â Â Â Â Â Â Â outerContext: Â nil
> Â Â Â Â Â Â Â Â workBlock: Â Â Â [:bar |
> bar value: 1.
> Â Â Â Â aBlock value.
> Â Â Â Â bar value: 2]
> Â Â Â Â Â Â Â Â maxVal: Â Â Â Â 2
> Â Â Â Â Â Â Â Â minVal: Â Â Â Â 0
> Â Â Â Â Â Â Â Â aPoint: Â Â Â Â (561@206)
> Â Â Â Â Â Â Â Â progressTitle: Â 'Fetching FreeType-tween.435'
>
> BlockClosure>>on:do:
> Â Â Â Â Receiver: [result := workBlock value: progress]
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â exception: Â Â Â ProgressNotification
> Â Â Â Â Â Â Â Â handlerAction: Â [:ex |
> ex extraParam isString
> Â Â Â Â Â Â Â Â ifTrue: [SystemProgressMorph un...etc...
> Â Â Â Â Â Â Â Â handlerActive: Â true
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â outerContext: Â [[result := workBlock value: progress]
> Â Â Â Â Â Â Â Â on: ProgressNotification...etc...
> Â Â Â Â Â Â Â Â startpc: Â Â Â Â 87
> Â Â Â Â Â Â Â Â numArgs: Â Â Â Â 0
>
> [[result := workBlock value: progress]
> Â Â Â Â Â Â Â Â on: ProgressNotification
> Â Â Â Â Â Â Â Â do: [:ex |
> Â Â Â Â Â Â Â Â Â Â Â Â ex extraParam isString
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put:
> ex extraParam].
> Â Â Â Â Â Â Â Â Â Â Â Â ex resume]] in ProgressInitiationException>>defaultMorphicAction
> Â Â Â Â Receiver: ProgressInitiationException
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â progress: Â Â Â [:barValArg |
> | barVal return newBarSize |
> barVal := barValArg.
> Â Â Â Â ret...etc...
> Â Â Â Â Â Â Â Â result: Â Â Â Â #(nil)
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â messageText: Â Â nil
> Â Â Â Â Â Â Â Â tag: Â Â nil
> Â Â Â Â Â Â Â Â signaler: Â Â Â 'Fetching FreeType-tween.435'
> Â Â Â Â Â Â Â Â signalContext: Â ProgressInitiationException(Exception)>>signal
> Â Â Â Â Â Â Â Â handlerContext: Â Â Â Â nil
> Â Â Â Â Â Â Â Â outerContext: Â nil
> Â Â Â Â Â Â Â Â workBlock: Â Â Â [:bar |
> bar value: 1.
> Â Â Â Â aBlock value.
> Â Â Â Â bar value: 2]
> Â Â Â Â Â Â Â Â maxVal: Â Â Â Â 2
> Â Â Â Â Â Â Â Â minVal: Â Â Â Â 0
> Â Â Â Â Â Â Â Â aPoint: Â Â Â Â (561@206)
> Â Â Â Â Â Â Â Â progressTitle: Â 'Fetching FreeType-tween.435'
>
> BlockClosure>>ensure:
> Â Â Â Â Receiver: [[result := workBlock value: progress]
> Â Â Â Â Â Â Â Â on: ProgressNotification
> Â Â Â Â Â Â Â Â do: [:ex |
> Â Â Â Â Â Â Â Â Â Â Â Â ex extr...etc...
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â aBlock: Â Â Â Â [SystemProgressMorph close: progress]
> Â Â Â Â Â Â Â Â complete: Â Â Â nil
> Â Â Â Â Â Â Â Â returnValue: Â Â nil
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â outerContext: Â ProgressInitiationException>>defaultMorphicAction
> Â Â Â Â Â Â Â Â startpc: Â Â Â Â 81
> Â Â Â Â Â Â Â Â numArgs: Â Â Â Â 0
>
> ProgressInitiationException>>defaultMorphicAction
> Â Â Â Â Receiver: ProgressInitiationException
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â progress: Â Â Â [:barValArg |
> | barVal return newBarSize |
> barVal := barValArg.
> Â Â Â Â ret...etc...
> Â Â Â Â Â Â Â Â result: Â Â Â Â #(nil)
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â messageText: Â Â nil
> Â Â Â Â Â Â Â Â tag: Â Â nil
> Â Â Â Â Â Â Â Â signaler: Â Â Â 'Fetching FreeType-tween.435'
> Â Â Â Â Â Â Â Â signalContext: Â ProgressInitiationException(Exception)>>signal
> Â Â Â Â Â Â Â Â handlerContext: Â Â Â Â nil
> Â Â Â Â Â Â Â Â outerContext: Â nil
> Â Â Â Â Â Â Â Â workBlock: Â Â Â [:bar |
> bar value: 1.
> Â Â Â Â aBlock value.
> Â Â Â Â bar value: 2]
> Â Â Â Â Â Â Â Â maxVal: Â Â Â Â 2
> Â Â Â Â Â Â Â Â minVal: Â Â Â Â 0
> Â Â Â Â Â Â Â Â aPoint: Â Â Â Â (561@206)
> Â Â Â Â Â Â Â Â progressTitle: Â 'Fetching FreeType-tween.435'
>
> MorphicUIManager>>progressInitiationExceptionDefaultAction:
> Â Â Â Â Receiver: a MorphicUIManager
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â anException: Â Â ProgressInitiationException
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â interactiveParser: Â Â Â nil
>
> ProgressInitiationException>>defaultAction
> Â Â Â Â Receiver: ProgressInitiationException
> Â Â Â Â Arguments and temporary variables:
>
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â messageText: Â Â nil
> Â Â Â Â Â Â Â Â tag: Â Â nil
> Â Â Â Â Â Â Â Â signaler: Â Â Â 'Fetching FreeType-tween.435'
> Â Â Â Â Â Â Â Â signalContext: Â ProgressInitiationException(Exception)>>signal
> Â Â Â Â Â Â Â Â handlerContext: Â Â Â Â nil
> Â Â Â Â Â Â Â Â outerContext: Â nil
> Â Â Â Â Â Â Â Â workBlock: Â Â Â [:bar |
> bar value: 1.
> Â Â Â Â aBlock value.
> Â Â Â Â bar value: 2]
> Â Â Â Â Â Â Â Â maxVal: Â Â Â Â 2
> Â Â Â Â Â Â Â Â minVal: Â Â Â Â 0
> Â Â Â Â Â Â Â Â aPoint: Â Â Â Â (561@206)
> Â Â Â Â Â Â Â Â progressTitle: Â 'Fetching FreeType-tween.435'
>
> UndefinedObject>>handleSignal:
> Â Â Â Â Receiver: nil
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â exception: Â Â Â ProgressInitiationException
> Â Â Â Â Receiver's instance variables:
> nil
>
> MethodContext(ContextPart)>>handleSignal:
> Â Â Â Â Receiver: BlockClosure>>on:do:
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â exception: Â Â Â ProgressInitiationException
> Â Â Â Â Â Â Â Â val: Â Â nil
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â sender: Â Â Â Â PasteUpMorph>>becomeActiveDuring:
> Â Â Â Â Â Â Â Â pc: Â Â 17
> Â Â Â Â Â Â Â Â stackp: Â Â Â Â 3
> Â Â Â Â Â Â Â Â method: Â Â Â Â (BlockClosure>>#on:do: "a CompiledMethod(954990592)")
> Â Â Â Â Â Â Â Â closureOrNil: Â nil
> Â Â Â Â Â Â Â Â receiver: Â Â Â [aBlock value]
>
> MethodContext(ContextPart)>>handleSignal:
> Â Â Â Â Receiver: BlockClosure>>on:do:
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â exception: Â Â Â ProgressInitiationException
> Â Â Â Â Â Â Â Â val: Â Â nil
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â sender: Â Â Â Â SmalltalkEditor>>evaluateSelectionAndDo:
> Â Â Â Â Â Â Â Â pc: Â Â 17
> Â Â Â Â Â Â Â Â stackp: Â Â Â Â 3
> Â Â Â Â Â Â Â Â method: Â Â Â Â (BlockClosure>>#on:do: "a CompiledMethod(954990592)")
> Â Â Â Â Â Â Â Â closureOrNil: Â nil
> Â Â Â Â Â Â Â Â receiver: Â Â Â [rcvr class evaluatorClass new
> Â Â Â Â Â Â Â Â evaluate: self selectionForDoitAsStr...etc...
>
> MethodContext(ContextPart)>>handleSignal:
> Â Â Â Â Receiver: BlockClosure>>on:do:
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â exception: Â Â Â ProgressInitiationException
> Â Â Â Â Â Â Â Â val: Â Â nil
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â sender: Â Â Â Â [[result := workBlock value: progress]
> Â Â Â Â Â Â Â Â on: ProgressNotification
> Â Â Â Â Â Â Â Â do:...etc...
> Â Â Â Â Â Â Â Â pc: Â Â 17
> Â Â Â Â Â Â Â Â stackp: Â Â Â Â 3
> Â Â Â Â Â Â Â Â method: Â Â Â Â (BlockClosure>>#on:do: "a CompiledMethod(954990592)")
> Â Â Â Â Â Â Â Â closureOrNil: Â nil
> Â Â Â Â Â Â Â Â receiver: Â Â Â [result := workBlock value: progress]
>
> MethodContext(ContextPart)>>handleSignal:
> Â Â Â Â Receiver: BlockClosure>>on:do:
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â exception: Â Â Â ProgressInitiationException
> Â Â Â Â Â Â Â Â val: Â Â nil
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â sender: Â Â Â Â MetacelloPharoPlatform(MetacelloPlatform)>>useStackCacheDuring:defaultD...etc...
> Â Â Â Â Â Â Â Â pc: Â Â 17
> Â Â Â Â Â Â Â Â stackp: Â Â Â Â 3
> Â Â Â Â Â Â Â Â method: Â Â Â Â (BlockClosure>>#on:do: "a CompiledMethod(954990592)")
> Â Â Â Â Â Â Â Â closureOrNil: Â nil
> Â Â Â Â Â Â Â Â receiver: Â Â Â [^ aBlock value: dict]
>
> ProgressInitiationException(Exception)>>signal
> Â Â Â Â Receiver: ProgressInitiationException
> Â Â Â Â Arguments and temporary variables:
>
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â messageText: Â Â nil
> Â Â Â Â Â Â Â Â tag: Â Â nil
> Â Â Â Â Â Â Â Â signaler: Â Â Â 'Fetching FreeType-tween.435'
> Â Â Â Â Â Â Â Â signalContext: Â ProgressInitiationException(Exception)>>signal
> Â Â Â Â Â Â Â Â handlerContext: Â Â Â Â nil
> Â Â Â Â Â Â Â Â outerContext: Â nil
> Â Â Â Â Â Â Â Â workBlock: Â Â Â [:bar |
> bar value: 1.
> Â Â Â Â aBlock value.
> Â Â Â Â bar value: 2]
> Â Â Â Â Â Â Â Â maxVal: Â Â Â Â 2
> Â Â Â Â Â Â Â Â minVal: Â Â Â Â 0
> Â Â Â Â Â Â Â Â aPoint: Â Â Â Â (561@206)
> Â Â Â Â Â Â Â Â progressTitle: Â 'Fetching FreeType-tween.435'
>
> ProgressInitiationException>>display:at:from:to:during:
> Â Â Â Â Receiver: ProgressInitiationException
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â argString: Â Â Â 'Fetching FreeType-tween.435'
> Â Â Â Â Â Â Â Â argPoint: Â Â Â (561@206)
> Â Â Â Â Â Â Â Â argMinVal: Â Â Â 0
> Â Â Â Â Â Â Â Â argMaxVal: Â Â Â 2
> Â Â Â Â Â Â Â Â argWorkBlock: Â [:bar |
> bar value: 1.
> Â Â Â Â aBlock value.
> Â Â Â Â bar value: 2]
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â messageText: Â Â nil
> Â Â Â Â Â Â Â Â tag: Â Â nil
> Â Â Â Â Â Â Â Â signaler: Â Â Â 'Fetching FreeType-tween.435'
> Â Â Â Â Â Â Â Â signalContext: Â ProgressInitiationException(Exception)>>signal
> Â Â Â Â Â Â Â Â handlerContext: Â Â Â Â nil
> Â Â Â Â Â Â Â Â outerContext: Â nil
> Â Â Â Â Â Â Â Â workBlock: Â Â Â [:bar |
> bar value: 1.
> Â Â Â Â aBlock value.
> Â Â Â Â bar value: 2]
> Â Â Â Â Â Â Â Â maxVal: Â Â Â Â 2
> Â Â Â Â Â Â Â Â minVal: Â Â Â Â 0
> Â Â Â Â Â Â Â Â aPoint: Â Â Â Â (561@206)
> Â Â Â Â Â Â Â Â progressTitle: Â 'Fetching FreeType-tween.435'
>
> ProgressInitiationException class>>display:at:from:to:during:
> Â Â Â Â Receiver: ProgressInitiationException
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â aString: Â Â Â Â 'Fetching FreeType-tween.435'
> Â Â Â Â Â Â Â Â aPoint: Â Â Â Â (561@206)
> Â Â Â Â Â Â Â Â minVal: Â Â Â Â 0
> Â Â Â Â Â Â Â Â maxVal: Â Â Â Â 2
> Â Â Â Â Â Â Â Â workBlock: Â Â Â [:bar |
> bar value: 1.
> Â Â Â Â aBlock value.
> Â Â Â Â bar value: 2]
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â superclass: Â Â Exception
> Â Â Â Â Â Â Â Â methodDict: Â Â a
> MethodDictionary(#defaultAction->(ProgressInitiationException>>#d...etc...
> Â Â Â Â Â Â Â Â format: Â Â Â Â 152
> Â Â Â Â Â Â Â Â instanceVariables: Â Â Â #('workBlock' 'maxVal' 'minVal' 'aPoint' 'progressTitle')
> Â Â Â Â Â Â Â Â organization: Â ('*Morphic' defaultMorphicAction)
> ('accessing' maxVal minVal poin...etc...
> Â Â Â Â Â Â Â Â subclasses: Â Â nil
> Â Â Â Â Â Â Â Â name: Â #ProgressInitiationException
> Â Â Â Â Â Â Â Â classPool: Â Â Â nil
> Â Â Â Â Â Â Â Â sharedPools: Â Â nil
> Â Â Â Â Â Â Â Â environment: Â Â a SystemDictionary(lots of globals)
> Â Â Â Â Â Â Â Â category: Â Â Â #'UIManager-Support'
> Â Â Â Â Â Â Â Â traitComposition: Â Â Â nil
> Â Â Â Â Â Â Â Â localSelectors: Â Â Â Â nil
>
> ByteString(String)>>displayProgressAt:from:to:during:
> Â Â Â Â Receiver: 'Fetching FreeType-tween.435'
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â aPoint: Â Â Â Â (561@206)
> Â Â Â Â Â Â Â Â minVal: Â Â Â Â 0
> Â Â Â Â Â Â Â Â maxVal: Â Â Â Â 2
> Â Â Â Â Â Â Â Â workBlock: Â Â Â [:bar |
> bar value: 1.
> Â Â Â Â aBlock value.
> Â Â Â Â bar value: 2]
> Â Â Â Â Receiver's instance variables:
> 'Fetching FreeType-tween.435'
>
> MetacelloPharoPlatform>>do:displaying:
> Â Â Â Â Receiver: a MetacelloPharoPlatform
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â aBlock: Â Â Â Â [| references nearestReference cachedReference
> externalReference loaded...etc...
> Â Â Â Â Â Â Â Â aString: Â Â Â Â 'Fetching FreeType-tween.435'
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â bypassProgressBars: Â Â false
> Â Â Â Â Â Â Â Â bypassGoferLoadUpdateCategories: Â Â Â Â false
>
> MetacelloFetchingMCSpecLoader>>linearLoadPackageSpec:gofer:
> Â Â Â Â Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.2
> [ConfigurationOfVMMaker]
> Â Â Â Â load : FFI-Poo...etc...
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â packageSpec: Â Â spec
> Â Â Â Â name: 'FreeType';
> Â Â Â Â file: 'FreeType-tween.435'.
> Â Â Â Â Â Â Â Â gofer: Â a MetacelloGofer
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â spec: Â a MetacelloMCVersionSpecLoader
> Â Â Â Â Â Â Â Â operator: Â Â Â nil
> Â Â Â Â Â Â Â Â loaderPolicy: Â a MetacelloLoaderPolicy
> Â Â Â Â Â Â Â Â disablePackageCache: Â Â false
>
> MetacelloPackageSpec>>loadUsing:gofer:
> Â Â Â Â Receiver: spec
> Â Â Â Â name: 'FreeType';
> Â Â Â Â file: 'FreeType-tween.435'.
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â aLoader: Â Â Â Â a MetacelloFetchingMCSpecLoader(linear load : 1.2
> [ConfigurationOfVMMa...etc...
> Â Â Â Â Â Â Â Â gofer: Â a MetacelloGofer
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â project: Â Â Â Â ConfigurationOfVMMaker(1.0-baseline
> [ConfigurationOfVMMaker], 1.0 [Con...etc...
> Â Â Â Â Â Â Â Â loader: Â Â Â Â nil
> Â Â Â Â Â Â Â Â name: Â 'FreeType'
> Â Â Â Â Â Â Â Â requires: Â Â Â #()
> Â Â Â Â Â Â Â Â includes: Â Â Â #()
> Â Â Â Â Â Â Â Â answers: Â Â Â Â #()
> Â Â Â Â Â Â Â Â file: Â 'FreeType-tween.435'
> Â Â Â Â Â Â Â Â repositories: Â spec
>
> Â Â Â Â Â Â Â Â goferPackage: Â a MetacelloGoferPackage name: 'FreeType'
> Â Â Â Â Â Â Â Â preLoadDoIt: Â Â nil
> Â Â Â Â Â Â Â Â postLoadDoIt: Â nil
>
> [:pkg | pkg loadUsing: self gofer: gofer] in
> MetacelloFetchingMCSpecLoader(MetacelloCommonMCSpecLoader)>>linearLoadPackageSpecs:repositories:
> Â Â Â Â Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.2
> [ConfigurationOfVMMaker]
> Â Â Â Â load : FFI-Poo...etc...
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â gofer: Â spec
> Â Â Â Â name: 'FreeType';
> Â Â Â Â file: 'FreeType-tween.435'.
> Â Â Â Â Â Â Â Â pkg: Â Â a MetacelloGofer
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â spec: Â a MetacelloMCVersionSpecLoader
> Â Â Â Â Â Â Â Â operator: Â Â Â nil
> Â Â Â Â Â Â Â Â loaderPolicy: Â a MetacelloLoaderPolicy
> Â Â Â Â Â Â Â Â disablePackageCache: Â Â false
>
> OrderedCollection>>do:
> Â Â Â Â Receiver: an OrderedCollection(spec
> Â Â Â Â name: 'FFI-Pools';
> Â Â Â Â file: 'FFI-Pools-ar.1'. spec
> Â Â Â Â name: 'Shar...etc...
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â aBlock: Â Â Â Â [:pkg | pkg loadUsing: self gofer: gofer]
> Â Â Â Â Â Â Â Â index: Â 14
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â array: Â an Array(spec
> Â Â Â Â name: 'FFI-Pools';
> Â Â Â Â file: 'FFI-Pools-ar.1'. spec
> Â Â Â Â name:...etc...
> Â Â Â Â Â Â Â Â firstIndex: Â Â 1
> Â Â Â Â Â Â Â Â lastIndex: Â Â Â 14
>
> MetacelloFetchingMCSpecLoader(MetacelloCommonMCSpecLoader)>>linearLoadPackageSpecs:repositories:
> Â Â Â Â Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.2
> [ConfigurationOfVMMaker]
> Â Â Â Â load : FFI-Poo...etc...
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â packageSpecs: Â an OrderedCollection(spec
> Â Â Â Â name: 'FFI-Pools';
> Â Â Â Â file: 'FFI-Pools-...etc...
> Â Â Â Â Â Â Â Â repositories: Â an OrderedCollection(a
> MCHttpRepository(http://www.squeaksource.c...etc...
> Â Â Â Â Â Â Â Â gofer: Â a MetacelloGofer
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â spec: Â a MetacelloMCVersionSpecLoader
> Â Â Â Â Â Â Â Â operator: Â Â Â nil
> Â Â Â Â Â Â Â Â loaderPolicy: Â a MetacelloLoaderPolicy
> Â Â Â Â Â Â Â Â disablePackageCache: Â Â false
>
> [super linearLoadPackageSpecs: packageSpecs repositories:
> repositories] in
> MetacelloFetchingMCSpecLoader>>linearLoadPackageSpecs:repositories:
> Â Â Â Â Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.2
> [ConfigurationOfVMMaker]
> Â Â Â Â load : FFI-Poo...etc...
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â packageSpecs: Â an OrderedCollection(spec
> Â Â Â Â name: 'FFI-Pools';
> Â Â Â Â file: 'FFI-Pools-...etc...
> Â Â Â Â Â Â Â Â repositories: Â an OrderedCollection(a
> MCHttpRepository(http://www.squeaksource.c...etc...
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â spec: Â a MetacelloMCVersionSpecLoader
> Â Â Â Â Â Â Â Â operator: Â Â Â nil
> Â Â Â Â Â Â Â Â loaderPolicy: Â a MetacelloLoaderPolicy
> Â Â Â Â Â Â Â Â disablePackageCache: Â Â false
>
> BlockClosure>>ensure:
> Â Â Â Â Receiver: [super linearLoadPackageSpecs: packageSpecs repositories:
> repositories]
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â aBlock: Â Â Â Â [loadDirective := oldRoot]
> Â Â Â Â Â Â Â Â complete: Â Â Â nil
> Â Â Â Â Â Â Â Â returnValue: Â Â nil
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â outerContext:
> Â Â Â Â MetacelloFetchingMCSpecLoader>>linearLoadPackageSpecs:repositorie...etc...
> Â Â Â Â Â Â Â Â startpc: Â Â Â Â 33
> Â Â Â Â Â Â Â Â numArgs: Â Â Â Â 0
>
> MetacelloLoaderPolicy>>pushLoadDirective:during:
> Â Â Â Â Receiver: a MetacelloLoaderPolicy
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â aLoaderDirective: Â Â Â linear load : 1.2 [ConfigurationOfVMMaker]
> Â Â Â Â load : FFI-Pools-...etc...
> Â Â Â Â Â Â Â Â aBlock: Â Â Â Â [super linearLoadPackageSpecs: packageSpecs repositories:
> repositories]...etc...
> Â Â Â Â Â Â Â Â oldRoot: Â Â Â Â linear load :
> Â Â Â Â preload : 1.2 [ConfigurationOfVMMaker] >> pharoUndesco...etc...
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â overrideRepositories: Â nil
> Â Â Â Â Â Â Â Â repositoryMap: Â a Dictionary('Alien-VMMaker-Support-John M
> McIntosh.8'->a MCHttp...etc...
> Â Â Â Â Â Â Â Â ensuredMap: Â Â a Dictionary()
> Â Â Â Â Â Â Â Â cacheRepository: Â Â Â Â a MCDictionaryRepository(cache)
> Â Â Â Â Â Â Â Â cacheGofer: Â Â a Gofer
> Â Â Â Â Â Â Â Â ignoreImage: Â Â false
> Â Â Â Â Â Â Â Â loadData: Â Â Â a MetacelloLoadData
> Â Â Â Â Â Â Â Â loadDirective: Â linear load : 1.2 [ConfigurationOfVMMaker]
> Â Â Â Â load : FFI-Pools-ar....etc...
> Â Â Â Â Â Â Â Â silently: Â Â Â false
>
> MetacelloLoaderPolicy>>pushLinearLoadDirectivesDuring:for:
> Â Â Â Â Receiver: a MetacelloLoaderPolicy
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â aBlock: Â Â Â Â [super linearLoadPackageSpecs: packageSpecs repositories:
> repositories]...etc...
> Â Â Â Â Â Â Â Â aLoader: Â Â Â Â a MetacelloFetchingMCSpecLoader(linear load : 1.2
> [ConfigurationOfVMMa...etc...
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â overrideRepositories: Â nil
> Â Â Â Â Â Â Â Â repositoryMap: Â a Dictionary('Alien-VMMaker-Support-John M
> McIntosh.8'->a MCHttp...etc...
> Â Â Â Â Â Â Â Â ensuredMap: Â Â a Dictionary()
> Â Â Â Â Â Â Â Â cacheRepository: Â Â Â Â a MCDictionaryRepository(cache)
> Â Â Â Â Â Â Â Â cacheGofer: Â Â a Gofer
> Â Â Â Â Â Â Â Â ignoreImage: Â Â false
> Â Â Â Â Â Â Â Â loadData: Â Â Â a MetacelloLoadData
> Â Â Â Â Â Â Â Â loadDirective: Â linear load : 1.2 [ConfigurationOfVMMaker]
> Â Â Â Â load : FFI-Pools-ar....etc...
> Â Â Â Â Â Â Â Â silently: Â Â Â false
>
> MetacelloFetchingMCSpecLoader>>linearLoadPackageSpecs:repositories:
> Â Â Â Â Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.2
> [ConfigurationOfVMMaker]
> Â Â Â Â load : FFI-Poo...etc...
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â packageSpecs: Â an OrderedCollection(spec
> Â Â Â Â name: 'FFI-Pools';
> Â Â Â Â file: 'FFI-Pools-...etc...
> Â Â Â Â Â Â Â Â repositories: Â an OrderedCollection(a
> MCHttpRepository(http://www.squeaksource.c...etc...
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â spec: Â a MetacelloMCVersionSpecLoader
> Â Â Â Â Â Â Â Â operator: Â Â Â nil
> Â Â Â Â Â Â Â Â loaderPolicy: Â a MetacelloLoaderPolicy
> Â Â Â Â Â Â Â Â disablePackageCache: Â Â false
>
> MetacelloFetchingMCSpecLoader(MetacelloCommonMCSpecLoader)>>load
> Â Â Â Â Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.2
> [ConfigurationOfVMMaker]
> Â Â Â Â load : FFI-Poo...etc...
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â repos: Â an OrderedCollection(a
> MCHttpRepository(http://www.squeaksource.com/Spee...etc...
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â spec: Â a MetacelloMCVersionSpecLoader
> Â Â Â Â Â Â Â Â operator: Â Â Â nil
> Â Â Â Â Â Â Â Â loaderPolicy: Â a MetacelloLoaderPolicy
> Â Â Â Â Â Â Â Â disablePackageCache: Â Â false
>
> MetacelloMCVersionSpecLoader>>load
> Â Â Â Â Receiver: a MetacelloMCVersionSpecLoader
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â mcLoader: Â Â Â a MetacelloFetchingMCSpecLoader(linear load : 1.2
> [ConfigurationOfVMM...etc...
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â versionSpec: Â Â spec blessing: #'development'.
> spec preLoadDoIt: #'pharoUndescoreA...etc...
> Â Â Â Â Â Â Â Â required: Â Â Â a Set('FreeType' 'default')
> Â Â Â Â Â Â Â Â packages: Â Â Â a Dictionary('Alien-VMMaker-Support'->spec
> Â Â Â Â name: 'Alien-VMMaker-Sup...etc...
> Â Â Â Â Â Â Â Â loader: Â Â Â Â a MetacelloFetchingMCSpecLoader(linear load : 1.2
> [ConfigurationOfVMMak...etc...
> Â Â Â Â Â Â Â Â loaderPolicy: Â a MetacelloLoaderPolicy
>
> MetacelloMCVersion>>executeLoadFromArray:
> Â Â Â Â Receiver: >=1.2 [ConfigurationOfVMMaker]
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â anArray: Â Â Â Â a Set('FreeType' 'default')
> Â Â Â Â Â Â Â Â loader: Â Â Â Â a MetacelloMCVersionSpecLoader
> Â Â Â Â Â Â Â Â mcLoader: Â Â Â nil
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â spec: Â spec blessing: #'development'.
> spec preLoadDoIt: #'pharoUndescoreAssignme...etc...
> Â Â Â Â Â Â Â Â versionNumber: Â 1.2
> Â Â Â Â Â Â Â Â importedVersions: Â Â Â an OrderedCollection('1.2-baseline')
> Â Â Â Â Â Â Â Â versionStatus: Â #loadedMatchConstraints
> Â Â Â Â Â Â Â Â loaderPolicy: Â a MetacelloLoaderPolicy
>
> [:dict | ^ self executeLoadFromArray: anArray] in [self versionSpec
> loader: newLoader.
> Â Â Â Â MetacelloPlatform current
> Â Â Â Â Â Â Â Â useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
> Â Â Â Â Â Â Â Â defaultDictionary: Dictionary new] in [[self versionSpec loader: newLoader.
> Â Â Â Â MetacelloPlatform current
> Â Â Â Â Â Â Â Â useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
> Â Â Â Â Â Â Â Â defaultDictionary: Dictionary new]
> Â Â Â Â Â Â Â Â ensure: [self versionSpec loader: originalLoader]] in
> MetacelloMCVersion>>fetchRequiredFromArray:
> Â Â Â Â Receiver: >=1.2 [ConfigurationOfVMMaker]
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â anArray: Â Â Â Â a Dictionary(#ancestors->a
> Dictionary('Alien-VMMaker-Support-John M Mc...etc...
> Â Â Â Â Â Â Â Â dict: Â a Set('FreeType' 'default')
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â spec: Â spec blessing: #'development'.
> spec preLoadDoIt: #'pharoUndescoreAssignme...etc...
> Â Â Â Â Â Â Â Â versionNumber: Â 1.2
> Â Â Â Â Â Â Â Â importedVersions: Â Â Â an OrderedCollection('1.2-baseline')
> Â Â Â Â Â Â Â Â versionStatus: Â #loadedMatchConstraints
> Â Â Â Â Â Â Â Â loaderPolicy: Â a MetacelloLoaderPolicy
>
> [^ aBlock value: dict] in
> MetacelloPharoPlatform(MetacelloPlatform)>>useStackCacheDuring:defaultDictionary:
> Â Â Â Â Receiver: a MetacelloPharoPlatform
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â aBlock: Â Â Â Â [:dict | ^ self executeLoadFromArray: anArray]
> Â Â Â Â Â Â Â Â dict: Â a Dictionary(#ancestors->a
> Dictionary('Alien-VMMaker-Support-John M McInt...etc...
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â bypassProgressBars: Â Â false
> Â Â Â Â Â Â Â Â bypassGoferLoadUpdateCategories: Â Â Â Â false
>
> BlockClosure>>on:do:
> Â Â Â Â Receiver: [^ aBlock value: dict]
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â exception: Â Â Â an ExceptionSet
> Â Â Â Â Â Â Â Â handlerAction: Â [:ex |
> | keys |
> (ex isKindOf: MetacelloStackCacheNotification)
> ...etc...
> Â Â Â Â Â Â Â Â handlerActive: Â true
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â outerContext:
> Â Â Â Â MetacelloPharoPlatform(MetacelloPlatform)>>useStackCacheDuring:de...etc...
> Â Â Â Â Â Â Â Â startpc: Â Â Â Â 100
> Â Â Â Â Â Â Â Â numArgs: Â Â Â Â 0
>
> MetacelloPharoPlatform(MetacelloPlatform)>>useStackCacheDuring:defaultDictionary:
> Â Â Â Â Receiver: a MetacelloPharoPlatform
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â aBlock: Â Â Â Â [:dict | ^ self executeLoadFromArray: anArray]
> Â Â Â Â Â Â Â Â defaultDictionary: Â Â Â a Dictionary(#ancestors->a
> Dictionary('Alien-VMMaker-Support...etc...
> Â Â Â Â Â Â Â Â dict: Â a Dictionary(#ancestors->a
> Dictionary('Alien-VMMaker-Support-John M McInt...etc...
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â bypassProgressBars: Â Â false
> Â Â Â Â Â Â Â Â bypassGoferLoadUpdateCategories: Â Â Â Â false
>
> [self versionSpec loader: newLoader.
> Â Â Â Â MetacelloPlatform current
> Â Â Â Â Â Â Â Â useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
> Â Â Â Â Â Â Â Â defaultDictionary: Dictionary new] in [[self versionSpec loader: newLoader.
> Â Â Â Â MetacelloPlatform current
> Â Â Â Â Â Â Â Â useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
> Â Â Â Â Â Â Â Â defaultDictionary: Dictionary new]
> Â Â Â Â Â Â Â Â ensure: [self versionSpec loader: originalLoader]] in
> MetacelloMCVersion>>fetchRequiredFromArray:
> Â Â Â Â Receiver: >=1.2 [ConfigurationOfVMMaker]
> Â Â Â Â Arguments and temporary variables:
> Â Â Â Â Â Â Â Â anArray: Â Â Â Â a Set('FreeType' 'default')
> Â Â Â Â Â Â Â Â newLoader: Â Â Â a MetacelloFetchingMCSpecLoader(linear load : )
> Â Â Â Â Receiver's instance variables:
> Â Â Â Â Â Â Â Â spec: Â spec blessing: #'development'.
> spec preLoadDoIt: #'pharoUndescoreAssignme...etc...
> Â Â Â Â Â Â Â Â versionNumber: Â 1.2
> Â Â Â Â Â Â Â Â importedVersions: Â Â Â an OrderedCollection('1.2-baseline')
> Â Â Â Â Â Â Â Â versionStatus: Â #loadedMatchConstraints
> Â Â Â Â Â Â Â Â loaderPolicy: Â a MetacelloLoaderPolicy
>
>
> --- The full stack ---
> MetacelloFetchingMCSpecLoader(Object)>>error:
> MetacelloFetchingMCSpecLoader(MetacelloCommonMCSpecLoader)>>retryingResolvePackageSpecReferences:gofer:
> [| references nearestReference cachedReference externalReference
> loadedVersionInfos mcVersion |
> self flag: #cleanup.
> Â Â Â Â cachedReference := self resolvePackageSpec: packageSpec cachedGofer:
> self loaderPolicy cacheGofer.
> Â Â Â Â (cachedReference ~~ nil
> Â Â Â Â Â Â Â Â Â Â Â Â and: [packageSpec getFile ~~ nil])
> Â Â Â Â Â Â Â Â ifTrue: [cachedReference name = packageSpec file
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â ifTrue: [^ self]].
> Â Â Â Â references := self retryingResolvePackageSpecReferences: packageSpec
> gofer: gofer.
> Â Â Â Â nearestReference := references last asMetacelloCachingResolvedReference.
> Â Â Â Â (cachedReference ~~ nil
> Â Â Â Â Â Â Â Â Â Â Â Â and: [cachedReference name = nearestReference name])
> Â Â Â Â Â Â Â Â ifTrue: [^ self].
> Â Â Â Â (self ignoreImage not
> Â Â Â Â Â Â Â Â Â Â Â Â and: [(loadedVersionInfos := self ancestorsFor: packageSpec) ~~ nil])
> Â Â Â Â Â Â Â Â ifTrue: [loadedVersionInfos
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â do: [:info |
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â info name = nearestReference name
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â ifTrue: [^ self].
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â nil]].
> Â Â Â Â externalReference := (references
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â select: [:ref | ref name = nearestReference name]) first
> asMetacelloCachingResolvedReference.
> Â Â Â Â self repositoryMap at: externalReference name put: externalReference
> repository.
> Â Â Â Â (self
> Â Â Â Â Â Â Â Â resolveDependencies: externalReference
> Â Â Â Â Â Â Â Â nearest: nearestReference
> Â Â Â Â Â Â Â Â into: (OrderedCollection with: nearestReference))
> Â Â Â Â Â Â Â Â do: [:reference |
> Â Â Â Â Â Â Â Â Â Â Â Â | pSpec l |
> Â Â Â Â Â Â Â Â Â Â Â Â mcVersion := reference version.
> Â Â Â Â Â Â Â Â Â Â Â Â (l := (GoferVersionReference name: reference name)
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â resolveAllWith: self loaderPolicy cacheGofer) isEmpty
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â ifTrue: [self cacheRepository storeVersion: mcVersion.
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â reference == nearestReference
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â ifTrue: [pSpec := packageSpec]
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â ifFalse: [pSpec := packageSpec project packageSpec.
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â pSpec name: mcVersion info].
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â self loadData
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â addVersion: mcVersion
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â versionInfo: mcVersion info
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â resolvedReference: reference
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â packageSpec: pSpec]].
> Â Â Â Â self loaderPolicy resetCacheGofer.
> Â Â Â Â self preLoad: packageSpec.
> Â Â Â Â (MetacelloDirective
> Â Â Â Â Â Â Â Â loadPackage: packageSpec
> Â Â Â Â Â Â Â Â externalReference: externalReference
> Â Â Â Â Â Â Â Â loader: self)
> Â Â Â Â Â Â Â Â addTo: self loadDirective.
> Â Â Â Â self postLoad: packageSpec.
> Â Â Â Â Transcript cr; show: 'Fetched -> ' , externalReference name , ' --- '
> , externalReference repository description , ' --- ' ,
> nearestReference repository description] in
> MetacelloFetchingMCSpecLoader>>linearLoadPackageSpec:gofer:
> [:bar |
> bar value: 1.
> Â Â Â Â aBlock value.
> Â Â Â Â bar value: 2] in MetacelloPharoPlatform>>do:displaying:
> [result := workBlock value: progress] in [[result := workBlock value: progress]
> Â Â Â Â Â Â Â Â on: ProgressNotification
> Â Â Â Â Â Â Â Â do: [:ex |
> Â Â Â Â Â Â Â Â Â Â Â Â ex extraParam isString
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put:
> ex extraParam].
> Â Â Â Â Â Â Â Â Â Â Â Â ex resume]] in ProgressInitiationException>>defaultMorphicAction
> BlockClosure>>on:do:
> [[result := workBlock value: progress]
> Â Â Â Â Â Â Â Â on: ProgressNotification
> Â Â Â Â Â Â Â Â do: [:ex |
> Â Â Â Â Â Â Â Â Â Â Â Â ex extraParam isString
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put:
> ex extraParam].
> Â Â Â Â Â Â Â Â Â Â Â Â ex resume]] in ProgressInitiationException>>defaultMorphicAction
> BlockClosure>>ensure:
> ProgressInitiationException>>defaultMorphicAction
> MorphicUIManager>>progressInitiationExceptionDefaultAction:
> ProgressInitiationException>>defaultAction
> UndefinedObject>>handleSignal:
> MethodContext(ContextPart)>>handleSignal:
> MethodContext(ContextPart)>>handleSignal:
> MethodContext(ContextPart)>>handleSignal:
> MethodContext(ContextPart)>>handleSignal:
> ProgressInitiationException(Exception)>>signal
> ProgressInitiationException>>display:at:from:to:during:
> ProgressInitiationException class>>display:at:from:to:during:
> ByteString(String)>>displayProgressAt:from:to:during:
> MetacelloPharoPlatform>>do:displaying:
> MetacelloFetchingMCSpecLoader>>linearLoadPackageSpec:gofer:
> MetacelloPackageSpec>>loadUsing:gofer:
> [:pkg | pkg loadUsing: self gofer: gofer] in
> MetacelloFetchingMCSpecLoader(MetacelloCommonMCSpecLoader)>>linearLoadPackageSpecs:repositories:
> OrderedCollection>>do:
> MetacelloFetchingMCSpecLoader(MetacelloCommonMCSpecLoader)>>linearLoadPackageSpecs:repositories:
> [super linearLoadPackageSpecs: packageSpecs repositories:
> repositories] in
> MetacelloFetchingMCSpecLoader>>linearLoadPackageSpecs:repositories:
> BlockClosure>>ensure:
> MetacelloLoaderPolicy>>pushLoadDirective:during:
> MetacelloLoaderPolicy>>pushLinearLoadDirectivesDuring:for:
> MetacelloFetchingMCSpecLoader>>linearLoadPackageSpecs:repositories:
> MetacelloFetchingMCSpecLoader(MetacelloCommonMCSpecLoader)>>load
> MetacelloMCVersionSpecLoader>>load
> MetacelloMCVersion>>executeLoadFromArray:
> [:dict | ^ self executeLoadFromArray: anArray] in [self versionSpec
> loader: newLoader.
> Â Â Â Â MetacelloPlatform current
> Â Â Â Â Â Â Â Â useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
> Â Â Â Â Â Â Â Â defaultDictionary: Dictionary new] in [[self versionSpec loader: newLoader.
> Â Â Â Â MetacelloPlatform current
> Â Â Â Â Â Â Â Â useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
> Â Â Â Â Â Â Â Â defaultDictionary: Dictionary new]
> Â Â Â Â Â Â Â Â ensure: [self versionSpec loader: originalLoader]] in
> MetacelloMCVersion>>fetchRequiredFromArray:
> [^ aBlock value: dict] in
> MetacelloPharoPlatform(MetacelloPlatform)>>useStackCacheDuring:defaultDictionary:
> BlockClosure>>on:do:
> MetacelloPharoPlatform(MetacelloPlatform)>>useStackCacheDuring:defaultDictionary:
> [self versionSpec loader: newLoader.
> Â Â Â Â MetacelloPlatform current
> Â Â Â Â Â Â Â Â useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
> Â Â Â Â Â Â Â Â defaultDictionary: Dictionary new] in [[self versionSpec loader: newLoader.
> Â Â Â Â MetacelloPlatform current
> Â Â Â Â Â Â Â Â useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
> Â Â Â Â Â Â Â Â defaultDictionary: Dictionary new]
> Â Â Â Â Â Â Â Â ensure: [self versionSpec loader: originalLoader]] in
> MetacelloMCVersion>>fetchRequiredFromArray:
> Â - - - - - - - - - - - - - - -
> Â Â Â Â Â Â Â Â Â Â Â Â - - - - - - - - - - - - - - - - - -
> BlockClosure>>ensure:
> [[self versionSpec loader: newLoader.
> Â Â Â Â MetacelloPlatform current
> Â Â Â Â Â Â Â Â useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
> Â Â Â Â Â Â Â Â defaultDictionary: Dictionary new]
> Â Â Â Â Â Â Â Â ensure: [self versionSpec loader: originalLoader]] in
> MetacelloMCVersion>>fetchRequiredFromArray:
> [:bar |
> bar value: 1.
> Â Â Â Â aBlock value.
> Â Â Â Â bar value: 2] in MetacelloPharoPlatform>>do:displaying:
> [result := workBlock value: progress] in [[result := workBlock value: progress]
> Â Â Â Â Â Â Â Â on: ProgressNotification
> Â Â Â Â Â Â Â Â do: [:ex |
> Â Â Â Â Â Â Â Â Â Â Â Â ex extraParam isString
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put:
> ex extraParam].
> Â Â Â Â Â Â Â Â Â Â Â Â ex resume]] in ProgressInitiationException>>defaultMorphicAction
> BlockClosure>>on:do:
> [[result := workBlock value: progress]
> Â Â Â Â Â Â Â Â on: ProgressNotification
> Â Â Â Â Â Â Â Â do: [:ex |
> Â Â Â Â Â Â Â Â Â Â Â Â ex extraParam isString
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put:
> ex extraParam].
> Â Â Â Â Â Â Â Â Â Â Â Â ex resume]] in ProgressInitiationException>>defaultMorphicAction
> BlockClosure>>ensure:
> ProgressInitiationException>>defaultMorphicAction
> MorphicUIManager>>progressInitiationExceptionDefaultAction:
> ProgressInitiationException>>defaultAction
> UndefinedObject>>handleSignal:
> MethodContext(ContextPart)>>handleSignal:
> MethodContext(ContextPart)>>handleSignal:
> ProgressInitiationException(Exception)>>signal
> ProgressInitiationException>>display:at:from:to:during:
> ProgressInitiationException class>>display:at:from:to:during:
> ByteString(String)>>displayProgressAt:from:to:during:
> MetacelloPharoPlatform>>do:displaying:
> MetacelloMCVersion>>fetchRequiredFromArray:
> [| fetchLoader |
> fetchLoader := self
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â fetchRequiredFromArray: (self defaultPackageNamesToLoad: anArray).
> Â Â Â Â MetacelloPlatform current
> Â Â Â Â Â Â Â Â do: [fetchLoader doLoad]
> Â Â Â Â Â Â Â Â displaying: 'Loading ' , displayString.
> Â Â Â Â Transcript cr; show: '...finished ' , self versionNumber printString.
> Â Â Â Â ^ fetchLoader] in MetacelloMCVersion>>doLoadRequiredFromArray:
> BlockClosure>>ensure:
> MetacelloMCVersion>>doLoadRequiredFromArray:
> MetacelloMCVersion>>load
> UndefinedObject>>DoIt
> Compiler>>evaluate:in:to:notifying:ifFail:logged:
> [rcvr class evaluatorClass new
> Â Â Â Â Â Â Â Â evaluate: self selectionForDoitAsStream
> Â Â Â Â Â Â Â Â in: ctxt
> Â Â Â Â Â Â Â Â to: rcvr
> Â Â Â Â Â Â Â Â notifying: self morph
> Â Â Â Â Â Â Â Â ifFail: [self morph flash.
> Â Â Â Â Â Â Â Â Â Â Â Â ^ nil]
> Â Â Â Â Â Â Â Â logged: true] in SmalltalkEditor>>evaluateSelectionAndDo:
> BlockClosure>>on:do:
> SmalltalkEditor>>evaluateSelectionAndDo:
> SmalltalkEditor>>evaluateSelection
> SmalltalkEditor>>doIt
> SmalltalkEditor>>doIt:
> SmalltalkEditor(TextEditor)>>performCmdActionsWith:shifted:return:
> SmalltalkEditor(TextEditor)>>dispatchCommandOn:return:
> SmalltalkEditor(TextEditor)>>dispatchOn:
> [self dispatchOn: aKeyboardEvent] in SmalltalkEditor(TextEditor)>>keystroke:
> SmalltalkEditor(TextEditor)>>handleKeystrokeAction:
> SmalltalkEditor(TextEditor)>>handleEditionAction:fromKeyboardEvent:
> SmalltalkEditor(TextEditor)>>keystroke:
> [editor keystroke: evt] in [| action |
> evt keyValue = 13
> Â Â Â Â Â Â Â Â ifTrue: [action := self crAction.
> Â Â Â Â Â Â Â Â Â Â Â Â action
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â ifNotNil: [evt hand newKeyboardFocus: nil.
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â ^ action value]].
> Â Â Â Â self
> Â Â Â Â Â Â Â Â handleInteraction: [editor keystroke: evt].
> Â Â Â Â self updateFromParagraph.
> Â Â Â Â super keyStroke: evt] in TextMorphForEditView(TextMorph)>>keyStroke:
> TextMorphForEditView(TextMorph)>>handleInteraction:
> TextMorphForEditView>>handleInteraction:
> [| action |
> evt keyValue = 13
> Â Â Â Â Â Â Â Â ifTrue: [action := self crAction.
> Â Â Â Â Â Â Â Â Â Â Â Â action
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â ifNotNil: [evt hand newKeyboardFocus: nil.
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â ^ action value]].
> Â Â Â Â self
> Â Â Â Â Â Â Â Â handleInteraction: [editor keystroke: evt].
> Â Â Â Â self updateFromParagraph.
> Â Â Â Â super keyStroke: evt] in TextMorphForEditView(TextMorph)>>keyStroke:
> ToolRegistry>>codeCompletionAround:textMorph:keyStroke:
> SmalltalkEditor>>codeCompletionAround:textMorph:keyStroke:
> TextMorphForEditView(TextMorph)>>keyStroke:
> TextMorphForEditView>>keyStroke:
> TextMorphForEditView(TextMorph)>>handleKeystroke:
> KeyboardEvent>>sentTo:
> TextMorphForEditView(Morph)>>handleEvent:
> TextMorphForEditView(Morph)>>handleFocusEvent:
> [ActiveHand := self.
> Â Â Â Â ActiveEvent := anEvent.
> Â Â Â Â result := focusHolder
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â handleFocusEvent: (anEvent
> Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â transformedBy: (focusHolder transformedFrom: self))] in
> HandMorph>>sendFocusEvent:to:clear:
> [aBlock value] in PasteUpMorph>>becomeActiveDuring:
> BlockClosure>>on:do:
> PasteUpMorph>>becomeActiveDuring:
> HandMorph>>sendFocusEvent:to:clear:
> HandMorph>>sendEvent:focus:clear:
> HandMorph>>sendKeyboardEvent:
> HandMorph>>handleEvent:
> HandMorph>>processEvents
> [:h |
> ActiveHand := h.
> Â Â Â Â h processEvents.
> Â Â Â Â ActiveHand := nil] in WorldState>>doOneCycleNowFor:
> Array(SequenceableCollection)>>do:
> WorldState>>handsDo:
> WorldState>>doOneCycleNowFor:
> WorldState>>doOneCycleFor:
> PasteUpMorph>>doOneCycle
> [[World doOneCycle.
> Â Â Â Â Processor yield.
> Â Â Â Â false] whileFalse.
> Â Â Â Â nil] in MorphicUIManager>>spawnNewProcess
> [self value.
> Â Â Â Â Processor terminateActive] in BlockClosure>>newProcess
>
>
> 2012/1/29 Nicolas Cellier <nicolas.cellier.aka.nice(a)gmail.com>:
>> 2012/1/29 dimitris chloupis <thekilon(a)yahoo.co.uk>:
>>> I am not accusing you or anything , I know writing documentation can be both
>>> hard and boring. And if I can help to make it simpler I will.
>>>
>>
>> Sure, but sometimes adding a link or two in the right place would help...
>>
>>> Back to building , followed your instruction and
>>>
>>> "
>>> Gofer new
>>> Â squeaksource: 'MetacelloRepository';
>>> Â package: 'ConfigurationOfVMMaker';
>>> Â load.
>>> (Smalltalk at: #ConfigurationOfVMMaker) perform: #load."
>>>
>>>
>>> gives me the following error
>>>
>>
>> Ah, my incantation does not work, it's more something like this:
>>
>> Gofer new
>> Â squeaksource: 'MetacelloRepository';
>> Â package: 'ConfigurationOfVMMaker';
>> Â load.
>> ((Smalltalk at: #ConfigurationOfVMMaker) project perform:
>> #latestVersion) perform: #load.
>>
>> Then I have same error as you...
>> It seems like http://source.impara.de/freetype/Freetype-Plugin-John M
>> McIntosh.55.mcz is accessible though...
>> So here, I don't know...
>>
>> Nicolas
>>
>>>
>>>
>>> 29 January 2012 11:56:20 am
>>>
>>> VM: Mac OS - intel - 1072 - NBCoInterpreter
>>> NativeBoost-CogPlugin-IgorStasenko.8 uuid:
>>> f47ef546-de3d-4415-850e-6437d67bfb5c Dec 11 2011,
>>> StackToRegisterMappingCogit VMMaker-oscog-EstebanLorenzano.139 uuid:
>>> 5aa53979-d7d8-4ca3-91fe-cfc3b4109c33 Dec 11 2011,
>>> https://git.gitorious.org/cogvm/blessed.git Commit:
>>> 364a7f1fab69798c1bdc9575ba15e18ea319585a Date: Sun Dec 11 15:17:52 2011
>>> -0300 By: Esteban Lorenzano <estebanlm(a)gmail.com>
>>> Image: Pharo1.4a [Latest update: #14284]
>>>
>>> UndefinedObject(Object)>>doesNotUnderstand: #readStream
>>> Receiver: nil
>>> Arguments and temporary variables:
>>> aMessage: readStream
>>> exception: MessageNotUnderstood: receiver of "readStream" is nil
>>> resumeValue: nil
>>> Receiver's instance variables:
>>> nil
>>>
>>> MCScanner class>>scanTokens:
>>> Receiver: MCScanner
>>> Arguments and temporary variables:
>>> aString: nil
>>> Receiver's instance variables:
>>> superclass: Object
>>> methodDict: a MethodDictionary(#next->(MCScanner>>#next "a
>>> CompiledMethod(84410...etc...
>>> format: 132
>>> instanceVariables: #('stream')
>>> organization: ('as yet unclassified' next nextArray nextString nextSymbol
>>> strea...etc...
>>> subclasses: nil
>>> name: #MCScanner
>>> classPool: nil
>>> sharedPools: nil
>>> environment: a SystemDictionary(lots of globals)
>>> category: #'Monticello-Chunk Format'
>>> traitComposition: {}
>>> localSelectors: nil
>>>
>>> MCMczReader>>parseMember:
>>> Receiver: a MCMczReader
>>> Arguments and temporary variables:
>>> fileName: 'package'
>>> tokens: nil
>>> Receiver's instance variables:
>>> stream: a ReadStream
>>> package: nil
>>> info: nil
>>> definitions: nil
>>> dependencies: nil
>>> zip: a ZipArchive
>>> infoCache: nil
>>>
>>> MCMczReader>>loadPackage
>>> Receiver: a MCMczReader
>>> Arguments and temporary variables:
>>> dict: nil
>>> Receiver's instance variables:
>>> stream: a ReadStream
>>> package: nil
>>> info: nil
>>> definitions: nil
>>> dependencies: nil
>>> zip: a ZipArchive
>>> infoCache: nil
>>>
>>> MCMczReader(MCVersionReader)>>package
>>> Receiver: a MCMczReader
>>> Arguments and temporary variables:
>>>
>>> Receiver's instance variables:
>>> stream: a ReadStream
>>> package: nil
>>> info: nil
>>> definitions: nil
>>> dependencies: nil
>>> zip: a ZipArchive
>>> infoCache: nil
>>>
>>> MCMczReader(MCVersionReader)>>basicVersion
>>> Receiver: a MCMczReader
>>> Arguments and temporary variables:
>>>
>>> Receiver's instance variables:
>>> stream: a ReadStream
>>> package: nil
>>> info: nil
>>> definitions: nil
>>> dependencies: nil
>>> zip: a ZipArchive
>>> infoCache: nil
>>>
>>> MCMczReader(MCVersionReader)>>version
>>> Receiver: a MCMczReader
>>> Arguments and temporary variables:
>>>
>>> Receiver's instance variables:
>>> stream: a ReadStream
>>> package: nil
>>> info: nil
>>> definitions: nil
>>> dependencies: nil
>>> zip: a ZipArchive
>>> infoCache: nil
>>>
>>> [:r | r version] in
>>> MCHttpRepository(MCFileBasedRepository)>>loadVersionFromFileNamed:
>>> Receiver: a MCHttpRepository(http://source.impara.de/freetype)
>>> Arguments and temporary variables:
>>> r: a MCMczReader
>>> Receiver's instance variables:
>>> creationTemplate: nil
>>> storeDiffs: nil
>>> cache: nil
>>> allFileNames: nil
>>> location: 'http://source.impara.de/freetype'
>>> user: ''
>>> password: ''
>>> readerCache: a Dictionary('Freetype-Plugin-John M McIntosh.55.mcz'->a
>>> MCMczRead...etc...
>>>
>>> BlockClosure>>cull:
>>> Receiver: [:r | r version]
>>> Arguments and temporary variables:
>>> anArg: a MCMczReader
>>> Receiver's instance variables:
>>> outerContext:
>>> MCHttpRepository(MCFileBasedRepository)>>loadVersionFromFileNamed...etc...
>>> startpc: 27
>>> numArgs: 1
>>>
>>> MCMczReader(ProtoObject)>>ifNotNil:
>>> Receiver: a MCMczReader
>>> Arguments and temporary variables:
>>> ifNotNilBlock: [:r | r version]
>>> Receiver's instance variables:
>>> stream: a ReadStream
>>> package: nil
>>> info: nil
>>> definitions: nil
>>> dependencies: nil
>>> zip: a ZipArchive
>>> infoCache: nil
>>>
>>> MCHttpRepository>>versionReaderForFileNamed:do:
>>> Receiver: a MCHttpRepository(http://source.impara.de/freetype)
>>> Arguments and temporary variables:
>>> aString: 'Freetype-Plugin-John M McIntosh.55.mcz'
>>> aBlock: [:r | r version]
>>> Receiver's instance variables:
>>> creationTemplate: nil
>>> storeDiffs: nil
>>> cache: nil
>>> allFileNames: nil
>>> location: 'http://source.impara.de/freetype'
>>> user: ''
>>> password: ''
>>> readerCache: a Dictionary('Freetype-Plugin-John M McIntosh.55.mcz'->a
>>> MCMczRead...etc...
>>>
>>> MCHttpRepository(MCFileBasedRepository)>>loadVersionFromFileNamed:
>>> Receiver: a MCHttpRepository(http://source.impara.de/freetype)
>>> Arguments and temporary variables:
>>> aString: 'Freetype-Plugin-John M McIntosh.55.mcz'
>>> Receiver's instance variables:
>>> creationTemplate: nil
>>> storeDiffs: nil
>>> cache: nil
>>> allFileNames: nil
>>> location: 'http://source.impara.de/freetype'
>>> user: ''
>>> password: ''
>>> readerCache: a Dictionary('Freetype-Plugin-John M McIntosh.55.mcz'->a
>>> MCMczRead...etc...
>>>
>>> MCHttpRepository(MCFileBasedRepository)>>goferVersionFrom:
>>> Receiver: a MCHttpRepository(http://source.impara.de/freetype)
>>> Arguments and temporary variables:
>>> aVersionReference: a MetacelloCachingGoferResolvedReference name:
>>> 'Freetype-Plu...etc...
>>> Receiver's instance variables:
>>> creationTemplate: nil
>>> storeDiffs: nil
>>> cache: nil
>>> allFileNames: nil
>>> location: 'http://source.impara.de/freetype'
>>> user: ''
>>> password: ''
>>> readerCache: a Dictionary('Freetype-Plugin-John M McIntosh.55.mcz'->a
>>> MCMczRead...etc...
>>>
>>> MetacelloCachingGoferResolvedReference(GoferResolvedReference)>>version
>>> Receiver: a MetacelloCachingGoferResolvedReference name:
>>> 'Freetype-Plugin-John M McIntosh.55'
>>> Arguments and temporary variables:
>>>
>>> Receiver's instance variables:
>>> name: 'Freetype-Plugin-John M McIntosh.55'
>>> package: 'Freetype-Plugin'
>>> author: 'John M McIntosh'
>>> branch: ''
>>> versionNumber: 55
>>> repository: a MCHttpRepository(http://source.impara.de/freetype)
>>> cachedVersion: nil
>>>
>>> MetacelloCachingGoferResolvedReference>>version
>>> Receiver: a MetacelloCachingGoferResolvedReference name:
>>> 'Freetype-Plugin-John M McIntosh.55'
>>> Arguments and temporary variables:
>>>
>>> Receiver's instance variables:
>>> name: 'Freetype-Plugin-John M McIntosh.55'
>>> package: 'Freetype-Plugin'
>>> author: 'John M McIntosh'
>>> branch: ''
>>> versionNumber: 55
>>> repository: a MCHttpRepository(http://source.impara.de/freetype)
>>> cachedVersion: nil
>>>
>>> [:each | each version] in [aCollection
>>> do: [:each | each version].
>>> nearestReference version dependencies do: block.
>>> notDone := false] in
>>> MetacelloFetchingMCSpecLoader>>resolveDependencies:nearest:into:
>>> Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.3
>>> [ConfigurationOfVMMaker]
>>> load : FFI-Poo...etc...
>>> Arguments and temporary variables:
>>> each: a MetacelloCachingGoferResolvedReference name: 'Freetype-Plugin-John M
>>> Mc...etc...
>>> Receiver's instance variables:
>>> spec: a MetacelloMCVersionSpecLoader
>>> operator: nil
>>> loaderPolicy: a MetacelloLoaderPolicy
>>> disablePackageCache: false
>>>
>>> OrderedCollection>>do:
>>> Receiver: an OrderedCollection(a MetacelloCachingGoferResolvedReference
>>> name: 'Freetype-Plugin-John ...etc...
>>> Arguments and temporary variables:
>>> aBlock: [:each | each version]
>>> index: 1
>>> Receiver's instance variables:
>>> array: an Array(a MetacelloCachingGoferResolvedReference name:
>>> 'Freetype-Plugin...etc...
>>> firstIndex: 1
>>> lastIndex: 1
>>>
>>> [aCollection
>>> do: [:each | each version].
>>> nearestReference version dependencies do: block.
>>> notDone := false] in
>>> MetacelloFetchingMCSpecLoader>>resolveDependencies:nearest:into:
>>> Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.3
>>> [ConfigurationOfVMMaker]
>>> load : FFI-Poo...etc...
>>> Arguments and temporary variables:
>>> <<error during printing>
>>> Receiver's instance variables:
>>> spec: a MetacelloMCVersionSpecLoader
>>> operator: nil
>>> loaderPolicy: a MetacelloLoaderPolicy
>>> disablePackageCache: false
>>>
>>> BlockClosure>>on:do:
>>> Receiver: [aCollection
>>> do: [:each | each version].
>>> nearestReference version dependencies do: bloc...etc...
>>> Arguments and temporary variables:
>>> exception: Error
>>> handlerAction: [:ex |
>>> retryCount := retryCount + 1.
>>> retryCount >= 3
>>> ifTrue:...etc...
>>> handlerActive: false
>>> Receiver's instance variables:
>>> outerContext:
>>> MetacelloFetchingMCSpecLoader>>resolveDependencies:nearest:into:
>>> startpc: 226
>>> numArgs: 0
>>>
>>> MetacelloFetchingMCSpecLoader>>resolveDependencies:nearest:into:
>>> Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.3
>>> [ConfigurationOfVMMaker]
>>> load : FFI-Poo...etc...
>>> Arguments and temporary variables:
>>> <<error during printing>
>>> Receiver's instance variables:
>>> spec: a MetacelloMCVersionSpecLoader
>>> operator: nil
>>> loaderPolicy: a MetacelloLoaderPolicy
>>> disablePackageCache: false
>>>
>>> [| references nearestReference cachedReference externalReference
>>> loadedVersionInfos mcVersion |
>>> self flag: #cleanup.
>>> cachedReference := self resolvePackageSpec: packageSpec cachedGofer: self
>>> loaderPolicy cacheGofer.
>>> (cachedReference ~~ nil
>>> and: [packageSpec getFile ~~ nil])
>>> ifTrue: [cachedReference name = packageSpec file
>>> ifTrue: [^ self]].
>>> references := self retryingResolvePackageSpecReferences: packageSpec gofer:
>>> gofer.
>>> nearestReference := references last asMetacelloCachingResolvedReference.
>>> (cachedReference ~~ nil
>>> and: [cachedReference name = nearestReference name])
>>> ifTrue: [^ self].
>>> (self ignoreImage not
>>> and: [(loadedVersionInfos := self ancestorsFor: packageSpec) ~~ nil])
>>> ifTrue: [loadedVersionInfos
>>> do: [:info |
>>> info name = nearestReference name
>>> ifTrue: [^ self].
>>> nil]].
>>> externalReference := (references
>>> select: [:ref | ref name = nearestReference name]) first
>>> asMetacelloCachingResolvedReference.
>>> self repositoryMap at: externalReference name put: externalReference
>>> repository.
>>> (self
>>> resolveDependencies: externalReference
>>> nearest: nearestReference
>>> into: (OrderedCollection with: nearestReference))
>>> do: [:reference |
>>> | pSpec l |
>>> mcVersion := reference version.
>>> (l := (GoferVersionReference name: reference name)
>>> resolveAllWith: self loaderPolicy cacheGofer) isEmpty
>>> ifTrue: [self cacheRepository storeVersion: mcVersion.
>>> reference == nearestReference
>>> ifTrue: [pSpec := packageSpec]
>>> ifFalse: [pSpec := packageSpec project packageSpec.
>>> pSpec name: mcVersion info].
>>> self loadData
>>> addVersion: mcVersion
>>> versionInfo: mcVersion info
>>> resolvedReference: reference
>>> packageSpec: pSpec]].
>>> self loaderPolicy resetCacheGofer.
>>> self preLoad: packageSpec.
>>> (MetacelloDirective
>>> loadPackage: packageSpec
>>> externalReference: externalReference
>>> loader: self)
>>> addTo: self loadDirective.
>>> self postLoad: packageSpec.
>>> Transcript cr; show: 'Fetched -> ' , externalReference name , ' --- ' ,
>>> externalReference repository description , ' --- ' , nearestReference
>>> repository description] in
>>> MetacelloFetchingMCSpecLoader>>linearLoadPackageSpec:gofer:
>>> Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.3
>>> [ConfigurationOfVMMaker]
>>> load : FFI-Poo...etc...
>>> Arguments and temporary variables:
>>> packageSpec: spec
>>> name: 'Freetype-Plugin';
>>> requires: #('VMMaker' );
>>> file: '...etc...
>>> gofer: a MetacelloGofer
>>> references: an Array(a GoferResolvedReference name: 'Freetype-Plugin-John M
>>> McI...etc...
>>> nearestReference: a MetacelloCachingGoferResolvedReference name:
>>> 'Freetype-Plug...etc...
>>> cachedReference: nil
>>> externalReference: a MetacelloCachingGoferResolvedReference name:
>>> 'Freetype-Plu...etc...
>>> loadedVersionInfos: nil
>>> mcVersion: #(nil)
>>> Receiver's instance variables:
>>> spec: a MetacelloMCVersionSpecLoader
>>> operator: nil
>>> loaderPolicy: a MetacelloLoaderPolicy
>>> disablePackageCache: false
>>>
>>> [:bar |
>>> bar value: 1.
>>> aBlock value.
>>> bar value: 2] in MetacelloPharoPlatform>>do:displaying:
>>> Receiver: a MetacelloPharoPlatform
>>> Arguments and temporary variables:
>>> aBlock: [:barValArg |
>>> | barVal return newBarSize |
>>> barVal := barValArg.
>>> retur...etc...
>>> bar: [| references nearestReference cachedReference externalReference
>>> loadedVer...etc...
>>> Receiver's instance variables:
>>> bypassProgressBars: false
>>> bypassGoferLoadUpdateCategories: false
>>>
>>> [result := workBlock value: progress] in [[result := workBlock value:
>>> progress]
>>> on: ProgressNotification
>>> do: [:ex |
>>> ex extraParam isString
>>> ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put: ex
>>> extraParam].
>>> ex resume]] in ProgressInitiationException>>defaultMorphicAction
>>> Receiver: ProgressInitiationException
>>> Arguments and temporary variables:
>>> progress: [:barValArg |
>>> | barVal return newBarSize |
>>> barVal := barValArg.
>>> ret...etc...
>>> result: #(nil)
>>> Receiver's instance variables:
>>> messageText: nil
>>> tag: nil
>>> signaler: 'Fetching Freetype-Plugin-John M McIntosh.55'
>>> signalContext: ProgressInitiationException(Exception)>>signal
>>> handlerContext: nil
>>> outerContext: nil
>>> workBlock: [:bar |
>>> bar value: 1.
>>> aBlock value.
>>> bar value: 2]
>>> maxVal: 2
>>> minVal: 0
>>> aPoint: (635@231)
>>> progressTitle: 'Fetching Freetype-Plugin-John M McIntosh.55'
>>>
>>> BlockClosure>>on:do:
>>> Receiver: [result := workBlock value: progress]
>>> Arguments and temporary variables:
>>> exception: ProgressNotification
>>> handlerAction: [:ex |
>>> ex extraParam isString
>>> ifTrue: [SystemProgressMorph un...etc...
>>> handlerActive: true
>>> Receiver's instance variables:
>>> outerContext: [[result := workBlock value: progress]
>>> on: ProgressNotification...etc...
>>> startpc: 87
>>> numArgs: 0
>>>
>>> [[result := workBlock value: progress]
>>> on: ProgressNotification
>>> do: [:ex |
>>> ex extraParam isString
>>> ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put: ex
>>> extraParam].
>>> ex resume]] in ProgressInitiationException>>defaultMorphicAction
>>> Receiver: ProgressInitiationException
>>> Arguments and temporary variables:
>>> progress: [:barValArg |
>>> | barVal return newBarSize |
>>> barVal := barValArg.
>>> ret...etc...
>>> result: #(nil)
>>> Receiver's instance variables:
>>> messageText: nil
>>> tag: nil
>>> signaler: 'Fetching Freetype-Plugin-John M McIntosh.55'
>>> signalContext: ProgressInitiationException(Exception)>>signal
>>> handlerContext: nil
>>> outerContext: nil
>>> workBlock: [:bar |
>>> bar value: 1.
>>> aBlock value.
>>> bar value: 2]
>>> maxVal: 2
>>> minVal: 0
>>> aPoint: (635@231)
>>> progressTitle: 'Fetching Freetype-Plugin-John M McIntosh.55'
>>>
>>> BlockClosure>>ensure:
>>> Receiver: [[result := workBlock value: progress]
>>> on: ProgressNotification
>>> do: [:ex |
>>> ex extr...etc...
>>> Arguments and temporary variables:
>>> aBlock: [SystemProgressMorph close: progress]
>>> complete: nil
>>> returnValue: nil
>>> Receiver's instance variables:
>>> outerContext: ProgressInitiationException>>defaultMorphicAction
>>> startpc: 81
>>> numArgs: 0
>>>
>>> ProgressInitiationException>>defaultMorphicAction
>>> Receiver: ProgressInitiationException
>>> Arguments and temporary variables:
>>> progress: [:barValArg |
>>> | barVal return newBarSize |
>>> barVal := barValArg.
>>> ret...etc...
>>> result: #(nil)
>>> Receiver's instance variables:
>>> messageText: nil
>>> tag: nil
>>> signaler: 'Fetching Freetype-Plugin-John M McIntosh.55'
>>> signalContext: ProgressInitiationException(Exception)>>signal
>>> handlerContext: nil
>>> outerContext: nil
>>> workBlock: [:bar |
>>> bar value: 1.
>>> aBlock value.
>>> bar value: 2]
>>> maxVal: 2
>>> minVal: 0
>>> aPoint: (635@231)
>>> progressTitle: 'Fetching Freetype-Plugin-John M McIntosh.55'
>>>
>>> MorphicUIManager>>progressInitiationExceptionDefaultAction:
>>> Receiver: a MorphicUIManager
>>> Arguments and temporary variables:
>>> anException: ProgressInitiationException
>>> Receiver's instance variables:
>>> interactiveParser: nil
>>>
>>> ProgressInitiationException>>defaultAction
>>> Receiver: ProgressInitiationException
>>> Arguments and temporary variables:
>>>
>>> Receiver's instance variables:
>>> messageText: nil
>>> tag: nil
>>> signaler: 'Fetching Freetype-Plugin-John M McIntosh.55'
>>> signalContext: ProgressInitiationException(Exception)>>signal
>>> handlerContext: nil
>>> outerContext: nil
>>> workBlock: [:bar |
>>> bar value: 1.
>>> aBlock value.
>>> bar value: 2]
>>> maxVal: 2
>>> minVal: 0
>>> aPoint: (635@231)
>>> progressTitle: 'Fetching Freetype-Plugin-John M McIntosh.55'
>>>
>>> UndefinedObject>>handleSignal:
>>> Receiver: nil
>>> Arguments and temporary variables:
>>> exception: ProgressInitiationException
>>> Receiver's instance variables:
>>> nil
>>>
>>> MethodContext(ContextPart)>>handleSignal:
>>> Receiver: BlockClosure>>on:do:
>>> Arguments and temporary variables:
>>> exception: ProgressInitiationException
>>> val: nil
>>> Receiver's instance variables:
>>> sender: PasteUpMorph>>becomeActiveDuring:
>>> pc: 17
>>> stackp: 3
>>> method: (BlockClosure>>#on:do: "a CompiledMethod(869793792)")
>>> closureOrNil: nil
>>> receiver: [aBlock value]
>>>
>>> MethodContext(ContextPart)>>handleSignal:
>>> Receiver: BlockClosure>>on:do:
>>> Arguments and temporary variables:
>>> exception: ProgressInitiationException
>>> val: nil
>>> Receiver's instance variables:
>>> sender: SmalltalkEditor>>evaluateSelectionAndDo:
>>> pc: 17
>>> stackp: 3
>>> method: (BlockClosure>>#on:do: "a CompiledMethod(869793792)")
>>> closureOrNil: nil
>>> receiver: [rcvr class evaluatorClass new
>>> evaluate: self selectionForDoitAsStr...etc...
>>>
>>> MethodContext(ContextPart)>>handleSignal:
>>> Receiver: BlockClosure>>on:do:
>>> Arguments and temporary variables:
>>> exception: ProgressInitiationException
>>> val: nil
>>> Receiver's instance variables:
>>> sender: [[result := workBlock value: progress]
>>> on: ProgressNotification
>>> do:...etc...
>>> pc: 17
>>> stackp: 3
>>> method: (BlockClosure>>#on:do: "a CompiledMethod(869793792)")
>>> closureOrNil: nil
>>> receiver: [result := workBlock value: progress]
>>>
>>> MethodContext(ContextPart)>>handleSignal:
>>> Receiver: BlockClosure>>on:do:
>>> Arguments and temporary variables:
>>> exception: ProgressInitiationException
>>> val: nil
>>> Receiver's instance variables:
>>> sender:
>>> MetacelloPharoPlatform(MetacelloPlatform)>>useStackCacheDuring:defaultD...etc...
>>> pc: 17
>>> stackp: 3
>>> method: (BlockClosure>>#on:do: "a CompiledMethod(869793792)")
>>> closureOrNil: nil
>>> receiver: [^ aBlock value: dict]
>>>
>>> ProgressInitiationException(Exception)>>signal
>>> Receiver: ProgressInitiationException
>>> Arguments and temporary variables:
>>>
>>> Receiver's instance variables:
>>> messageText: nil
>>> tag: nil
>>> signaler: 'Fetching Freetype-Plugin-John M McIntosh.55'
>>> signalContext: ProgressInitiationException(Exception)>>signal
>>> handlerContext: nil
>>> outerContext: nil
>>> workBlock: [:bar |
>>> bar value: 1.
>>> aBlock value.
>>> bar value: 2]
>>> maxVal: 2
>>> minVal: 0
>>> aPoint: (635@231)
>>> progressTitle: 'Fetching Freetype-Plugin-John M McIntosh.55'
>>>
>>> ProgressInitiationException>>display:at:from:to:during:
>>> Receiver: ProgressInitiationException
>>> Arguments and temporary variables:
>>> argString: 'Fetching Freetype-Plugin-John M McIntosh.55'
>>> argPoint: (635@231)
>>> argMinVal: 0
>>> argMaxVal: 2
>>> argWorkBlock: [:bar |
>>> bar value: 1.
>>> aBlock value.
>>> bar value: 2]
>>> Receiver's instance variables:
>>> messageText: nil
>>> tag: nil
>>> signaler: 'Fetching Freetype-Plugin-John M McIntosh.55'
>>> signalContext: ProgressInitiationException(Exception)>>signal
>>> handlerContext: nil
>>> outerContext: nil
>>> workBlock: [:bar |
>>> bar value: 1.
>>> aBlock value.
>>> bar value: 2]
>>> maxVal: 2
>>> minVal: 0
>>> aPoint: (635@231)
>>> progressTitle: 'Fetching Freetype-Plugin-John M McIntosh.55'
>>>
>>> ProgressInitiationException class>>display:at:from:to:during:
>>> Receiver: ProgressInitiationException
>>> Arguments and temporary variables:
>>> aString: 'Fetching Freetype-Plugin-John M McIntosh.55'
>>> aPoint: (635@231)
>>> minVal: 0
>>> maxVal: 2
>>> workBlock: [:bar |
>>> bar value: 1.
>>> aBlock value.
>>> bar value: 2]
>>> Receiver's instance variables:
>>> superclass: Exception
>>> methodDict: a
>>> MethodDictionary(#defaultAction->(ProgressInitiationException>>#d...etc...
>>> format: 152
>>> instanceVariables: #('workBlock' 'maxVal' 'minVal' 'aPoint' 'progressTitle')
>>> organization: ('*Morphic' defaultMorphicAction)
>>> ('accessing' maxVal minVal poin...etc...
>>> subclasses: nil
>>> name: #ProgressInitiationException
>>> classPool: nil
>>> sharedPools: nil
>>> environment: a SystemDictionary(lots of globals)
>>> category: #'UIManager-Support'
>>> traitComposition: nil
>>> localSelectors: nil
>>>
>>> ByteString(String)>>displayProgressAt:from:to:during:
>>> Receiver: 'Fetching Freetype-Plugin-John M McIntosh.55'
>>> Arguments and temporary variables:
>>> aPoint: (635@231)
>>> minVal: 0
>>> maxVal: 2
>>> workBlock: [:bar |
>>> bar value: 1.
>>> aBlock value.
>>> bar value: 2]
>>> Receiver's instance variables:
>>> 'Fetching Freetype-Plugin-John M McIntosh.55'
>>>
>>> MetacelloPharoPlatform>>do:displaying:
>>> Receiver: a MetacelloPharoPlatform
>>> Arguments and temporary variables:
>>> aBlock: [| references nearestReference cachedReference externalReference
>>> loaded...etc...
>>> aString: 'Fetching Freetype-Plugin-John M McIntosh.55'
>>> Receiver's instance variables:
>>> bypassProgressBars: false
>>> bypassGoferLoadUpdateCategories: false
>>>
>>>
>>> --- The full stack ---
>>> UndefinedObject(Object)>>doesNotUnderstand: #readStream
>>> MCScanner class>>scanTokens:
>>> MCMczReader>>parseMember:
>>> MCMczReader>>loadPackage
>>> MCMczReader(MCVersionReader)>>package
>>> MCMczReader(MCVersionReader)>>basicVersion
>>> MCMczReader(MCVersionReader)>>version
>>> [:r | r version] in
>>> MCHttpRepository(MCFileBasedRepository)>>loadVersionFromFileNamed:
>>> BlockClosure>>cull:
>>> MCMczReader(ProtoObject)>>ifNotNil:
>>> MCHttpRepository>>versionReaderForFileNamed:do:
>>> MCHttpRepository(MCFileBasedRepository)>>loadVersionFromFileNamed:
>>> MCHttpRepository(MCFileBasedRepository)>>goferVersionFrom:
>>> MetacelloCachingGoferResolvedReference(GoferResolvedReference)>>version
>>> MetacelloCachingGoferResolvedReference>>version
>>> [:each | each version] in [aCollection
>>> do: [:each | each version].
>>> nearestReference version dependencies do: block.
>>> notDone := false] in
>>> MetacelloFetchingMCSpecLoader>>resolveDependencies:nearest:into:
>>> OrderedCollection>>do:
>>> [aCollection
>>> do: [:each | each version].
>>> nearestReference version dependencies do: block.
>>> notDone := false] in
>>> MetacelloFetchingMCSpecLoader>>resolveDependencies:nearest:into:
>>> BlockClosure>>on:do:
>>> MetacelloFetchingMCSpecLoader>>resolveDependencies:nearest:into:
>>> [| references nearestReference cachedReference externalReference
>>> loadedVersionInfos mcVersion |
>>> self flag: #cleanup.
>>> cachedReference := self resolvePackageSpec: packageSpec cachedGofer: self
>>> loaderPolicy cacheGofer.
>>> (cachedReference ~~ nil
>>> and: [packageSpec getFile ~~ nil])
>>> ifTrue: [cachedReference name = packageSpec file
>>> ifTrue: [^ self]].
>>> references := self retryingResolvePackageSpecReferences: packageSpec gofer:
>>> gofer.
>>> nearestReference := references last asMetacelloCachingResolvedReference.
>>> (cachedReference ~~ nil
>>> and: [cachedReference name = nearestReference name])
>>> ifTrue: [^ self].
>>> (self ignoreImage not
>>> and: [(loadedVersionInfos := self ancestorsFor: packageSpec) ~~ nil])
>>> ifTrue: [loadedVersionInfos
>>> do: [:info |
>>> info name = nearestReference name
>>> ifTrue: [^ self].
>>> nil]].
>>> externalReference := (references
>>> select: [:ref | ref name = nearestReference name]) first
>>> asMetacelloCachingResolvedReference.
>>> self repositoryMap at: externalReference name put: externalReference
>>> repository.
>>> (self
>>> resolveDependencies: externalReference
>>> nearest: nearestReference
>>> into: (OrderedCollection with: nearestReference))
>>> do: [:reference |
>>> | pSpec l |
>>> mcVersion := reference version.
>>> (l := (GoferVersionReference name: reference name)
>>> resolveAllWith: self loaderPolicy cacheGofer) isEmpty
>>> ifTrue: [self cacheRepository storeVersion: mcVersion.
>>> reference == nearestReference
>>> ifTrue: [pSpec := packageSpec]
>>> ifFalse: [pSpec := packageSpec project packageSpec.
>>> pSpec name: mcVersion info].
>>> self loadData
>>> addVersion: mcVersion
>>> versionInfo: mcVersion info
>>> resolvedReference: reference
>>> packageSpec: pSpec]].
>>> self loaderPolicy resetCacheGofer.
>>> self preLoad: packageSpec.
>>> (MetacelloDirective
>>> loadPackage: packageSpec
>>> externalReference: externalReference
>>> loader: self)
>>> addTo: self loadDirective.
>>> self postLoad: packageSpec.
>>> Transcript cr; show: 'Fetched -> ' , externalReference name , ' --- ' ,
>>> externalReference repository description , ' --- ' , nearestReference
>>> repository description] in
>>> MetacelloFetchingMCSpecLoader>>linearLoadPackageSpec:gofer:
>>> [:bar |
>>> bar value: 1.
>>> aBlock value.
>>> bar value: 2] in MetacelloPharoPlatform>>do:displaying:
>>> [result := workBlock value: progress] in [[result := workBlock value:
>>> progress]
>>> on: ProgressNotification
>>> do: [:ex |
>>> ex extraParam isString
>>> ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put: ex
>>> extraParam].
>>> ex resume]] in ProgressInitiationException>>defaultMorphicAction
>>> BlockClosure>>on:do:
>>> [[result := workBlock value: progress]
>>> on: ProgressNotification
>>> do: [:ex |
>>> ex extraParam isString
>>> ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put: ex
>>> extraParam].
>>> ex resume]] in ProgressInitiationException>>defaultMorphicAction
>>> BlockClosure>>ensure:
>>> ProgressInitiationException>>defaultMorphicAction
>>> MorphicUIManager>>progressInitiationExceptionDefaultAction:
>>> ProgressInitiationException>>defaultAction
>>> UndefinedObject>>handleSignal:
>>> MethodContext(ContextPart)>>handleSignal:
>>> MethodContext(ContextPart)>>handleSignal:
>>> MethodContext(ContextPart)>>handleSignal:
>>> MethodContext(ContextPart)>>handleSignal:
>>> ProgressInitiationException(Exception)>>signal
>>> ProgressInitiationException>>display:at:from:to:during:
>>> ProgressInitiationException class>>display:at:from:to:during:
>>> ByteString(String)>>displayProgressAt:from:to:during:
>>> MetacelloPharoPlatform>>do:displaying:
>>> Â - - - - - - - - - - - - - - -
>>> - - - - - - - - - - - - - - - - - -
>>> MetacelloFetchingMCSpecLoader>>linearLoadPackageSpec:gofer:
>>> MetacelloPackageSpec>>loadUsing:gofer:
>>> [:pkg | pkg loadUsing: self gofer: gofer] in
>>> MetacelloFetchingMCSpecLoader(MetacelloCommonMCSpecLoader)>>linearLoadPackageSpecs:repositories:
>>> OrderedCollection>>do:
>>> MetacelloFetchingMCSpecLoader(MetacelloCommonMCSpecLoader)>>linearLoadPackageSpecs:repositories:
>>> [super linearLoadPackageSpecs: packageSpecs repositories: repositories] in
>>> MetacelloFetchingMCSpecLoader>>linearLoadPackageSpecs:repositories:
>>> BlockClosure>>ensure:
>>> MetacelloLoaderPolicy>>pushLoadDirective:during:
>>> MetacelloLoaderPolicy>>pushLinearLoadDirectivesDuring:for:
>>> MetacelloFetchingMCSpecLoader>>linearLoadPackageSpecs:repositories:
>>> MetacelloFetchingMCSpecLoader(MetacelloCommonMCSpecLoader)>>load
>>> MetacelloMCVersionSpecLoader>>load
>>> MetacelloMCVersion>>executeLoadFromArray:
>>> [:dict | ^ self executeLoadFromArray: anArray] in [self versionSpec loader:
>>> newLoader.
>>> MetacelloPlatform current
>>> useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
>>> defaultDictionary: Dictionary new] in [[self versionSpec loader: newLoader.
>>> MetacelloPlatform current
>>> useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
>>> defaultDictionary: Dictionary new]
>>> ensure: [self versionSpec loader: originalLoader]] in
>>> MetacelloMCVersion>>fetchRequiredFromArray:
>>> [^ aBlock value: dict] in
>>> MetacelloPharoPlatform(MetacelloPlatform)>>useStackCacheDuring:defaultDictionary:
>>> BlockClosure>>on:do:
>>> MetacelloPharoPlatform(MetacelloPlatform)>>useStackCacheDuring:defaultDictionary:
>>> [self versionSpec loader: newLoader.
>>> MetacelloPlatform current
>>> useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
>>> defaultDictionary: Dictionary new] in [[self versionSpec loader: newLoader.
>>> MetacelloPlatform current
>>> useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
>>> defaultDictionary: Dictionary new]
>>> ensure: [self versionSpec loader: originalLoader]] in
>>> MetacelloMCVersion>>fetchRequiredFromArray:
>>> BlockClosure>>ensure:
>>> [[self versionSpec loader: newLoader.
>>> MetacelloPlatform current
>>> useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
>>> defaultDictionary: Dictionary new]
>>> ensure: [self versionSpec loader: originalLoader]] in
>>> MetacelloMCVersion>>fetchRequiredFromArray:
>>> [:bar |
>>> bar value: 1.
>>> aBlock value.
>>> bar value: 2] in MetacelloPharoPlatform>>do:displaying:
>>> [result := workBlock value: progress] in [[result := workBlock value:
>>> progress]
>>> on: ProgressNotification
>>> do: [:ex |
>>> ex extraParam isString
>>> ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put: ex
>>> extraParam].
>>> ex resume]] in ProgressInitiationException>>defaultMorphicAction
>>> BlockClosure>>on:do:
>>> [[result := workBlock value: progress]
>>> on: ProgressNotification
>>> do: [:ex |
>>> ex extraParam isString
>>> ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put: ex
>>> extraParam].
>>> ex resume]] in ProgressInitiationException>>defaultMorphicAction
>>> BlockClosure>>ensure:
>>> ProgressInitiationException>>defaultMorphicAction
>>> MorphicUIManager>>progressInitiationExceptionDefaultAction:
>>> ProgressInitiationException>>defaultAction
>>> UndefinedObject>>handleSignal:
>>> MethodContext(ContextPart)>>handleSignal:
>>> MethodContext(ContextPart)>>handleSignal:
>>> ProgressInitiationException(Exception)>>signal
>>> ProgressInitiationException>>display:at:from:to:during:
>>> ProgressInitiationException class>>display:at:from:to:during:
>>> ByteString(String)>>displayProgressAt:from:to:during:
>>> MetacelloPharoPlatform>>do:displaying:
>>> MetacelloMCVersion>>fetchRequiredFromArray:
>>> [| fetchLoader |
>>> fetchLoader := self
>>> fetchRequiredFromArray: (self defaultPackageNamesToLoad: anArray).
>>> MetacelloPlatform current
>>> do: [fetchLoader doLoad]
>>> displaying: 'Loading ' , displayString.
>>> Transcript cr; show: '...finished ' , self versionNumber printString.
>>> ^ fetchLoader] in MetacelloMCVersion>>doLoadRequiredFromArray:
>>> BlockClosure>>ensure:
>>> MetacelloMCVersion>>doLoadRequiredFromArray:
>>> MetacelloMCVersion>>load
>>> ConfigurationOfVMMaker class>>load
>>> UndefinedObject>>DoIt
>>> Compiler>>evaluate:in:to:notifying:ifFail:logged:
>>> [rcvr class evaluatorClass new
>>> evaluate: self selectionForDoitAsStream
>>> in: ctxt
>>> to: rcvr
>>> notifying: self morph
>>> ifFail: [self morph flash.
>>> ^ nil]
>>> logged: true] in SmalltalkEditor>>evaluateSelectionAndDo:
>>> BlockClosure>>on:do:
>>> SmalltalkEditor>>evaluateSelectionAndDo:
>>> SmalltalkEditor>>evaluateSelection
>>> [textMorph editor evaluateSelection] in PluggableTextMorph>>doIt
>>> [result := editBlock value] in PluggableTextMorph>>handleEdit:
>>> TextMorphForEditView(TextMorph)>>handleEdit:
>>> PluggableTextMorph>>handleEdit:
>>> PluggableTextMorph>>doIt
>>> Workspace(StringHolder)>>perform:orSendTo:
>>> [| selArgCount |
>>> (selArgCount := selector numArgs) = 0
>>> ifTrue: [target perform: selector]
>>> ifFalse: [selArgCount = arguments size
>>> ifTrue: [target perform: selector withArguments: arguments]
>>> ifFalse: [target
>>> perform: selector
>>> withArguments: (arguments copyWith: evt)]].
>>> self changed] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
>>> BlockClosure>>ensure:
>>> CursorWithMask(Cursor)>>showWhile:
>>> ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
>>> ToggleMenuItemMorph(MenuItemMorph)>>mouseUp:
>>> ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp:
>>> MouseButtonEvent>>sentTo:
>>> ToggleMenuItemMorph(Morph)>>handleEvent:
>>> MorphicEventDispatcher>>dispatchDefault:with:
>>> MorphicEventDispatcher>>dispatchEvent:with:
>>> ToggleMenuItemMorph(Morph)>>processEvent:using:
>>> MorphicEventDispatcher>>dispatchDefault:with:
>>> MorphicEventDispatcher>>dispatchEvent:with:
>>> MenuMorph(Morph)>>processEvent:using:
>>> MenuMorph(Morph)>>processEvent:
>>> MenuMorph>>handleFocusEvent:
>>> [ActiveHand := self.
>>> ActiveEvent := anEvent.
>>> result := focusHolder
>>> handleFocusEvent: (anEvent
>>> transformedBy: (focusHolder transformedFrom: self))] in
>>> HandMorph>>sendFocusEvent:to:clear:
>>> [aBlock value] in PasteUpMorph>>becomeActiveDuring:
>>> BlockClosure>>on:do:
>>> PasteUpMorph>>becomeActiveDuring:
>>> HandMorph>>sendFocusEvent:to:clear:
>>> HandMorph>>sendEvent:focus:clear:
>>> HandMorph>>sendMouseEvent:
>>> HandMorph>>handleEvent:
>>> HandMorph>>processEvents
>>> [:h |
>>> ActiveHand := h.
>>> h processEvents.
>>> ActiveHand := nil] in WorldState>>doOneCycleNowFor:
>>> Array(SequenceableCollection)>>do:
>>> WorldState>>handsDo:
>>> WorldState>>doOneCycleNowFor:
>>> WorldState>>doOneCycleFor:
>>> WorldState>>doOneSubCycleFor:
>>> PasteUpMorph>>doOneSubCycle
>>> MenuMorph>>invokeModalAt:in:allowKeyboard:
>>> MenuMorph>>invokeModal:
>>> MenuMorph>>invokeModal
>>> PluggableTextMorph>>yellowButtonActivity:
>>> TextMorphForEditView>>mouseDown:
>>> TextMorphForEditView(Morph)>>handleMouseDown:
>>> MouseButtonEvent>>sentTo:
>>> TextMorphForEditView(Morph)>>handleEvent:
>>> MorphicEventDispatcher>>dispatchMouseDown:with:
>>> MorphicEventDispatcher>>dispatchEvent:with:
>>> TextMorphForEditView(Morph)>>processEvent:using:
>>> MorphicEventDispatcher>>dispatchMouseDown:with:
>>> MorphicEventDispatcher>>dispatchEvent:with:
>>> TransformMorph(Morph)>>processEvent:using:
>>> MorphicEventDispatcher>>dispatchMouseDown:with:
>>> MorphicEventDispatcher>>dispatchEvent:with:
>>> PluggableTextMorph(Morph)>>processEvent:using:
>>> MorphicEventDispatcher>>dispatchMouseDown:with:
>>> MorphicEventDispatcher>>dispatchEvent:with:
>>> SystemWindow(Morph)>>processEvent:using:
>>> MorphicEventDispatcher>>dispatchMouseDown:with:
>>> MorphicEventDispatcher>>dispatchEvent:with:
>>> PasteUpMorph(Morph)>>processEvent:using:
>>> PasteUpMorph>>processEvent:using:
>>> PasteUpMorph(Morph)>>processEvent:
>>> HandMorph>>sendEvent:focus:clear:
>>> HandMorph>>sendMouseEvent:
>>> HandMorph>>handleEvent:
>>> HandMorph>>processEvents
>>> [:h |
>>> ActiveHand := h.
>>> h processEvents.
>>> ActiveHand := nil] in WorldState>>doOneCycleNowFor:
>>> Array(SequenceableCollection)>>do:
>>> WorldState>>handsDo:
>>> WorldState>>doOneCycleNowFor:
>>> WorldState>>doOneCycleFor:
>>> PasteUpMorph>>doOneCycle
>>> [[World doOneCycle.
>>> Processor yield.
>>> false] whileFalse.
>>> nil] in MorphicUIManager>>spawnNewProcess
>>> [self value.
>>> Processor terminateActive] in BlockClosure>>newProcess
>>>
>>>
>>> ________________________________
>>> From: Nicolas Cellier <nicolas.cellier.aka.nice(a)gmail.com>
>>> To: Pharo-project(a)lists.gforge.inria.fr; dimitris chloupis
>>> <thekilon(a)yahoo.co.uk>
>>> Sent: Sunday, 29 January 2012, 11:39
>>> Subject: Re: [Pharo-project] Trying to build CogVM in MacOSX 10.7 Lion
>>>
>>> 2012/1/29 dimitris chloupis <thekilon(a)yahoo.co.uk>:
>>>> ok if you want me to install the latest I will install the latest , but
>>>> there is no such documentation I am aware of how to do that .
>>>>
>>>> Can you help me ?
>>>>
>>>> Currently I have NBCog , Pharo-1.4 image and the latest from "Â git clone
>>>> git://gitorious.org/cogvm/blessed.git"
>>>>
>>>> But I have no idea how to install the latest VMMaker and CMakeVMMaker
>>>>
>>>> I tried monticello giving it this adress
>>>>
>>>> MCHttpRepository
>>>>Â Â location: 'http://www.squeaksource.com/VMMaker'
>>>>Â Â user: ''
>>>>Â Â password: ''
>>>>
>>>
>>> I agree with you, we are very very bad when it come to documenting how to...
>>> To aggravate this situation, the ground is moving fast under our feet.
>>> If you open above address in a web browser, you'll see this:
>>>
>>> Effective 05-Sept-2011, the VMMaker repository is hosted at
>>> http://source.squeak.org/VMMaker.html and new updates will appear in
>>> that repository, possibly mirrored here for convenience. Please update
>>> your Montecello browsers accordingly.
>>>
>>> There is a Metacello invocation for loading all Pharo compatible or
>>> Pharo specific packages maybe something like this (I'm not totally
>>> sure, but Pharo gurus will correct me)
>>>
>>> Gofer new
>>> Â squeaksource: 'MetacelloRepository';
>>> Â package: 'ConfigurationOfVMMaker';
>>> Â load.
>>> (Smalltalk at: #ConfigurationOfVMMaker) perform: #load.
>>>
>>> I don't have write access to these repositories, but I wish this
>>> incantation were in the project description or the wiki of both pages
>>> http://source.squeak.org/VMMaker.html and
>>> http://www.squeaksource.com/VMMaker
>>>
>>> I also see a notice about SVN, but nothing about the git repository...
>>> I'm sure detailed instructions exist somewhere but a link should be
>>> provided from the Monticello project page.
>>> That's the least we should do, and not only for newbies (I often swear
>>> like troopers when I loose my time searching the precious
>>> information).
>>> These little obstacles are repelling many people I guess, it's like we
>>> should follow an initiation before we dare putting our dirty nose in
>>> code.
>>> I don't like this spirit, and I hope it's unintentional, but it's
>>> totally contrary to Smalltalk foundations.
>>>
>>> Nicolas
>>>
>>>>
>>>> Any package I click to load it gives me dependency issues and update
>>>> package
>>>> complains about a Bad
>>>>
>>>> Gateway
>>>>
>>>>
>>>> Yes I got the very latest of XCode and I am open to any suggestion.
>>>>
>>>> ________________________________
>>>> From: Igor Stasenko <siguctua(a)gmail.com>
>>>> To: Pharo-project(a)lists.gforge.inria.fr
>>>> Sent: Sunday, 29 January 2012, 1:00
>>>> Subject: Re: [Pharo-project] Trying to build CogVM in MacOSX 10.7 Lion
>>>>
>>>>
>>>>
>>>> I don't know. But how do you know from his stackstrace that the problem is
>>>> that ?
>>>>
>>>>
>>>> i dont. :)
>>>> i replied after seeing an Esteban's message saying that your post is
>>>> outdated and one should use 3.9 config version.
>>>> and couple days before we had someone who asking why NB-enabled VM fails
>>>> to
>>>> build for him,
>>>> when he still using this magic
>>>> Â ((Smalltalk at: #ConfigurationOfVMMaker) project version: '1.5') load.
>>>>
>>>> while when i was released an CMakeVMMaker configs for NB , it was already
>>>> far beyond that version,
>>>> and of course won't work with 1.5.
>>>>
>>>> --
>>>> Best regards,
>>>> Igor Stasenko.
>>>>
>>>>
>>>
>>>
Jan. 29, 2012
Re: [Pharo-project] Smalltalk for small projects only?
by Michael Haupt
Dimitris,
this is very interesting; I've always wanted to read that kind of study. Do you have a pointer?
Thanks,
Michael
Am 29.01.2012 um 08:51 schrieb dimitris chloupis <thekilon(a)yahoo.co.uk>:
> Maybe not for smalltalk but for python there is a number of surveys that prove that by replacing java with python you can scale down developing time by 2-3x times. By "prove" I mean projects that have actually done that. Not quite a 10x but I think its impressive non the less and I think the numbers wont be very dissimilar for smalltalk
>
> From: Michael Haupt <mhaupt(a)gmail.com>
> To: "Pharo-project(a)lists.gforge.inria.fr" <Pharo-project(a)lists.gforge.inria.fr>
> Sent: Saturday, 28 January 2012, 23:29
> Subject: Re: [Pharo-project] Smalltalk for small projects only?
>
> Janko,
>
> Am 28.01.2012 um 21:08 schrieb Janko Mivšek <janko.mivsek(a)eranova.si>:
> >> I think this is a post that clearly illustrates the big problem with
> >> smalltalk. The very fact that is compared with Java and Java survives.
> >
> > Yes, that 4-5 peole can do what 50 Java people are needed is both a
> > blessing and a curse :)
>
> I wanted to ask this earlier: is there actual evidence for this, or is it just boasting?
>
> > Blessing because of productivity, curse because
> > we are not able to scale beyond one highly connected development group.
> > We don't have project management practices and tools, while Java guys
> > have because they need them from the start.
>
> I'm not so sure the people at those Smalltalk firms building software for banks et al. have no project management. Boasting? ;-)
>
> Best,
>
> Michael
>
>
Jan. 29, 2012
Re: [Pharo-project] [:x :y| x*x. â x + y]
by Tobias Pape
Am 2012-01-29 um 13:17 schrieb Dave Mason:
>
> On 2012-Jan-29, at 4:22 , Stéphane Ducasse wrote:
>
>> is there a naming convention for such blocks. In the chapter I called them escaping block
>> but I also used continuation blocks. (I do not like continuation blocks since to me it is unclear) but
>> if this is a convention I would follow it.
>
> Continuation blocks is wrong - continuations are a particular thing and this would be confusing.
>
> Escaping blocks is fine, but I call them returning blocks. I could see an argument for either
I think these are "blocks with non-local return" :)
(as opposed to blocks with "local return" like [:x :y| x*x. x + y])
Best
-Tobias
Jan. 29, 2012
Re: [Pharo-project] [:x :y| x*x. â x + y]
by Dave Mason
On 2012-Jan-29, at 4:22 , Stéphane Ducasse wrote:
> is there a naming convention for such blocks. In the chapter I called them escaping block
> but I also used continuation blocks. (I do not like continuation blocks since to me it is unclear) but
> if this is a convention I would follow it.
Continuation blocks is wrong - continuations are a particular thing and this would be confusing.
Escaping blocks is fine, but I call them returning blocks. I could see an argument for either
../Dave
Jan. 29, 2012
Re: [Pharo-project] Trying to build CogVM in MacOSX 10.7 Lion
by Nicolas Cellier
And when I retry with a specific version, I get another Error because
FreeType cannot be resolved...
Gofer new
squeaksource: 'MetacelloRepository';
package: 'ConfigurationOfVMMaker';
load.
((Smalltalk at: #ConfigurationOfVMMaker) project version: '1.5') perform: #load.
Could that be that the developpers of this configuration missed the
bug because the item already was in their package-cache?
I think that relying on the package-cache is a good optimization for
speed, but should be forbiden when validating the configuration...
Nicolas
29 January 2012 11:56:37 am
VM: Mac OS - intel - 1068 - CoInterpreter * VMMaker-oscog-nice2.99,
VMMaker-eem.35, VMMaker-oscog.52, VMMaker-oscog-dtl.63,
VMMaker.oscog-eem.139 uuid: f0429633-b524-4abb-95fa-e2cf44a37805 Dec
4 2011, StackToRegisterMappingCogit * VMMaker-oscog-nice2.99,
VMMaker-eem.35, VMMaker-oscog.52, VMMaker-oscog-dtl.63,
VMMaker.oscog-eem.139 uuid: f0429633-b524-4abb-95fa-e2cf44a37805 Dec
4 2011, r2519 http://squeakvm.org/svn/squeak/branches/Cog
Image: Pharo1.4a [Latest update: #14294]
MetacelloFetchingMCSpecLoader(Object)>>error:
Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.2
[ConfigurationOfVMMaker]
load : FFI-Poo...etc...
Arguments and temporary variables:
aString: 'Could not resolve: FreeType [FreeType-tween.435] in
/Users/nicolas/Sm...etc...
Receiver's instance variables:
spec: a MetacelloMCVersionSpecLoader
operator: nil
loaderPolicy: a MetacelloLoaderPolicy
disablePackageCache: false
MetacelloFetchingMCSpecLoader(MetacelloCommonMCSpecLoader)>>retryingResolvePackageSpecReferences:gofer:
Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.2
[ConfigurationOfVMMaker]
load : FFI-Poo...etc...
Arguments and temporary variables:
<<error during printing>
Receiver's instance variables:
spec: a MetacelloMCVersionSpecLoader
operator: nil
loaderPolicy: a MetacelloLoaderPolicy
disablePackageCache: false
[| references nearestReference cachedReference externalReference
loadedVersionInfos mcVersion |
self flag: #cleanup.
cachedReference := self resolvePackageSpec: packageSpec cachedGofer:
self loaderPolicy cacheGofer.
(cachedReference ~~ nil
and: [packageSpec getFile ~~ nil])
ifTrue: [cachedReference name = packageSpec file
ifTrue: [^ self]].
references := self retryingResolvePackageSpecReferences: packageSpec
gofer: gofer.
nearestReference := references last asMetacelloCachingResolvedReference.
(cachedReference ~~ nil
and: [cachedReference name = nearestReference name])
ifTrue: [^ self].
(self ignoreImage not
and: [(loadedVersionInfos := self ancestorsFor: packageSpec) ~~ nil])
ifTrue: [loadedVersionInfos
do: [:info |
info name = nearestReference name
ifTrue: [^ self].
nil]].
externalReference := (references
select: [:ref | ref name = nearestReference name]) first
asMetacelloCachingResolvedReference.
self repositoryMap at: externalReference name put: externalReference
repository.
(self
resolveDependencies: externalReference
nearest: nearestReference
into: (OrderedCollection with: nearestReference))
do: [:reference |
| pSpec l |
mcVersion := reference version.
(l := (GoferVersionReference name: reference name)
resolveAllWith: self loaderPolicy cacheGofer) isEmpty
ifTrue: [self cacheRepository storeVersion: mcVersion.
reference == nearestReference
ifTrue: [pSpec := packageSpec]
ifFalse: [pSpec := packageSpec project packageSpec.
pSpec name: mcVersion info].
self loadData
addVersion: mcVersion
versionInfo: mcVersion info
resolvedReference: reference
packageSpec: pSpec]].
self loaderPolicy resetCacheGofer.
self preLoad: packageSpec.
(MetacelloDirective
loadPackage: packageSpec
externalReference: externalReference
loader: self)
addTo: self loadDirective.
self postLoad: packageSpec.
Transcript cr; show: 'Fetched -> ' , externalReference name , ' --- '
, externalReference repository description , ' --- ' ,
nearestReference repository description] in
MetacelloFetchingMCSpecLoader>>linearLoadPackageSpec:gofer:
Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.2
[ConfigurationOfVMMaker]
load : FFI-Poo...etc...
Arguments and temporary variables:
packageSpec: spec
name: 'FreeType';
file: 'FreeType-tween.435'.
gofer: a MetacelloGofer
references: nil
nearestReference: nil
cachedReference: nil
externalReference: nil
loadedVersionInfos: nil
mcVersion: #(nil)
Receiver's instance variables:
spec: a MetacelloMCVersionSpecLoader
operator: nil
loaderPolicy: a MetacelloLoaderPolicy
disablePackageCache: false
[:bar |
bar value: 1.
aBlock value.
bar value: 2] in MetacelloPharoPlatform>>do:displaying:
Receiver: a MetacelloPharoPlatform
Arguments and temporary variables:
aBlock: [:barValArg |
| barVal return newBarSize |
barVal := barValArg.
retur...etc...
bar: [| references nearestReference cachedReference
externalReference loadedVer...etc...
Receiver's instance variables:
bypassProgressBars: false
bypassGoferLoadUpdateCategories: false
[result := workBlock value: progress] in [[result := workBlock value: progress]
on: ProgressNotification
do: [:ex |
ex extraParam isString
ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put:
ex extraParam].
ex resume]] in ProgressInitiationException>>defaultMorphicAction
Receiver: ProgressInitiationException
Arguments and temporary variables:
progress: [:barValArg |
| barVal return newBarSize |
barVal := barValArg.
ret...etc...
result: #(nil)
Receiver's instance variables:
messageText: nil
tag: nil
signaler: 'Fetching FreeType-tween.435'
signalContext: ProgressInitiationException(Exception)>>signal
handlerContext: nil
outerContext: nil
workBlock: [:bar |
bar value: 1.
aBlock value.
bar value: 2]
maxVal: 2
minVal: 0
aPoint: (561@206)
progressTitle: 'Fetching FreeType-tween.435'
BlockClosure>>on:do:
Receiver: [result := workBlock value: progress]
Arguments and temporary variables:
exception: ProgressNotification
handlerAction: [:ex |
ex extraParam isString
ifTrue: [SystemProgressMorph un...etc...
handlerActive: true
Receiver's instance variables:
outerContext: [[result := workBlock value: progress]
on: ProgressNotification...etc...
startpc: 87
numArgs: 0
[[result := workBlock value: progress]
on: ProgressNotification
do: [:ex |
ex extraParam isString
ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put:
ex extraParam].
ex resume]] in ProgressInitiationException>>defaultMorphicAction
Receiver: ProgressInitiationException
Arguments and temporary variables:
progress: [:barValArg |
| barVal return newBarSize |
barVal := barValArg.
ret...etc...
result: #(nil)
Receiver's instance variables:
messageText: nil
tag: nil
signaler: 'Fetching FreeType-tween.435'
signalContext: ProgressInitiationException(Exception)>>signal
handlerContext: nil
outerContext: nil
workBlock: [:bar |
bar value: 1.
aBlock value.
bar value: 2]
maxVal: 2
minVal: 0
aPoint: (561@206)
progressTitle: 'Fetching FreeType-tween.435'
BlockClosure>>ensure:
Receiver: [[result := workBlock value: progress]
on: ProgressNotification
do: [:ex |
ex extr...etc...
Arguments and temporary variables:
aBlock: [SystemProgressMorph close: progress]
complete: nil
returnValue: nil
Receiver's instance variables:
outerContext: ProgressInitiationException>>defaultMorphicAction
startpc: 81
numArgs: 0
ProgressInitiationException>>defaultMorphicAction
Receiver: ProgressInitiationException
Arguments and temporary variables:
progress: [:barValArg |
| barVal return newBarSize |
barVal := barValArg.
ret...etc...
result: #(nil)
Receiver's instance variables:
messageText: nil
tag: nil
signaler: 'Fetching FreeType-tween.435'
signalContext: ProgressInitiationException(Exception)>>signal
handlerContext: nil
outerContext: nil
workBlock: [:bar |
bar value: 1.
aBlock value.
bar value: 2]
maxVal: 2
minVal: 0
aPoint: (561@206)
progressTitle: 'Fetching FreeType-tween.435'
MorphicUIManager>>progressInitiationExceptionDefaultAction:
Receiver: a MorphicUIManager
Arguments and temporary variables:
anException: ProgressInitiationException
Receiver's instance variables:
interactiveParser: nil
ProgressInitiationException>>defaultAction
Receiver: ProgressInitiationException
Arguments and temporary variables:
Receiver's instance variables:
messageText: nil
tag: nil
signaler: 'Fetching FreeType-tween.435'
signalContext: ProgressInitiationException(Exception)>>signal
handlerContext: nil
outerContext: nil
workBlock: [:bar |
bar value: 1.
aBlock value.
bar value: 2]
maxVal: 2
minVal: 0
aPoint: (561@206)
progressTitle: 'Fetching FreeType-tween.435'
UndefinedObject>>handleSignal:
Receiver: nil
Arguments and temporary variables:
exception: ProgressInitiationException
Receiver's instance variables:
nil
MethodContext(ContextPart)>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
exception: ProgressInitiationException
val: nil
Receiver's instance variables:
sender: PasteUpMorph>>becomeActiveDuring:
pc: 17
stackp: 3
method: (BlockClosure>>#on:do: "a CompiledMethod(954990592)")
closureOrNil: nil
receiver: [aBlock value]
MethodContext(ContextPart)>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
exception: ProgressInitiationException
val: nil
Receiver's instance variables:
sender: SmalltalkEditor>>evaluateSelectionAndDo:
pc: 17
stackp: 3
method: (BlockClosure>>#on:do: "a CompiledMethod(954990592)")
closureOrNil: nil
receiver: [rcvr class evaluatorClass new
evaluate: self selectionForDoitAsStr...etc...
MethodContext(ContextPart)>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
exception: ProgressInitiationException
val: nil
Receiver's instance variables:
sender: [[result := workBlock value: progress]
on: ProgressNotification
do:...etc...
pc: 17
stackp: 3
method: (BlockClosure>>#on:do: "a CompiledMethod(954990592)")
closureOrNil: nil
receiver: [result := workBlock value: progress]
MethodContext(ContextPart)>>handleSignal:
Receiver: BlockClosure>>on:do:
Arguments and temporary variables:
exception: ProgressInitiationException
val: nil
Receiver's instance variables:
sender: MetacelloPharoPlatform(MetacelloPlatform)>>useStackCacheDuring:defaultD...etc...
pc: 17
stackp: 3
method: (BlockClosure>>#on:do: "a CompiledMethod(954990592)")
closureOrNil: nil
receiver: [^ aBlock value: dict]
ProgressInitiationException(Exception)>>signal
Receiver: ProgressInitiationException
Arguments and temporary variables:
Receiver's instance variables:
messageText: nil
tag: nil
signaler: 'Fetching FreeType-tween.435'
signalContext: ProgressInitiationException(Exception)>>signal
handlerContext: nil
outerContext: nil
workBlock: [:bar |
bar value: 1.
aBlock value.
bar value: 2]
maxVal: 2
minVal: 0
aPoint: (561@206)
progressTitle: 'Fetching FreeType-tween.435'
ProgressInitiationException>>display:at:from:to:during:
Receiver: ProgressInitiationException
Arguments and temporary variables:
argString: 'Fetching FreeType-tween.435'
argPoint: (561@206)
argMinVal: 0
argMaxVal: 2
argWorkBlock: [:bar |
bar value: 1.
aBlock value.
bar value: 2]
Receiver's instance variables:
messageText: nil
tag: nil
signaler: 'Fetching FreeType-tween.435'
signalContext: ProgressInitiationException(Exception)>>signal
handlerContext: nil
outerContext: nil
workBlock: [:bar |
bar value: 1.
aBlock value.
bar value: 2]
maxVal: 2
minVal: 0
aPoint: (561@206)
progressTitle: 'Fetching FreeType-tween.435'
ProgressInitiationException class>>display:at:from:to:during:
Receiver: ProgressInitiationException
Arguments and temporary variables:
aString: 'Fetching FreeType-tween.435'
aPoint: (561@206)
minVal: 0
maxVal: 2
workBlock: [:bar |
bar value: 1.
aBlock value.
bar value: 2]
Receiver's instance variables:
superclass: Exception
methodDict: a
MethodDictionary(#defaultAction->(ProgressInitiationException>>#d...etc...
format: 152
instanceVariables: #('workBlock' 'maxVal' 'minVal' 'aPoint' 'progressTitle')
organization: ('*Morphic' defaultMorphicAction)
('accessing' maxVal minVal poin...etc...
subclasses: nil
name: #ProgressInitiationException
classPool: nil
sharedPools: nil
environment: a SystemDictionary(lots of globals)
category: #'UIManager-Support'
traitComposition: nil
localSelectors: nil
ByteString(String)>>displayProgressAt:from:to:during:
Receiver: 'Fetching FreeType-tween.435'
Arguments and temporary variables:
aPoint: (561@206)
minVal: 0
maxVal: 2
workBlock: [:bar |
bar value: 1.
aBlock value.
bar value: 2]
Receiver's instance variables:
'Fetching FreeType-tween.435'
MetacelloPharoPlatform>>do:displaying:
Receiver: a MetacelloPharoPlatform
Arguments and temporary variables:
aBlock: [| references nearestReference cachedReference
externalReference loaded...etc...
aString: 'Fetching FreeType-tween.435'
Receiver's instance variables:
bypassProgressBars: false
bypassGoferLoadUpdateCategories: false
MetacelloFetchingMCSpecLoader>>linearLoadPackageSpec:gofer:
Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.2
[ConfigurationOfVMMaker]
load : FFI-Poo...etc...
Arguments and temporary variables:
packageSpec: spec
name: 'FreeType';
file: 'FreeType-tween.435'.
gofer: a MetacelloGofer
Receiver's instance variables:
spec: a MetacelloMCVersionSpecLoader
operator: nil
loaderPolicy: a MetacelloLoaderPolicy
disablePackageCache: false
MetacelloPackageSpec>>loadUsing:gofer:
Receiver: spec
name: 'FreeType';
file: 'FreeType-tween.435'.
Arguments and temporary variables:
aLoader: a MetacelloFetchingMCSpecLoader(linear load : 1.2
[ConfigurationOfVMMa...etc...
gofer: a MetacelloGofer
Receiver's instance variables:
project: ConfigurationOfVMMaker(1.0-baseline
[ConfigurationOfVMMaker], 1.0 [Con...etc...
loader: nil
name: 'FreeType'
requires: #()
includes: #()
answers: #()
file: 'FreeType-tween.435'
repositories: spec
goferPackage: a MetacelloGoferPackage name: 'FreeType'
preLoadDoIt: nil
postLoadDoIt: nil
[:pkg | pkg loadUsing: self gofer: gofer] in
MetacelloFetchingMCSpecLoader(MetacelloCommonMCSpecLoader)>>linearLoadPackageSpecs:repositories:
Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.2
[ConfigurationOfVMMaker]
load : FFI-Poo...etc...
Arguments and temporary variables:
gofer: spec
name: 'FreeType';
file: 'FreeType-tween.435'.
pkg: a MetacelloGofer
Receiver's instance variables:
spec: a MetacelloMCVersionSpecLoader
operator: nil
loaderPolicy: a MetacelloLoaderPolicy
disablePackageCache: false
OrderedCollection>>do:
Receiver: an OrderedCollection(spec
name: 'FFI-Pools';
file: 'FFI-Pools-ar.1'. spec
name: 'Shar...etc...
Arguments and temporary variables:
aBlock: [:pkg | pkg loadUsing: self gofer: gofer]
index: 14
Receiver's instance variables:
array: an Array(spec
name: 'FFI-Pools';
file: 'FFI-Pools-ar.1'. spec
name:...etc...
firstIndex: 1
lastIndex: 14
MetacelloFetchingMCSpecLoader(MetacelloCommonMCSpecLoader)>>linearLoadPackageSpecs:repositories:
Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.2
[ConfigurationOfVMMaker]
load : FFI-Poo...etc...
Arguments and temporary variables:
packageSpecs: an OrderedCollection(spec
name: 'FFI-Pools';
file: 'FFI-Pools-...etc...
repositories: an OrderedCollection(a
MCHttpRepository(http://www.squeaksource.c...etc...
gofer: a MetacelloGofer
Receiver's instance variables:
spec: a MetacelloMCVersionSpecLoader
operator: nil
loaderPolicy: a MetacelloLoaderPolicy
disablePackageCache: false
[super linearLoadPackageSpecs: packageSpecs repositories:
repositories] in
MetacelloFetchingMCSpecLoader>>linearLoadPackageSpecs:repositories:
Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.2
[ConfigurationOfVMMaker]
load : FFI-Poo...etc...
Arguments and temporary variables:
packageSpecs: an OrderedCollection(spec
name: 'FFI-Pools';
file: 'FFI-Pools-...etc...
repositories: an OrderedCollection(a
MCHttpRepository(http://www.squeaksource.c...etc...
Receiver's instance variables:
spec: a MetacelloMCVersionSpecLoader
operator: nil
loaderPolicy: a MetacelloLoaderPolicy
disablePackageCache: false
BlockClosure>>ensure:
Receiver: [super linearLoadPackageSpecs: packageSpecs repositories:
repositories]
Arguments and temporary variables:
aBlock: [loadDirective := oldRoot]
complete: nil
returnValue: nil
Receiver's instance variables:
outerContext:
MetacelloFetchingMCSpecLoader>>linearLoadPackageSpecs:repositorie...etc...
startpc: 33
numArgs: 0
MetacelloLoaderPolicy>>pushLoadDirective:during:
Receiver: a MetacelloLoaderPolicy
Arguments and temporary variables:
aLoaderDirective: linear load : 1.2 [ConfigurationOfVMMaker]
load : FFI-Pools-...etc...
aBlock: [super linearLoadPackageSpecs: packageSpecs repositories:
repositories]...etc...
oldRoot: linear load :
preload : 1.2 [ConfigurationOfVMMaker] >> pharoUndesco...etc...
Receiver's instance variables:
overrideRepositories: nil
repositoryMap: a Dictionary('Alien-VMMaker-Support-John M
McIntosh.8'->a MCHttp...etc...
ensuredMap: a Dictionary()
cacheRepository: a MCDictionaryRepository(cache)
cacheGofer: a Gofer
ignoreImage: false
loadData: a MetacelloLoadData
loadDirective: linear load : 1.2 [ConfigurationOfVMMaker]
load : FFI-Pools-ar....etc...
silently: false
MetacelloLoaderPolicy>>pushLinearLoadDirectivesDuring:for:
Receiver: a MetacelloLoaderPolicy
Arguments and temporary variables:
aBlock: [super linearLoadPackageSpecs: packageSpecs repositories:
repositories]...etc...
aLoader: a MetacelloFetchingMCSpecLoader(linear load : 1.2
[ConfigurationOfVMMa...etc...
Receiver's instance variables:
overrideRepositories: nil
repositoryMap: a Dictionary('Alien-VMMaker-Support-John M
McIntosh.8'->a MCHttp...etc...
ensuredMap: a Dictionary()
cacheRepository: a MCDictionaryRepository(cache)
cacheGofer: a Gofer
ignoreImage: false
loadData: a MetacelloLoadData
loadDirective: linear load : 1.2 [ConfigurationOfVMMaker]
load : FFI-Pools-ar....etc...
silently: false
MetacelloFetchingMCSpecLoader>>linearLoadPackageSpecs:repositories:
Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.2
[ConfigurationOfVMMaker]
load : FFI-Poo...etc...
Arguments and temporary variables:
packageSpecs: an OrderedCollection(spec
name: 'FFI-Pools';
file: 'FFI-Pools-...etc...
repositories: an OrderedCollection(a
MCHttpRepository(http://www.squeaksource.c...etc...
Receiver's instance variables:
spec: a MetacelloMCVersionSpecLoader
operator: nil
loaderPolicy: a MetacelloLoaderPolicy
disablePackageCache: false
MetacelloFetchingMCSpecLoader(MetacelloCommonMCSpecLoader)>>load
Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.2
[ConfigurationOfVMMaker]
load : FFI-Poo...etc...
Arguments and temporary variables:
repos: an OrderedCollection(a
MCHttpRepository(http://www.squeaksource.com/Spee...etc...
Receiver's instance variables:
spec: a MetacelloMCVersionSpecLoader
operator: nil
loaderPolicy: a MetacelloLoaderPolicy
disablePackageCache: false
MetacelloMCVersionSpecLoader>>load
Receiver: a MetacelloMCVersionSpecLoader
Arguments and temporary variables:
mcLoader: a MetacelloFetchingMCSpecLoader(linear load : 1.2
[ConfigurationOfVMM...etc...
Receiver's instance variables:
versionSpec: spec blessing: #'development'.
spec preLoadDoIt: #'pharoUndescoreA...etc...
required: a Set('FreeType' 'default')
packages: a Dictionary('Alien-VMMaker-Support'->spec
name: 'Alien-VMMaker-Sup...etc...
loader: a MetacelloFetchingMCSpecLoader(linear load : 1.2
[ConfigurationOfVMMak...etc...
loaderPolicy: a MetacelloLoaderPolicy
MetacelloMCVersion>>executeLoadFromArray:
Receiver: >=1.2 [ConfigurationOfVMMaker]
Arguments and temporary variables:
anArray: a Set('FreeType' 'default')
loader: a MetacelloMCVersionSpecLoader
mcLoader: nil
Receiver's instance variables:
spec: spec blessing: #'development'.
spec preLoadDoIt: #'pharoUndescoreAssignme...etc...
versionNumber: 1.2
importedVersions: an OrderedCollection('1.2-baseline')
versionStatus: #loadedMatchConstraints
loaderPolicy: a MetacelloLoaderPolicy
[:dict | ^ self executeLoadFromArray: anArray] in [self versionSpec
loader: newLoader.
MetacelloPlatform current
useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
defaultDictionary: Dictionary new] in [[self versionSpec loader: newLoader.
MetacelloPlatform current
useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
defaultDictionary: Dictionary new]
ensure: [self versionSpec loader: originalLoader]] in
MetacelloMCVersion>>fetchRequiredFromArray:
Receiver: >=1.2 [ConfigurationOfVMMaker]
Arguments and temporary variables:
anArray: a Dictionary(#ancestors->a
Dictionary('Alien-VMMaker-Support-John M Mc...etc...
dict: a Set('FreeType' 'default')
Receiver's instance variables:
spec: spec blessing: #'development'.
spec preLoadDoIt: #'pharoUndescoreAssignme...etc...
versionNumber: 1.2
importedVersions: an OrderedCollection('1.2-baseline')
versionStatus: #loadedMatchConstraints
loaderPolicy: a MetacelloLoaderPolicy
[^ aBlock value: dict] in
MetacelloPharoPlatform(MetacelloPlatform)>>useStackCacheDuring:defaultDictionary:
Receiver: a MetacelloPharoPlatform
Arguments and temporary variables:
aBlock: [:dict | ^ self executeLoadFromArray: anArray]
dict: a Dictionary(#ancestors->a
Dictionary('Alien-VMMaker-Support-John M McInt...etc...
Receiver's instance variables:
bypassProgressBars: false
bypassGoferLoadUpdateCategories: false
BlockClosure>>on:do:
Receiver: [^ aBlock value: dict]
Arguments and temporary variables:
exception: an ExceptionSet
handlerAction: [:ex |
| keys |
(ex isKindOf: MetacelloStackCacheNotification)
...etc...
handlerActive: true
Receiver's instance variables:
outerContext:
MetacelloPharoPlatform(MetacelloPlatform)>>useStackCacheDuring:de...etc...
startpc: 100
numArgs: 0
MetacelloPharoPlatform(MetacelloPlatform)>>useStackCacheDuring:defaultDictionary:
Receiver: a MetacelloPharoPlatform
Arguments and temporary variables:
aBlock: [:dict | ^ self executeLoadFromArray: anArray]
defaultDictionary: a Dictionary(#ancestors->a
Dictionary('Alien-VMMaker-Support...etc...
dict: a Dictionary(#ancestors->a
Dictionary('Alien-VMMaker-Support-John M McInt...etc...
Receiver's instance variables:
bypassProgressBars: false
bypassGoferLoadUpdateCategories: false
[self versionSpec loader: newLoader.
MetacelloPlatform current
useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
defaultDictionary: Dictionary new] in [[self versionSpec loader: newLoader.
MetacelloPlatform current
useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
defaultDictionary: Dictionary new]
ensure: [self versionSpec loader: originalLoader]] in
MetacelloMCVersion>>fetchRequiredFromArray:
Receiver: >=1.2 [ConfigurationOfVMMaker]
Arguments and temporary variables:
anArray: a Set('FreeType' 'default')
newLoader: a MetacelloFetchingMCSpecLoader(linear load : )
Receiver's instance variables:
spec: spec blessing: #'development'.
spec preLoadDoIt: #'pharoUndescoreAssignme...etc...
versionNumber: 1.2
importedVersions: an OrderedCollection('1.2-baseline')
versionStatus: #loadedMatchConstraints
loaderPolicy: a MetacelloLoaderPolicy
--- The full stack ---
MetacelloFetchingMCSpecLoader(Object)>>error:
MetacelloFetchingMCSpecLoader(MetacelloCommonMCSpecLoader)>>retryingResolvePackageSpecReferences:gofer:
[| references nearestReference cachedReference externalReference
loadedVersionInfos mcVersion |
self flag: #cleanup.
cachedReference := self resolvePackageSpec: packageSpec cachedGofer:
self loaderPolicy cacheGofer.
(cachedReference ~~ nil
and: [packageSpec getFile ~~ nil])
ifTrue: [cachedReference name = packageSpec file
ifTrue: [^ self]].
references := self retryingResolvePackageSpecReferences: packageSpec
gofer: gofer.
nearestReference := references last asMetacelloCachingResolvedReference.
(cachedReference ~~ nil
and: [cachedReference name = nearestReference name])
ifTrue: [^ self].
(self ignoreImage not
and: [(loadedVersionInfos := self ancestorsFor: packageSpec) ~~ nil])
ifTrue: [loadedVersionInfos
do: [:info |
info name = nearestReference name
ifTrue: [^ self].
nil]].
externalReference := (references
select: [:ref | ref name = nearestReference name]) first
asMetacelloCachingResolvedReference.
self repositoryMap at: externalReference name put: externalReference
repository.
(self
resolveDependencies: externalReference
nearest: nearestReference
into: (OrderedCollection with: nearestReference))
do: [:reference |
| pSpec l |
mcVersion := reference version.
(l := (GoferVersionReference name: reference name)
resolveAllWith: self loaderPolicy cacheGofer) isEmpty
ifTrue: [self cacheRepository storeVersion: mcVersion.
reference == nearestReference
ifTrue: [pSpec := packageSpec]
ifFalse: [pSpec := packageSpec project packageSpec.
pSpec name: mcVersion info].
self loadData
addVersion: mcVersion
versionInfo: mcVersion info
resolvedReference: reference
packageSpec: pSpec]].
self loaderPolicy resetCacheGofer.
self preLoad: packageSpec.
(MetacelloDirective
loadPackage: packageSpec
externalReference: externalReference
loader: self)
addTo: self loadDirective.
self postLoad: packageSpec.
Transcript cr; show: 'Fetched -> ' , externalReference name , ' --- '
, externalReference repository description , ' --- ' ,
nearestReference repository description] in
MetacelloFetchingMCSpecLoader>>linearLoadPackageSpec:gofer:
[:bar |
bar value: 1.
aBlock value.
bar value: 2] in MetacelloPharoPlatform>>do:displaying:
[result := workBlock value: progress] in [[result := workBlock value: progress]
on: ProgressNotification
do: [:ex |
ex extraParam isString
ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put:
ex extraParam].
ex resume]] in ProgressInitiationException>>defaultMorphicAction
BlockClosure>>on:do:
[[result := workBlock value: progress]
on: ProgressNotification
do: [:ex |
ex extraParam isString
ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put:
ex extraParam].
ex resume]] in ProgressInitiationException>>defaultMorphicAction
BlockClosure>>ensure:
ProgressInitiationException>>defaultMorphicAction
MorphicUIManager>>progressInitiationExceptionDefaultAction:
ProgressInitiationException>>defaultAction
UndefinedObject>>handleSignal:
MethodContext(ContextPart)>>handleSignal:
MethodContext(ContextPart)>>handleSignal:
MethodContext(ContextPart)>>handleSignal:
MethodContext(ContextPart)>>handleSignal:
ProgressInitiationException(Exception)>>signal
ProgressInitiationException>>display:at:from:to:during:
ProgressInitiationException class>>display:at:from:to:during:
ByteString(String)>>displayProgressAt:from:to:during:
MetacelloPharoPlatform>>do:displaying:
MetacelloFetchingMCSpecLoader>>linearLoadPackageSpec:gofer:
MetacelloPackageSpec>>loadUsing:gofer:
[:pkg | pkg loadUsing: self gofer: gofer] in
MetacelloFetchingMCSpecLoader(MetacelloCommonMCSpecLoader)>>linearLoadPackageSpecs:repositories:
OrderedCollection>>do:
MetacelloFetchingMCSpecLoader(MetacelloCommonMCSpecLoader)>>linearLoadPackageSpecs:repositories:
[super linearLoadPackageSpecs: packageSpecs repositories:
repositories] in
MetacelloFetchingMCSpecLoader>>linearLoadPackageSpecs:repositories:
BlockClosure>>ensure:
MetacelloLoaderPolicy>>pushLoadDirective:during:
MetacelloLoaderPolicy>>pushLinearLoadDirectivesDuring:for:
MetacelloFetchingMCSpecLoader>>linearLoadPackageSpecs:repositories:
MetacelloFetchingMCSpecLoader(MetacelloCommonMCSpecLoader)>>load
MetacelloMCVersionSpecLoader>>load
MetacelloMCVersion>>executeLoadFromArray:
[:dict | ^ self executeLoadFromArray: anArray] in [self versionSpec
loader: newLoader.
MetacelloPlatform current
useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
defaultDictionary: Dictionary new] in [[self versionSpec loader: newLoader.
MetacelloPlatform current
useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
defaultDictionary: Dictionary new]
ensure: [self versionSpec loader: originalLoader]] in
MetacelloMCVersion>>fetchRequiredFromArray:
[^ aBlock value: dict] in
MetacelloPharoPlatform(MetacelloPlatform)>>useStackCacheDuring:defaultDictionary:
BlockClosure>>on:do:
MetacelloPharoPlatform(MetacelloPlatform)>>useStackCacheDuring:defaultDictionary:
[self versionSpec loader: newLoader.
MetacelloPlatform current
useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
defaultDictionary: Dictionary new] in [[self versionSpec loader: newLoader.
MetacelloPlatform current
useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
defaultDictionary: Dictionary new]
ensure: [self versionSpec loader: originalLoader]] in
MetacelloMCVersion>>fetchRequiredFromArray:
- - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
BlockClosure>>ensure:
[[self versionSpec loader: newLoader.
MetacelloPlatform current
useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
defaultDictionary: Dictionary new]
ensure: [self versionSpec loader: originalLoader]] in
MetacelloMCVersion>>fetchRequiredFromArray:
[:bar |
bar value: 1.
aBlock value.
bar value: 2] in MetacelloPharoPlatform>>do:displaying:
[result := workBlock value: progress] in [[result := workBlock value: progress]
on: ProgressNotification
do: [:ex |
ex extraParam isString
ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put:
ex extraParam].
ex resume]] in ProgressInitiationException>>defaultMorphicAction
BlockClosure>>on:do:
[[result := workBlock value: progress]
on: ProgressNotification
do: [:ex |
ex extraParam isString
ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put:
ex extraParam].
ex resume]] in ProgressInitiationException>>defaultMorphicAction
BlockClosure>>ensure:
ProgressInitiationException>>defaultMorphicAction
MorphicUIManager>>progressInitiationExceptionDefaultAction:
ProgressInitiationException>>defaultAction
UndefinedObject>>handleSignal:
MethodContext(ContextPart)>>handleSignal:
MethodContext(ContextPart)>>handleSignal:
ProgressInitiationException(Exception)>>signal
ProgressInitiationException>>display:at:from:to:during:
ProgressInitiationException class>>display:at:from:to:during:
ByteString(String)>>displayProgressAt:from:to:during:
MetacelloPharoPlatform>>do:displaying:
MetacelloMCVersion>>fetchRequiredFromArray:
[| fetchLoader |
fetchLoader := self
fetchRequiredFromArray: (self defaultPackageNamesToLoad: anArray).
MetacelloPlatform current
do: [fetchLoader doLoad]
displaying: 'Loading ' , displayString.
Transcript cr; show: '...finished ' , self versionNumber printString.
^ fetchLoader] in MetacelloMCVersion>>doLoadRequiredFromArray:
BlockClosure>>ensure:
MetacelloMCVersion>>doLoadRequiredFromArray:
MetacelloMCVersion>>load
UndefinedObject>>DoIt
Compiler>>evaluate:in:to:notifying:ifFail:logged:
[rcvr class evaluatorClass new
evaluate: self selectionForDoitAsStream
in: ctxt
to: rcvr
notifying: self morph
ifFail: [self morph flash.
^ nil]
logged: true] in SmalltalkEditor>>evaluateSelectionAndDo:
BlockClosure>>on:do:
SmalltalkEditor>>evaluateSelectionAndDo:
SmalltalkEditor>>evaluateSelection
SmalltalkEditor>>doIt
SmalltalkEditor>>doIt:
SmalltalkEditor(TextEditor)>>performCmdActionsWith:shifted:return:
SmalltalkEditor(TextEditor)>>dispatchCommandOn:return:
SmalltalkEditor(TextEditor)>>dispatchOn:
[self dispatchOn: aKeyboardEvent] in SmalltalkEditor(TextEditor)>>keystroke:
SmalltalkEditor(TextEditor)>>handleKeystrokeAction:
SmalltalkEditor(TextEditor)>>handleEditionAction:fromKeyboardEvent:
SmalltalkEditor(TextEditor)>>keystroke:
[editor keystroke: evt] in [| action |
evt keyValue = 13
ifTrue: [action := self crAction.
action
ifNotNil: [evt hand newKeyboardFocus: nil.
^ action value]].
self
handleInteraction: [editor keystroke: evt].
self updateFromParagraph.
super keyStroke: evt] in TextMorphForEditView(TextMorph)>>keyStroke:
TextMorphForEditView(TextMorph)>>handleInteraction:
TextMorphForEditView>>handleInteraction:
[| action |
evt keyValue = 13
ifTrue: [action := self crAction.
action
ifNotNil: [evt hand newKeyboardFocus: nil.
^ action value]].
self
handleInteraction: [editor keystroke: evt].
self updateFromParagraph.
super keyStroke: evt] in TextMorphForEditView(TextMorph)>>keyStroke:
ToolRegistry>>codeCompletionAround:textMorph:keyStroke:
SmalltalkEditor>>codeCompletionAround:textMorph:keyStroke:
TextMorphForEditView(TextMorph)>>keyStroke:
TextMorphForEditView>>keyStroke:
TextMorphForEditView(TextMorph)>>handleKeystroke:
KeyboardEvent>>sentTo:
TextMorphForEditView(Morph)>>handleEvent:
TextMorphForEditView(Morph)>>handleFocusEvent:
[ActiveHand := self.
ActiveEvent := anEvent.
result := focusHolder
handleFocusEvent: (anEvent
transformedBy: (focusHolder transformedFrom: self))] in
HandMorph>>sendFocusEvent:to:clear:
[aBlock value] in PasteUpMorph>>becomeActiveDuring:
BlockClosure>>on:do:
PasteUpMorph>>becomeActiveDuring:
HandMorph>>sendFocusEvent:to:clear:
HandMorph>>sendEvent:focus:clear:
HandMorph>>sendKeyboardEvent:
HandMorph>>handleEvent:
HandMorph>>processEvents
[:h |
ActiveHand := h.
h processEvents.
ActiveHand := nil] in WorldState>>doOneCycleNowFor:
Array(SequenceableCollection)>>do:
WorldState>>handsDo:
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
PasteUpMorph>>doOneCycle
[[World doOneCycle.
Processor yield.
false] whileFalse.
nil] in MorphicUIManager>>spawnNewProcess
[self value.
Processor terminateActive] in BlockClosure>>newProcess
2012/1/29 Nicolas Cellier <nicolas.cellier.aka.nice(a)gmail.com>:
> 2012/1/29 dimitris chloupis <thekilon(a)yahoo.co.uk>:
>> I am not accusing you or anything , I know writing documentation can be both
>> hard and boring. And if I can help to make it simpler I will.
>>
>
> Sure, but sometimes adding a link or two in the right place would help...
>
>> Back to building , followed your instruction and
>>
>> "
>> Gofer new
>> Â squeaksource: 'MetacelloRepository';
>> Â package: 'ConfigurationOfVMMaker';
>> Â load.
>> (Smalltalk at: #ConfigurationOfVMMaker) perform: #load."
>>
>>
>> gives me the following error
>>
>
> Ah, my incantation does not work, it's more something like this:
>
> Gofer new
> Â squeaksource: 'MetacelloRepository';
> Â package: 'ConfigurationOfVMMaker';
> Â load.
> ((Smalltalk at: #ConfigurationOfVMMaker) project perform:
> #latestVersion) perform: #load.
>
> Then I have same error as you...
> It seems like http://source.impara.de/freetype/Freetype-Plugin-John M
> McIntosh.55.mcz is accessible though...
> So here, I don't know...
>
> Nicolas
>
>>
>>
>> 29 January 2012 11:56:20 am
>>
>> VM: Mac OS - intel - 1072 - NBCoInterpreter
>> NativeBoost-CogPlugin-IgorStasenko.8 uuid:
>> f47ef546-de3d-4415-850e-6437d67bfb5c Dec 11 2011,
>> StackToRegisterMappingCogit VMMaker-oscog-EstebanLorenzano.139 uuid:
>> 5aa53979-d7d8-4ca3-91fe-cfc3b4109c33 Dec 11 2011,
>> https://git.gitorious.org/cogvm/blessed.git Commit:
>> 364a7f1fab69798c1bdc9575ba15e18ea319585a Date: Sun Dec 11 15:17:52 2011
>> -0300 By: Esteban Lorenzano <estebanlm(a)gmail.com>
>> Image: Pharo1.4a [Latest update: #14284]
>>
>> UndefinedObject(Object)>>doesNotUnderstand: #readStream
>> Receiver: nil
>> Arguments and temporary variables:
>> aMessage: readStream
>> exception: MessageNotUnderstood: receiver of "readStream" is nil
>> resumeValue: nil
>> Receiver's instance variables:
>> nil
>>
>> MCScanner class>>scanTokens:
>> Receiver: MCScanner
>> Arguments and temporary variables:
>> aString: nil
>> Receiver's instance variables:
>> superclass: Object
>> methodDict: a MethodDictionary(#next->(MCScanner>>#next "a
>> CompiledMethod(84410...etc...
>> format: 132
>> instanceVariables: #('stream')
>> organization: ('as yet unclassified' next nextArray nextString nextSymbol
>> strea...etc...
>> subclasses: nil
>> name: #MCScanner
>> classPool: nil
>> sharedPools: nil
>> environment: a SystemDictionary(lots of globals)
>> category: #'Monticello-Chunk Format'
>> traitComposition: {}
>> localSelectors: nil
>>
>> MCMczReader>>parseMember:
>> Receiver: a MCMczReader
>> Arguments and temporary variables:
>> fileName: 'package'
>> tokens: nil
>> Receiver's instance variables:
>> stream: a ReadStream
>> package: nil
>> info: nil
>> definitions: nil
>> dependencies: nil
>> zip: a ZipArchive
>> infoCache: nil
>>
>> MCMczReader>>loadPackage
>> Receiver: a MCMczReader
>> Arguments and temporary variables:
>> dict: nil
>> Receiver's instance variables:
>> stream: a ReadStream
>> package: nil
>> info: nil
>> definitions: nil
>> dependencies: nil
>> zip: a ZipArchive
>> infoCache: nil
>>
>> MCMczReader(MCVersionReader)>>package
>> Receiver: a MCMczReader
>> Arguments and temporary variables:
>>
>> Receiver's instance variables:
>> stream: a ReadStream
>> package: nil
>> info: nil
>> definitions: nil
>> dependencies: nil
>> zip: a ZipArchive
>> infoCache: nil
>>
>> MCMczReader(MCVersionReader)>>basicVersion
>> Receiver: a MCMczReader
>> Arguments and temporary variables:
>>
>> Receiver's instance variables:
>> stream: a ReadStream
>> package: nil
>> info: nil
>> definitions: nil
>> dependencies: nil
>> zip: a ZipArchive
>> infoCache: nil
>>
>> MCMczReader(MCVersionReader)>>version
>> Receiver: a MCMczReader
>> Arguments and temporary variables:
>>
>> Receiver's instance variables:
>> stream: a ReadStream
>> package: nil
>> info: nil
>> definitions: nil
>> dependencies: nil
>> zip: a ZipArchive
>> infoCache: nil
>>
>> [:r | r version] in
>> MCHttpRepository(MCFileBasedRepository)>>loadVersionFromFileNamed:
>> Receiver: a MCHttpRepository(http://source.impara.de/freetype)
>> Arguments and temporary variables:
>> r: a MCMczReader
>> Receiver's instance variables:
>> creationTemplate: nil
>> storeDiffs: nil
>> cache: nil
>> allFileNames: nil
>> location: 'http://source.impara.de/freetype'
>> user: ''
>> password: ''
>> readerCache: a Dictionary('Freetype-Plugin-John M McIntosh.55.mcz'->a
>> MCMczRead...etc...
>>
>> BlockClosure>>cull:
>> Receiver: [:r | r version]
>> Arguments and temporary variables:
>> anArg: a MCMczReader
>> Receiver's instance variables:
>> outerContext:
>> MCHttpRepository(MCFileBasedRepository)>>loadVersionFromFileNamed...etc...
>> startpc: 27
>> numArgs: 1
>>
>> MCMczReader(ProtoObject)>>ifNotNil:
>> Receiver: a MCMczReader
>> Arguments and temporary variables:
>> ifNotNilBlock: [:r | r version]
>> Receiver's instance variables:
>> stream: a ReadStream
>> package: nil
>> info: nil
>> definitions: nil
>> dependencies: nil
>> zip: a ZipArchive
>> infoCache: nil
>>
>> MCHttpRepository>>versionReaderForFileNamed:do:
>> Receiver: a MCHttpRepository(http://source.impara.de/freetype)
>> Arguments and temporary variables:
>> aString: 'Freetype-Plugin-John M McIntosh.55.mcz'
>> aBlock: [:r | r version]
>> Receiver's instance variables:
>> creationTemplate: nil
>> storeDiffs: nil
>> cache: nil
>> allFileNames: nil
>> location: 'http://source.impara.de/freetype'
>> user: ''
>> password: ''
>> readerCache: a Dictionary('Freetype-Plugin-John M McIntosh.55.mcz'->a
>> MCMczRead...etc...
>>
>> MCHttpRepository(MCFileBasedRepository)>>loadVersionFromFileNamed:
>> Receiver: a MCHttpRepository(http://source.impara.de/freetype)
>> Arguments and temporary variables:
>> aString: 'Freetype-Plugin-John M McIntosh.55.mcz'
>> Receiver's instance variables:
>> creationTemplate: nil
>> storeDiffs: nil
>> cache: nil
>> allFileNames: nil
>> location: 'http://source.impara.de/freetype'
>> user: ''
>> password: ''
>> readerCache: a Dictionary('Freetype-Plugin-John M McIntosh.55.mcz'->a
>> MCMczRead...etc...
>>
>> MCHttpRepository(MCFileBasedRepository)>>goferVersionFrom:
>> Receiver: a MCHttpRepository(http://source.impara.de/freetype)
>> Arguments and temporary variables:
>> aVersionReference: a MetacelloCachingGoferResolvedReference name:
>> 'Freetype-Plu...etc...
>> Receiver's instance variables:
>> creationTemplate: nil
>> storeDiffs: nil
>> cache: nil
>> allFileNames: nil
>> location: 'http://source.impara.de/freetype'
>> user: ''
>> password: ''
>> readerCache: a Dictionary('Freetype-Plugin-John M McIntosh.55.mcz'->a
>> MCMczRead...etc...
>>
>> MetacelloCachingGoferResolvedReference(GoferResolvedReference)>>version
>> Receiver: a MetacelloCachingGoferResolvedReference name:
>> 'Freetype-Plugin-John M McIntosh.55'
>> Arguments and temporary variables:
>>
>> Receiver's instance variables:
>> name: 'Freetype-Plugin-John M McIntosh.55'
>> package: 'Freetype-Plugin'
>> author: 'John M McIntosh'
>> branch: ''
>> versionNumber: 55
>> repository: a MCHttpRepository(http://source.impara.de/freetype)
>> cachedVersion: nil
>>
>> MetacelloCachingGoferResolvedReference>>version
>> Receiver: a MetacelloCachingGoferResolvedReference name:
>> 'Freetype-Plugin-John M McIntosh.55'
>> Arguments and temporary variables:
>>
>> Receiver's instance variables:
>> name: 'Freetype-Plugin-John M McIntosh.55'
>> package: 'Freetype-Plugin'
>> author: 'John M McIntosh'
>> branch: ''
>> versionNumber: 55
>> repository: a MCHttpRepository(http://source.impara.de/freetype)
>> cachedVersion: nil
>>
>> [:each | each version] in [aCollection
>> do: [:each | each version].
>> nearestReference version dependencies do: block.
>> notDone := false] in
>> MetacelloFetchingMCSpecLoader>>resolveDependencies:nearest:into:
>> Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.3
>> [ConfigurationOfVMMaker]
>> load : FFI-Poo...etc...
>> Arguments and temporary variables:
>> each: a MetacelloCachingGoferResolvedReference name: 'Freetype-Plugin-John M
>> Mc...etc...
>> Receiver's instance variables:
>> spec: a MetacelloMCVersionSpecLoader
>> operator: nil
>> loaderPolicy: a MetacelloLoaderPolicy
>> disablePackageCache: false
>>
>> OrderedCollection>>do:
>> Receiver: an OrderedCollection(a MetacelloCachingGoferResolvedReference
>> name: 'Freetype-Plugin-John ...etc...
>> Arguments and temporary variables:
>> aBlock: [:each | each version]
>> index: 1
>> Receiver's instance variables:
>> array: an Array(a MetacelloCachingGoferResolvedReference name:
>> 'Freetype-Plugin...etc...
>> firstIndex: 1
>> lastIndex: 1
>>
>> [aCollection
>> do: [:each | each version].
>> nearestReference version dependencies do: block.
>> notDone := false] in
>> MetacelloFetchingMCSpecLoader>>resolveDependencies:nearest:into:
>> Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.3
>> [ConfigurationOfVMMaker]
>> load : FFI-Poo...etc...
>> Arguments and temporary variables:
>> <<error during printing>
>> Receiver's instance variables:
>> spec: a MetacelloMCVersionSpecLoader
>> operator: nil
>> loaderPolicy: a MetacelloLoaderPolicy
>> disablePackageCache: false
>>
>> BlockClosure>>on:do:
>> Receiver: [aCollection
>> do: [:each | each version].
>> nearestReference version dependencies do: bloc...etc...
>> Arguments and temporary variables:
>> exception: Error
>> handlerAction: [:ex |
>> retryCount := retryCount + 1.
>> retryCount >= 3
>> ifTrue:...etc...
>> handlerActive: false
>> Receiver's instance variables:
>> outerContext:
>> MetacelloFetchingMCSpecLoader>>resolveDependencies:nearest:into:
>> startpc: 226
>> numArgs: 0
>>
>> MetacelloFetchingMCSpecLoader>>resolveDependencies:nearest:into:
>> Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.3
>> [ConfigurationOfVMMaker]
>> load : FFI-Poo...etc...
>> Arguments and temporary variables:
>> <<error during printing>
>> Receiver's instance variables:
>> spec: a MetacelloMCVersionSpecLoader
>> operator: nil
>> loaderPolicy: a MetacelloLoaderPolicy
>> disablePackageCache: false
>>
>> [| references nearestReference cachedReference externalReference
>> loadedVersionInfos mcVersion |
>> self flag: #cleanup.
>> cachedReference := self resolvePackageSpec: packageSpec cachedGofer: self
>> loaderPolicy cacheGofer.
>> (cachedReference ~~ nil
>> and: [packageSpec getFile ~~ nil])
>> ifTrue: [cachedReference name = packageSpec file
>> ifTrue: [^ self]].
>> references := self retryingResolvePackageSpecReferences: packageSpec gofer:
>> gofer.
>> nearestReference := references last asMetacelloCachingResolvedReference.
>> (cachedReference ~~ nil
>> and: [cachedReference name = nearestReference name])
>> ifTrue: [^ self].
>> (self ignoreImage not
>> and: [(loadedVersionInfos := self ancestorsFor: packageSpec) ~~ nil])
>> ifTrue: [loadedVersionInfos
>> do: [:info |
>> info name = nearestReference name
>> ifTrue: [^ self].
>> nil]].
>> externalReference := (references
>> select: [:ref | ref name = nearestReference name]) first
>> asMetacelloCachingResolvedReference.
>> self repositoryMap at: externalReference name put: externalReference
>> repository.
>> (self
>> resolveDependencies: externalReference
>> nearest: nearestReference
>> into: (OrderedCollection with: nearestReference))
>> do: [:reference |
>> | pSpec l |
>> mcVersion := reference version.
>> (l := (GoferVersionReference name: reference name)
>> resolveAllWith: self loaderPolicy cacheGofer) isEmpty
>> ifTrue: [self cacheRepository storeVersion: mcVersion.
>> reference == nearestReference
>> ifTrue: [pSpec := packageSpec]
>> ifFalse: [pSpec := packageSpec project packageSpec.
>> pSpec name: mcVersion info].
>> self loadData
>> addVersion: mcVersion
>> versionInfo: mcVersion info
>> resolvedReference: reference
>> packageSpec: pSpec]].
>> self loaderPolicy resetCacheGofer.
>> self preLoad: packageSpec.
>> (MetacelloDirective
>> loadPackage: packageSpec
>> externalReference: externalReference
>> loader: self)
>> addTo: self loadDirective.
>> self postLoad: packageSpec.
>> Transcript cr; show: 'Fetched -> ' , externalReference name , ' --- ' ,
>> externalReference repository description , ' --- ' , nearestReference
>> repository description] in
>> MetacelloFetchingMCSpecLoader>>linearLoadPackageSpec:gofer:
>> Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.3
>> [ConfigurationOfVMMaker]
>> load : FFI-Poo...etc...
>> Arguments and temporary variables:
>> packageSpec: spec
>> name: 'Freetype-Plugin';
>> requires: #('VMMaker' );
>> file: '...etc...
>> gofer: a MetacelloGofer
>> references: an Array(a GoferResolvedReference name: 'Freetype-Plugin-John M
>> McI...etc...
>> nearestReference: a MetacelloCachingGoferResolvedReference name:
>> 'Freetype-Plug...etc...
>> cachedReference: nil
>> externalReference: a MetacelloCachingGoferResolvedReference name:
>> 'Freetype-Plu...etc...
>> loadedVersionInfos: nil
>> mcVersion: #(nil)
>> Receiver's instance variables:
>> spec: a MetacelloMCVersionSpecLoader
>> operator: nil
>> loaderPolicy: a MetacelloLoaderPolicy
>> disablePackageCache: false
>>
>> [:bar |
>> bar value: 1.
>> aBlock value.
>> bar value: 2] in MetacelloPharoPlatform>>do:displaying:
>> Receiver: a MetacelloPharoPlatform
>> Arguments and temporary variables:
>> aBlock: [:barValArg |
>> | barVal return newBarSize |
>> barVal := barValArg.
>> retur...etc...
>> bar: [| references nearestReference cachedReference externalReference
>> loadedVer...etc...
>> Receiver's instance variables:
>> bypassProgressBars: false
>> bypassGoferLoadUpdateCategories: false
>>
>> [result := workBlock value: progress] in [[result := workBlock value:
>> progress]
>> on: ProgressNotification
>> do: [:ex |
>> ex extraParam isString
>> ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put: ex
>> extraParam].
>> ex resume]] in ProgressInitiationException>>defaultMorphicAction
>> Receiver: ProgressInitiationException
>> Arguments and temporary variables:
>> progress: [:barValArg |
>> | barVal return newBarSize |
>> barVal := barValArg.
>> ret...etc...
>> result: #(nil)
>> Receiver's instance variables:
>> messageText: nil
>> tag: nil
>> signaler: 'Fetching Freetype-Plugin-John M McIntosh.55'
>> signalContext: ProgressInitiationException(Exception)>>signal
>> handlerContext: nil
>> outerContext: nil
>> workBlock: [:bar |
>> bar value: 1.
>> aBlock value.
>> bar value: 2]
>> maxVal: 2
>> minVal: 0
>> aPoint: (635@231)
>> progressTitle: 'Fetching Freetype-Plugin-John M McIntosh.55'
>>
>> BlockClosure>>on:do:
>> Receiver: [result := workBlock value: progress]
>> Arguments and temporary variables:
>> exception: ProgressNotification
>> handlerAction: [:ex |
>> ex extraParam isString
>> ifTrue: [SystemProgressMorph un...etc...
>> handlerActive: true
>> Receiver's instance variables:
>> outerContext: [[result := workBlock value: progress]
>> on: ProgressNotification...etc...
>> startpc: 87
>> numArgs: 0
>>
>> [[result := workBlock value: progress]
>> on: ProgressNotification
>> do: [:ex |
>> ex extraParam isString
>> ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put: ex
>> extraParam].
>> ex resume]] in ProgressInitiationException>>defaultMorphicAction
>> Receiver: ProgressInitiationException
>> Arguments and temporary variables:
>> progress: [:barValArg |
>> | barVal return newBarSize |
>> barVal := barValArg.
>> ret...etc...
>> result: #(nil)
>> Receiver's instance variables:
>> messageText: nil
>> tag: nil
>> signaler: 'Fetching Freetype-Plugin-John M McIntosh.55'
>> signalContext: ProgressInitiationException(Exception)>>signal
>> handlerContext: nil
>> outerContext: nil
>> workBlock: [:bar |
>> bar value: 1.
>> aBlock value.
>> bar value: 2]
>> maxVal: 2
>> minVal: 0
>> aPoint: (635@231)
>> progressTitle: 'Fetching Freetype-Plugin-John M McIntosh.55'
>>
>> BlockClosure>>ensure:
>> Receiver: [[result := workBlock value: progress]
>> on: ProgressNotification
>> do: [:ex |
>> ex extr...etc...
>> Arguments and temporary variables:
>> aBlock: [SystemProgressMorph close: progress]
>> complete: nil
>> returnValue: nil
>> Receiver's instance variables:
>> outerContext: ProgressInitiationException>>defaultMorphicAction
>> startpc: 81
>> numArgs: 0
>>
>> ProgressInitiationException>>defaultMorphicAction
>> Receiver: ProgressInitiationException
>> Arguments and temporary variables:
>> progress: [:barValArg |
>> | barVal return newBarSize |
>> barVal := barValArg.
>> ret...etc...
>> result: #(nil)
>> Receiver's instance variables:
>> messageText: nil
>> tag: nil
>> signaler: 'Fetching Freetype-Plugin-John M McIntosh.55'
>> signalContext: ProgressInitiationException(Exception)>>signal
>> handlerContext: nil
>> outerContext: nil
>> workBlock: [:bar |
>> bar value: 1.
>> aBlock value.
>> bar value: 2]
>> maxVal: 2
>> minVal: 0
>> aPoint: (635@231)
>> progressTitle: 'Fetching Freetype-Plugin-John M McIntosh.55'
>>
>> MorphicUIManager>>progressInitiationExceptionDefaultAction:
>> Receiver: a MorphicUIManager
>> Arguments and temporary variables:
>> anException: ProgressInitiationException
>> Receiver's instance variables:
>> interactiveParser: nil
>>
>> ProgressInitiationException>>defaultAction
>> Receiver: ProgressInitiationException
>> Arguments and temporary variables:
>>
>> Receiver's instance variables:
>> messageText: nil
>> tag: nil
>> signaler: 'Fetching Freetype-Plugin-John M McIntosh.55'
>> signalContext: ProgressInitiationException(Exception)>>signal
>> handlerContext: nil
>> outerContext: nil
>> workBlock: [:bar |
>> bar value: 1.
>> aBlock value.
>> bar value: 2]
>> maxVal: 2
>> minVal: 0
>> aPoint: (635@231)
>> progressTitle: 'Fetching Freetype-Plugin-John M McIntosh.55'
>>
>> UndefinedObject>>handleSignal:
>> Receiver: nil
>> Arguments and temporary variables:
>> exception: ProgressInitiationException
>> Receiver's instance variables:
>> nil
>>
>> MethodContext(ContextPart)>>handleSignal:
>> Receiver: BlockClosure>>on:do:
>> Arguments and temporary variables:
>> exception: ProgressInitiationException
>> val: nil
>> Receiver's instance variables:
>> sender: PasteUpMorph>>becomeActiveDuring:
>> pc: 17
>> stackp: 3
>> method: (BlockClosure>>#on:do: "a CompiledMethod(869793792)")
>> closureOrNil: nil
>> receiver: [aBlock value]
>>
>> MethodContext(ContextPart)>>handleSignal:
>> Receiver: BlockClosure>>on:do:
>> Arguments and temporary variables:
>> exception: ProgressInitiationException
>> val: nil
>> Receiver's instance variables:
>> sender: SmalltalkEditor>>evaluateSelectionAndDo:
>> pc: 17
>> stackp: 3
>> method: (BlockClosure>>#on:do: "a CompiledMethod(869793792)")
>> closureOrNil: nil
>> receiver: [rcvr class evaluatorClass new
>> evaluate: self selectionForDoitAsStr...etc...
>>
>> MethodContext(ContextPart)>>handleSignal:
>> Receiver: BlockClosure>>on:do:
>> Arguments and temporary variables:
>> exception: ProgressInitiationException
>> val: nil
>> Receiver's instance variables:
>> sender: [[result := workBlock value: progress]
>> on: ProgressNotification
>> do:...etc...
>> pc: 17
>> stackp: 3
>> method: (BlockClosure>>#on:do: "a CompiledMethod(869793792)")
>> closureOrNil: nil
>> receiver: [result := workBlock value: progress]
>>
>> MethodContext(ContextPart)>>handleSignal:
>> Receiver: BlockClosure>>on:do:
>> Arguments and temporary variables:
>> exception: ProgressInitiationException
>> val: nil
>> Receiver's instance variables:
>> sender:
>> MetacelloPharoPlatform(MetacelloPlatform)>>useStackCacheDuring:defaultD...etc...
>> pc: 17
>> stackp: 3
>> method: (BlockClosure>>#on:do: "a CompiledMethod(869793792)")
>> closureOrNil: nil
>> receiver: [^ aBlock value: dict]
>>
>> ProgressInitiationException(Exception)>>signal
>> Receiver: ProgressInitiationException
>> Arguments and temporary variables:
>>
>> Receiver's instance variables:
>> messageText: nil
>> tag: nil
>> signaler: 'Fetching Freetype-Plugin-John M McIntosh.55'
>> signalContext: ProgressInitiationException(Exception)>>signal
>> handlerContext: nil
>> outerContext: nil
>> workBlock: [:bar |
>> bar value: 1.
>> aBlock value.
>> bar value: 2]
>> maxVal: 2
>> minVal: 0
>> aPoint: (635@231)
>> progressTitle: 'Fetching Freetype-Plugin-John M McIntosh.55'
>>
>> ProgressInitiationException>>display:at:from:to:during:
>> Receiver: ProgressInitiationException
>> Arguments and temporary variables:
>> argString: 'Fetching Freetype-Plugin-John M McIntosh.55'
>> argPoint: (635@231)
>> argMinVal: 0
>> argMaxVal: 2
>> argWorkBlock: [:bar |
>> bar value: 1.
>> aBlock value.
>> bar value: 2]
>> Receiver's instance variables:
>> messageText: nil
>> tag: nil
>> signaler: 'Fetching Freetype-Plugin-John M McIntosh.55'
>> signalContext: ProgressInitiationException(Exception)>>signal
>> handlerContext: nil
>> outerContext: nil
>> workBlock: [:bar |
>> bar value: 1.
>> aBlock value.
>> bar value: 2]
>> maxVal: 2
>> minVal: 0
>> aPoint: (635@231)
>> progressTitle: 'Fetching Freetype-Plugin-John M McIntosh.55'
>>
>> ProgressInitiationException class>>display:at:from:to:during:
>> Receiver: ProgressInitiationException
>> Arguments and temporary variables:
>> aString: 'Fetching Freetype-Plugin-John M McIntosh.55'
>> aPoint: (635@231)
>> minVal: 0
>> maxVal: 2
>> workBlock: [:bar |
>> bar value: 1.
>> aBlock value.
>> bar value: 2]
>> Receiver's instance variables:
>> superclass: Exception
>> methodDict: a
>> MethodDictionary(#defaultAction->(ProgressInitiationException>>#d...etc...
>> format: 152
>> instanceVariables: #('workBlock' 'maxVal' 'minVal' 'aPoint' 'progressTitle')
>> organization: ('*Morphic' defaultMorphicAction)
>> ('accessing' maxVal minVal poin...etc...
>> subclasses: nil
>> name: #ProgressInitiationException
>> classPool: nil
>> sharedPools: nil
>> environment: a SystemDictionary(lots of globals)
>> category: #'UIManager-Support'
>> traitComposition: nil
>> localSelectors: nil
>>
>> ByteString(String)>>displayProgressAt:from:to:during:
>> Receiver: 'Fetching Freetype-Plugin-John M McIntosh.55'
>> Arguments and temporary variables:
>> aPoint: (635@231)
>> minVal: 0
>> maxVal: 2
>> workBlock: [:bar |
>> bar value: 1.
>> aBlock value.
>> bar value: 2]
>> Receiver's instance variables:
>> 'Fetching Freetype-Plugin-John M McIntosh.55'
>>
>> MetacelloPharoPlatform>>do:displaying:
>> Receiver: a MetacelloPharoPlatform
>> Arguments and temporary variables:
>> aBlock: [| references nearestReference cachedReference externalReference
>> loaded...etc...
>> aString: 'Fetching Freetype-Plugin-John M McIntosh.55'
>> Receiver's instance variables:
>> bypassProgressBars: false
>> bypassGoferLoadUpdateCategories: false
>>
>>
>> --- The full stack ---
>> UndefinedObject(Object)>>doesNotUnderstand: #readStream
>> MCScanner class>>scanTokens:
>> MCMczReader>>parseMember:
>> MCMczReader>>loadPackage
>> MCMczReader(MCVersionReader)>>package
>> MCMczReader(MCVersionReader)>>basicVersion
>> MCMczReader(MCVersionReader)>>version
>> [:r | r version] in
>> MCHttpRepository(MCFileBasedRepository)>>loadVersionFromFileNamed:
>> BlockClosure>>cull:
>> MCMczReader(ProtoObject)>>ifNotNil:
>> MCHttpRepository>>versionReaderForFileNamed:do:
>> MCHttpRepository(MCFileBasedRepository)>>loadVersionFromFileNamed:
>> MCHttpRepository(MCFileBasedRepository)>>goferVersionFrom:
>> MetacelloCachingGoferResolvedReference(GoferResolvedReference)>>version
>> MetacelloCachingGoferResolvedReference>>version
>> [:each | each version] in [aCollection
>> do: [:each | each version].
>> nearestReference version dependencies do: block.
>> notDone := false] in
>> MetacelloFetchingMCSpecLoader>>resolveDependencies:nearest:into:
>> OrderedCollection>>do:
>> [aCollection
>> do: [:each | each version].
>> nearestReference version dependencies do: block.
>> notDone := false] in
>> MetacelloFetchingMCSpecLoader>>resolveDependencies:nearest:into:
>> BlockClosure>>on:do:
>> MetacelloFetchingMCSpecLoader>>resolveDependencies:nearest:into:
>> [| references nearestReference cachedReference externalReference
>> loadedVersionInfos mcVersion |
>> self flag: #cleanup.
>> cachedReference := self resolvePackageSpec: packageSpec cachedGofer: self
>> loaderPolicy cacheGofer.
>> (cachedReference ~~ nil
>> and: [packageSpec getFile ~~ nil])
>> ifTrue: [cachedReference name = packageSpec file
>> ifTrue: [^ self]].
>> references := self retryingResolvePackageSpecReferences: packageSpec gofer:
>> gofer.
>> nearestReference := references last asMetacelloCachingResolvedReference.
>> (cachedReference ~~ nil
>> and: [cachedReference name = nearestReference name])
>> ifTrue: [^ self].
>> (self ignoreImage not
>> and: [(loadedVersionInfos := self ancestorsFor: packageSpec) ~~ nil])
>> ifTrue: [loadedVersionInfos
>> do: [:info |
>> info name = nearestReference name
>> ifTrue: [^ self].
>> nil]].
>> externalReference := (references
>> select: [:ref | ref name = nearestReference name]) first
>> asMetacelloCachingResolvedReference.
>> self repositoryMap at: externalReference name put: externalReference
>> repository.
>> (self
>> resolveDependencies: externalReference
>> nearest: nearestReference
>> into: (OrderedCollection with: nearestReference))
>> do: [:reference |
>> | pSpec l |
>> mcVersion := reference version.
>> (l := (GoferVersionReference name: reference name)
>> resolveAllWith: self loaderPolicy cacheGofer) isEmpty
>> ifTrue: [self cacheRepository storeVersion: mcVersion.
>> reference == nearestReference
>> ifTrue: [pSpec := packageSpec]
>> ifFalse: [pSpec := packageSpec project packageSpec.
>> pSpec name: mcVersion info].
>> self loadData
>> addVersion: mcVersion
>> versionInfo: mcVersion info
>> resolvedReference: reference
>> packageSpec: pSpec]].
>> self loaderPolicy resetCacheGofer.
>> self preLoad: packageSpec.
>> (MetacelloDirective
>> loadPackage: packageSpec
>> externalReference: externalReference
>> loader: self)
>> addTo: self loadDirective.
>> self postLoad: packageSpec.
>> Transcript cr; show: 'Fetched -> ' , externalReference name , ' --- ' ,
>> externalReference repository description , ' --- ' , nearestReference
>> repository description] in
>> MetacelloFetchingMCSpecLoader>>linearLoadPackageSpec:gofer:
>> [:bar |
>> bar value: 1.
>> aBlock value.
>> bar value: 2] in MetacelloPharoPlatform>>do:displaying:
>> [result := workBlock value: progress] in [[result := workBlock value:
>> progress]
>> on: ProgressNotification
>> do: [:ex |
>> ex extraParam isString
>> ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put: ex
>> extraParam].
>> ex resume]] in ProgressInitiationException>>defaultMorphicAction
>> BlockClosure>>on:do:
>> [[result := workBlock value: progress]
>> on: ProgressNotification
>> do: [:ex |
>> ex extraParam isString
>> ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put: ex
>> extraParam].
>> ex resume]] in ProgressInitiationException>>defaultMorphicAction
>> BlockClosure>>ensure:
>> ProgressInitiationException>>defaultMorphicAction
>> MorphicUIManager>>progressInitiationExceptionDefaultAction:
>> ProgressInitiationException>>defaultAction
>> UndefinedObject>>handleSignal:
>> MethodContext(ContextPart)>>handleSignal:
>> MethodContext(ContextPart)>>handleSignal:
>> MethodContext(ContextPart)>>handleSignal:
>> MethodContext(ContextPart)>>handleSignal:
>> ProgressInitiationException(Exception)>>signal
>> ProgressInitiationException>>display:at:from:to:during:
>> ProgressInitiationException class>>display:at:from:to:during:
>> ByteString(String)>>displayProgressAt:from:to:during:
>> MetacelloPharoPlatform>>do:displaying:
>> Â - - - - - - - - - - - - - - -
>> - - - - - - - - - - - - - - - - - -
>> MetacelloFetchingMCSpecLoader>>linearLoadPackageSpec:gofer:
>> MetacelloPackageSpec>>loadUsing:gofer:
>> [:pkg | pkg loadUsing: self gofer: gofer] in
>> MetacelloFetchingMCSpecLoader(MetacelloCommonMCSpecLoader)>>linearLoadPackageSpecs:repositories:
>> OrderedCollection>>do:
>> MetacelloFetchingMCSpecLoader(MetacelloCommonMCSpecLoader)>>linearLoadPackageSpecs:repositories:
>> [super linearLoadPackageSpecs: packageSpecs repositories: repositories] in
>> MetacelloFetchingMCSpecLoader>>linearLoadPackageSpecs:repositories:
>> BlockClosure>>ensure:
>> MetacelloLoaderPolicy>>pushLoadDirective:during:
>> MetacelloLoaderPolicy>>pushLinearLoadDirectivesDuring:for:
>> MetacelloFetchingMCSpecLoader>>linearLoadPackageSpecs:repositories:
>> MetacelloFetchingMCSpecLoader(MetacelloCommonMCSpecLoader)>>load
>> MetacelloMCVersionSpecLoader>>load
>> MetacelloMCVersion>>executeLoadFromArray:
>> [:dict | ^ self executeLoadFromArray: anArray] in [self versionSpec loader:
>> newLoader.
>> MetacelloPlatform current
>> useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
>> defaultDictionary: Dictionary new] in [[self versionSpec loader: newLoader.
>> MetacelloPlatform current
>> useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
>> defaultDictionary: Dictionary new]
>> ensure: [self versionSpec loader: originalLoader]] in
>> MetacelloMCVersion>>fetchRequiredFromArray:
>> [^ aBlock value: dict] in
>> MetacelloPharoPlatform(MetacelloPlatform)>>useStackCacheDuring:defaultDictionary:
>> BlockClosure>>on:do:
>> MetacelloPharoPlatform(MetacelloPlatform)>>useStackCacheDuring:defaultDictionary:
>> [self versionSpec loader: newLoader.
>> MetacelloPlatform current
>> useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
>> defaultDictionary: Dictionary new] in [[self versionSpec loader: newLoader.
>> MetacelloPlatform current
>> useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
>> defaultDictionary: Dictionary new]
>> ensure: [self versionSpec loader: originalLoader]] in
>> MetacelloMCVersion>>fetchRequiredFromArray:
>> BlockClosure>>ensure:
>> [[self versionSpec loader: newLoader.
>> MetacelloPlatform current
>> useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
>> defaultDictionary: Dictionary new]
>> ensure: [self versionSpec loader: originalLoader]] in
>> MetacelloMCVersion>>fetchRequiredFromArray:
>> [:bar |
>> bar value: 1.
>> aBlock value.
>> bar value: 2] in MetacelloPharoPlatform>>do:displaying:
>> [result := workBlock value: progress] in [[result := workBlock value:
>> progress]
>> on: ProgressNotification
>> do: [:ex |
>> ex extraParam isString
>> ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put: ex
>> extraParam].
>> ex resume]] in ProgressInitiationException>>defaultMorphicAction
>> BlockClosure>>on:do:
>> [[result := workBlock value: progress]
>> on: ProgressNotification
>> do: [:ex |
>> ex extraParam isString
>> ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put: ex
>> extraParam].
>> ex resume]] in ProgressInitiationException>>defaultMorphicAction
>> BlockClosure>>ensure:
>> ProgressInitiationException>>defaultMorphicAction
>> MorphicUIManager>>progressInitiationExceptionDefaultAction:
>> ProgressInitiationException>>defaultAction
>> UndefinedObject>>handleSignal:
>> MethodContext(ContextPart)>>handleSignal:
>> MethodContext(ContextPart)>>handleSignal:
>> ProgressInitiationException(Exception)>>signal
>> ProgressInitiationException>>display:at:from:to:during:
>> ProgressInitiationException class>>display:at:from:to:during:
>> ByteString(String)>>displayProgressAt:from:to:during:
>> MetacelloPharoPlatform>>do:displaying:
>> MetacelloMCVersion>>fetchRequiredFromArray:
>> [| fetchLoader |
>> fetchLoader := self
>> fetchRequiredFromArray: (self defaultPackageNamesToLoad: anArray).
>> MetacelloPlatform current
>> do: [fetchLoader doLoad]
>> displaying: 'Loading ' , displayString.
>> Transcript cr; show: '...finished ' , self versionNumber printString.
>> ^ fetchLoader] in MetacelloMCVersion>>doLoadRequiredFromArray:
>> BlockClosure>>ensure:
>> MetacelloMCVersion>>doLoadRequiredFromArray:
>> MetacelloMCVersion>>load
>> ConfigurationOfVMMaker class>>load
>> UndefinedObject>>DoIt
>> Compiler>>evaluate:in:to:notifying:ifFail:logged:
>> [rcvr class evaluatorClass new
>> evaluate: self selectionForDoitAsStream
>> in: ctxt
>> to: rcvr
>> notifying: self morph
>> ifFail: [self morph flash.
>> ^ nil]
>> logged: true] in SmalltalkEditor>>evaluateSelectionAndDo:
>> BlockClosure>>on:do:
>> SmalltalkEditor>>evaluateSelectionAndDo:
>> SmalltalkEditor>>evaluateSelection
>> [textMorph editor evaluateSelection] in PluggableTextMorph>>doIt
>> [result := editBlock value] in PluggableTextMorph>>handleEdit:
>> TextMorphForEditView(TextMorph)>>handleEdit:
>> PluggableTextMorph>>handleEdit:
>> PluggableTextMorph>>doIt
>> Workspace(StringHolder)>>perform:orSendTo:
>> [| selArgCount |
>> (selArgCount := selector numArgs) = 0
>> ifTrue: [target perform: selector]
>> ifFalse: [selArgCount = arguments size
>> ifTrue: [target perform: selector withArguments: arguments]
>> ifFalse: [target
>> perform: selector
>> withArguments: (arguments copyWith: evt)]].
>> self changed] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
>> BlockClosure>>ensure:
>> CursorWithMask(Cursor)>>showWhile:
>> ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
>> ToggleMenuItemMorph(MenuItemMorph)>>mouseUp:
>> ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp:
>> MouseButtonEvent>>sentTo:
>> ToggleMenuItemMorph(Morph)>>handleEvent:
>> MorphicEventDispatcher>>dispatchDefault:with:
>> MorphicEventDispatcher>>dispatchEvent:with:
>> ToggleMenuItemMorph(Morph)>>processEvent:using:
>> MorphicEventDispatcher>>dispatchDefault:with:
>> MorphicEventDispatcher>>dispatchEvent:with:
>> MenuMorph(Morph)>>processEvent:using:
>> MenuMorph(Morph)>>processEvent:
>> MenuMorph>>handleFocusEvent:
>> [ActiveHand := self.
>> ActiveEvent := anEvent.
>> result := focusHolder
>> handleFocusEvent: (anEvent
>> transformedBy: (focusHolder transformedFrom: self))] in
>> HandMorph>>sendFocusEvent:to:clear:
>> [aBlock value] in PasteUpMorph>>becomeActiveDuring:
>> BlockClosure>>on:do:
>> PasteUpMorph>>becomeActiveDuring:
>> HandMorph>>sendFocusEvent:to:clear:
>> HandMorph>>sendEvent:focus:clear:
>> HandMorph>>sendMouseEvent:
>> HandMorph>>handleEvent:
>> HandMorph>>processEvents
>> [:h |
>> ActiveHand := h.
>> h processEvents.
>> ActiveHand := nil] in WorldState>>doOneCycleNowFor:
>> Array(SequenceableCollection)>>do:
>> WorldState>>handsDo:
>> WorldState>>doOneCycleNowFor:
>> WorldState>>doOneCycleFor:
>> WorldState>>doOneSubCycleFor:
>> PasteUpMorph>>doOneSubCycle
>> MenuMorph>>invokeModalAt:in:allowKeyboard:
>> MenuMorph>>invokeModal:
>> MenuMorph>>invokeModal
>> PluggableTextMorph>>yellowButtonActivity:
>> TextMorphForEditView>>mouseDown:
>> TextMorphForEditView(Morph)>>handleMouseDown:
>> MouseButtonEvent>>sentTo:
>> TextMorphForEditView(Morph)>>handleEvent:
>> MorphicEventDispatcher>>dispatchMouseDown:with:
>> MorphicEventDispatcher>>dispatchEvent:with:
>> TextMorphForEditView(Morph)>>processEvent:using:
>> MorphicEventDispatcher>>dispatchMouseDown:with:
>> MorphicEventDispatcher>>dispatchEvent:with:
>> TransformMorph(Morph)>>processEvent:using:
>> MorphicEventDispatcher>>dispatchMouseDown:with:
>> MorphicEventDispatcher>>dispatchEvent:with:
>> PluggableTextMorph(Morph)>>processEvent:using:
>> MorphicEventDispatcher>>dispatchMouseDown:with:
>> MorphicEventDispatcher>>dispatchEvent:with:
>> SystemWindow(Morph)>>processEvent:using:
>> MorphicEventDispatcher>>dispatchMouseDown:with:
>> MorphicEventDispatcher>>dispatchEvent:with:
>> PasteUpMorph(Morph)>>processEvent:using:
>> PasteUpMorph>>processEvent:using:
>> PasteUpMorph(Morph)>>processEvent:
>> HandMorph>>sendEvent:focus:clear:
>> HandMorph>>sendMouseEvent:
>> HandMorph>>handleEvent:
>> HandMorph>>processEvents
>> [:h |
>> ActiveHand := h.
>> h processEvents.
>> ActiveHand := nil] in WorldState>>doOneCycleNowFor:
>> Array(SequenceableCollection)>>do:
>> WorldState>>handsDo:
>> WorldState>>doOneCycleNowFor:
>> WorldState>>doOneCycleFor:
>> PasteUpMorph>>doOneCycle
>> [[World doOneCycle.
>> Processor yield.
>> false] whileFalse.
>> nil] in MorphicUIManager>>spawnNewProcess
>> [self value.
>> Processor terminateActive] in BlockClosure>>newProcess
>>
>>
>> ________________________________
>> From: Nicolas Cellier <nicolas.cellier.aka.nice(a)gmail.com>
>> To: Pharo-project(a)lists.gforge.inria.fr; dimitris chloupis
>> <thekilon(a)yahoo.co.uk>
>> Sent: Sunday, 29 January 2012, 11:39
>> Subject: Re: [Pharo-project] Trying to build CogVM in MacOSX 10.7 Lion
>>
>> 2012/1/29 dimitris chloupis <thekilon(a)yahoo.co.uk>:
>>> ok if you want me to install the latest I will install the latest , but
>>> there is no such documentation I am aware of how to do that .
>>>
>>> Can you help me ?
>>>
>>> Currently I have NBCog , Pharo-1.4 image and the latest from "Â git clone
>>> git://gitorious.org/cogvm/blessed.git"
>>>
>>> But I have no idea how to install the latest VMMaker and CMakeVMMaker
>>>
>>> I tried monticello giving it this adress
>>>
>>> MCHttpRepository
>>>Â Â location: 'http://www.squeaksource.com/VMMaker'
>>>Â Â user: ''
>>>Â Â password: ''
>>>
>>
>> I agree with you, we are very very bad when it come to documenting how to...
>> To aggravate this situation, the ground is moving fast under our feet.
>> If you open above address in a web browser, you'll see this:
>>
>> Effective 05-Sept-2011, the VMMaker repository is hosted at
>> http://source.squeak.org/VMMaker.html and new updates will appear in
>> that repository, possibly mirrored here for convenience. Please update
>> your Montecello browsers accordingly.
>>
>> There is a Metacello invocation for loading all Pharo compatible or
>> Pharo specific packages maybe something like this (I'm not totally
>> sure, but Pharo gurus will correct me)
>>
>> Gofer new
>> Â squeaksource: 'MetacelloRepository';
>> Â package: 'ConfigurationOfVMMaker';
>> Â load.
>> (Smalltalk at: #ConfigurationOfVMMaker) perform: #load.
>>
>> I don't have write access to these repositories, but I wish this
>> incantation were in the project description or the wiki of both pages
>> http://source.squeak.org/VMMaker.html and
>> http://www.squeaksource.com/VMMaker
>>
>> I also see a notice about SVN, but nothing about the git repository...
>> I'm sure detailed instructions exist somewhere but a link should be
>> provided from the Monticello project page.
>> That's the least we should do, and not only for newbies (I often swear
>> like troopers when I loose my time searching the precious
>> information).
>> These little obstacles are repelling many people I guess, it's like we
>> should follow an initiation before we dare putting our dirty nose in
>> code.
>> I don't like this spirit, and I hope it's unintentional, but it's
>> totally contrary to Smalltalk foundations.
>>
>> Nicolas
>>
>>>
>>> Any package I click to load it gives me dependency issues and update
>>> package
>>> complains about a Bad
>>>
>>> Gateway
>>>
>>>
>>> Yes I got the very latest of XCode and I am open to any suggestion.
>>>
>>> ________________________________
>>> From: Igor Stasenko <siguctua(a)gmail.com>
>>> To: Pharo-project(a)lists.gforge.inria.fr
>>> Sent: Sunday, 29 January 2012, 1:00
>>> Subject: Re: [Pharo-project] Trying to build CogVM in MacOSX 10.7 Lion
>>>
>>>
>>>
>>> I don't know. But how do you know from his stackstrace that the problem is
>>> that ?
>>>
>>>
>>> i dont. :)
>>> i replied after seeing an Esteban's message saying that your post is
>>> outdated and one should use 3.9 config version.
>>> and couple days before we had someone who asking why NB-enabled VM fails
>>> to
>>> build for him,
>>> when he still using this magic
>>> Â ((Smalltalk at: #ConfigurationOfVMMaker) project version: '1.5') load.
>>>
>>> while when i was released an CMakeVMMaker configs for NB , it was already
>>> far beyond that version,
>>> and of course won't work with 1.5.
>>>
>>> --
>>> Best regards,
>>> Igor Stasenko.
>>>
>>>
>>
>>
Jan. 29, 2012
Re: [Pharo-project] Problems loading underscore assignments
by Mariano Martinez Peck
On Sun, Jan 29, 2012 at 5:31 AM, Sean P. DeNigris <sean(a)clipperadams.com>wrote:
> I tried both programmatically ("Scanner allowUnderscoreAsAssignment: true")
> and via the settings browser to allow underscore assignments, but I still
> got errors loading AtomMorph. e.g.
>
I don't know which image version you are using but in last sprint I fixed
this:
http://code.google.com/p/pharo/issues/detail?id=4636
Cheers
>
> "Syntax Error"
> randomPositionIn: aRectangle maxVelocity: maxVelocity
> "Give this atom a random position and velocity."
>
> | origin extent |
> origin _ aRectangle origin.
> extent _ ***Nothing more expected ->***(aRectangle extent - self
> bounds
> extent) rounded.
> self position:
> (origin x + extent x atRandom) @
> (origin y + extent y atRandom).
> velocity _
> (maxVelocity - (2 * maxVelocity) atRandom) @
> (maxVelocity - (2 * maxVelocity) atRandom).
>
>
> --
> View this message in context:
> http://forum.world.st/Problems-loading-underscore-assignments-tp4337617p433…
> Sent from the Pharo Smalltalk mailing list archive at Nabble.com.
>
>
--
Mariano
http://marianopeck.wordpress.com
Jan. 29, 2012
Re: [Pharo-project] Problems loading underscore assignments
by Lukas Renggli
The programmatic way described on
http://book.pharo-project.org/book/Tidbits/TipsAndTricks/FixingUnderscores
does the same as what I described below. It should just be updated to
work with a more recent version of the refactoring engine:
Gofer new
squeaksource: 'rb';
package: 'AST-Core';
package: 'Refactoring-Core';
package: 'Refactoring-Changes';
package: 'Refactoring-Critics';
package: 'Refactoring-Environment';
package: 'Refactoring-Pharo-Platform';
load.
And the class references must be replaced like this:
BrowserEnvironment -> RBBrowserEnvironment
SmalllintChecker -> RBSmalllintChecker
CompositeRefactoryChange -> RBCompositeRefactoryChange
After the programmatic instructions should work as well.
Lukas
On 29 January 2012 10:48, Lukas Renggli <renggli(a)gmail.com> wrote:
> Yes, the refactoring engine contains a code transformation that fixes
> automatically and preserves all formatting. Just run Code Critics on
> your package and apply the suggested transformations for
> "Transformations > Underscore assignements should be avoided".
>
> Again you must evaluate "Scanner allowUnderscoreAsAssignment: true"
> before running Code Critics, otherwise the refactoring engine does not
> parse methods with underscore assignments.
>
> Lukas
>
> On 29 January 2012 05:32, Sean P. DeNigris <sean(a)clipperadams.com> wrote:
>> Is there a way for fix underscores via OB in lieu of the programmatic way
>> shown at
>> http://book.pharo-project.org/book/Tidbits/TipsAndTricks/FixingUnderscores ?
>>
>> --
>> View this message in context: http://forum.world.st/Problems-loading-underscore-assignments-tp4337617p433…
>> Sent from the Pharo Smalltalk mailing list archive at Nabble.com.
>>
>
>
>
> --
> Lukas Renggli
> www.lukas-renggli.ch
--
Lukas Renggli
www.lukas-renggli.ch
Jan. 29, 2012
Re: [Pharo-project] Trying to build CogVM in MacOSX 10.7 Lion
by Nicolas Cellier
2012/1/29 dimitris chloupis <thekilon(a)yahoo.co.uk>:
> I am not accusing you or anything , I know writing documentation can be both
> hard and boring. And if I can help to make it simpler I will.
>
Sure, but sometimes adding a link or two in the right place would help...
> Back to building , followed your instruction and
>
> "
> Gofer new
> Â squeaksource: 'MetacelloRepository';
> Â package: 'ConfigurationOfVMMaker';
> Â load.
> (Smalltalk at: #ConfigurationOfVMMaker) perform: #load."
>
>
> gives me the following error
>
Ah, my incantation does not work, it's more something like this:
Gofer new
squeaksource: 'MetacelloRepository';
package: 'ConfigurationOfVMMaker';
load.
((Smalltalk at: #ConfigurationOfVMMaker) project perform:
#latestVersion) perform: #load.
Then I have same error as you...
It seems like http://source.impara.de/freetype/Freetype-Plugin-John M
McIntosh.55.mcz is accessible though...
So here, I don't know...
Nicolas
>
>
> 29 January 2012 11:56:20 am
>
> VM: Mac OS - intel - 1072 - NBCoInterpreter
> NativeBoost-CogPlugin-IgorStasenko.8 uuid:
> f47ef546-de3d-4415-850e-6437d67bfb5c Dec 11 2011,
> StackToRegisterMappingCogit VMMaker-oscog-EstebanLorenzano.139 uuid:
> 5aa53979-d7d8-4ca3-91fe-cfc3b4109c33 Dec 11 2011,
> https://git.gitorious.org/cogvm/blessed.git Commit:
> 364a7f1fab69798c1bdc9575ba15e18ea319585a Date: Sun Dec 11 15:17:52 2011
> -0300 By: Esteban Lorenzano <estebanlm(a)gmail.com>
> Image: Pharo1.4a [Latest update: #14284]
>
> UndefinedObject(Object)>>doesNotUnderstand: #readStream
> Receiver: nil
> Arguments and temporary variables:
> aMessage: readStream
> exception: MessageNotUnderstood: receiver of "readStream" is nil
> resumeValue: nil
> Receiver's instance variables:
> nil
>
> MCScanner class>>scanTokens:
> Receiver: MCScanner
> Arguments and temporary variables:
> aString: nil
> Receiver's instance variables:
> superclass: Object
> methodDict: a MethodDictionary(#next->(MCScanner>>#next "a
> CompiledMethod(84410...etc...
> format: 132
> instanceVariables: #('stream')
> organization: ('as yet unclassified' next nextArray nextString nextSymbol
> strea...etc...
> subclasses: nil
> name: #MCScanner
> classPool: nil
> sharedPools: nil
> environment: a SystemDictionary(lots of globals)
> category: #'Monticello-Chunk Format'
> traitComposition: {}
> localSelectors: nil
>
> MCMczReader>>parseMember:
> Receiver: a MCMczReader
> Arguments and temporary variables:
> fileName: 'package'
> tokens: nil
> Receiver's instance variables:
> stream: a ReadStream
> package: nil
> info: nil
> definitions: nil
> dependencies: nil
> zip: a ZipArchive
> infoCache: nil
>
> MCMczReader>>loadPackage
> Receiver: a MCMczReader
> Arguments and temporary variables:
> dict: nil
> Receiver's instance variables:
> stream: a ReadStream
> package: nil
> info: nil
> definitions: nil
> dependencies: nil
> zip: a ZipArchive
> infoCache: nil
>
> MCMczReader(MCVersionReader)>>package
> Receiver: a MCMczReader
> Arguments and temporary variables:
>
> Receiver's instance variables:
> stream: a ReadStream
> package: nil
> info: nil
> definitions: nil
> dependencies: nil
> zip: a ZipArchive
> infoCache: nil
>
> MCMczReader(MCVersionReader)>>basicVersion
> Receiver: a MCMczReader
> Arguments and temporary variables:
>
> Receiver's instance variables:
> stream: a ReadStream
> package: nil
> info: nil
> definitions: nil
> dependencies: nil
> zip: a ZipArchive
> infoCache: nil
>
> MCMczReader(MCVersionReader)>>version
> Receiver: a MCMczReader
> Arguments and temporary variables:
>
> Receiver's instance variables:
> stream: a ReadStream
> package: nil
> info: nil
> definitions: nil
> dependencies: nil
> zip: a ZipArchive
> infoCache: nil
>
> [:r | r version] in
> MCHttpRepository(MCFileBasedRepository)>>loadVersionFromFileNamed:
> Receiver: a MCHttpRepository(http://source.impara.de/freetype)
> Arguments and temporary variables:
> r: a MCMczReader
> Receiver's instance variables:
> creationTemplate: nil
> storeDiffs: nil
> cache: nil
> allFileNames: nil
> location: 'http://source.impara.de/freetype'
> user: ''
> password: ''
> readerCache: a Dictionary('Freetype-Plugin-John M McIntosh.55.mcz'->a
> MCMczRead...etc...
>
> BlockClosure>>cull:
> Receiver: [:r | r version]
> Arguments and temporary variables:
> anArg: a MCMczReader
> Receiver's instance variables:
> outerContext:
> MCHttpRepository(MCFileBasedRepository)>>loadVersionFromFileNamed...etc...
> startpc: 27
> numArgs: 1
>
> MCMczReader(ProtoObject)>>ifNotNil:
> Receiver: a MCMczReader
> Arguments and temporary variables:
> ifNotNilBlock: [:r | r version]
> Receiver's instance variables:
> stream: a ReadStream
> package: nil
> info: nil
> definitions: nil
> dependencies: nil
> zip: a ZipArchive
> infoCache: nil
>
> MCHttpRepository>>versionReaderForFileNamed:do:
> Receiver: a MCHttpRepository(http://source.impara.de/freetype)
> Arguments and temporary variables:
> aString: 'Freetype-Plugin-John M McIntosh.55.mcz'
> aBlock: [:r | r version]
> Receiver's instance variables:
> creationTemplate: nil
> storeDiffs: nil
> cache: nil
> allFileNames: nil
> location: 'http://source.impara.de/freetype'
> user: ''
> password: ''
> readerCache: a Dictionary('Freetype-Plugin-John M McIntosh.55.mcz'->a
> MCMczRead...etc...
>
> MCHttpRepository(MCFileBasedRepository)>>loadVersionFromFileNamed:
> Receiver: a MCHttpRepository(http://source.impara.de/freetype)
> Arguments and temporary variables:
> aString: 'Freetype-Plugin-John M McIntosh.55.mcz'
> Receiver's instance variables:
> creationTemplate: nil
> storeDiffs: nil
> cache: nil
> allFileNames: nil
> location: 'http://source.impara.de/freetype'
> user: ''
> password: ''
> readerCache: a Dictionary('Freetype-Plugin-John M McIntosh.55.mcz'->a
> MCMczRead...etc...
>
> MCHttpRepository(MCFileBasedRepository)>>goferVersionFrom:
> Receiver: a MCHttpRepository(http://source.impara.de/freetype)
> Arguments and temporary variables:
> aVersionReference: a MetacelloCachingGoferResolvedReference name:
> 'Freetype-Plu...etc...
> Receiver's instance variables:
> creationTemplate: nil
> storeDiffs: nil
> cache: nil
> allFileNames: nil
> location: 'http://source.impara.de/freetype'
> user: ''
> password: ''
> readerCache: a Dictionary('Freetype-Plugin-John M McIntosh.55.mcz'->a
> MCMczRead...etc...
>
> MetacelloCachingGoferResolvedReference(GoferResolvedReference)>>version
> Receiver: a MetacelloCachingGoferResolvedReference name:
> 'Freetype-Plugin-John M McIntosh.55'
> Arguments and temporary variables:
>
> Receiver's instance variables:
> name: 'Freetype-Plugin-John M McIntosh.55'
> package: 'Freetype-Plugin'
> author: 'John M McIntosh'
> branch: ''
> versionNumber: 55
> repository: a MCHttpRepository(http://source.impara.de/freetype)
> cachedVersion: nil
>
> MetacelloCachingGoferResolvedReference>>version
> Receiver: a MetacelloCachingGoferResolvedReference name:
> 'Freetype-Plugin-John M McIntosh.55'
> Arguments and temporary variables:
>
> Receiver's instance variables:
> name: 'Freetype-Plugin-John M McIntosh.55'
> package: 'Freetype-Plugin'
> author: 'John M McIntosh'
> branch: ''
> versionNumber: 55
> repository: a MCHttpRepository(http://source.impara.de/freetype)
> cachedVersion: nil
>
> [:each | each version] in [aCollection
> do: [:each | each version].
> nearestReference version dependencies do: block.
> notDone := false] in
> MetacelloFetchingMCSpecLoader>>resolveDependencies:nearest:into:
> Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.3
> [ConfigurationOfVMMaker]
> load : FFI-Poo...etc...
> Arguments and temporary variables:
> each: a MetacelloCachingGoferResolvedReference name: 'Freetype-Plugin-John M
> Mc...etc...
> Receiver's instance variables:
> spec: a MetacelloMCVersionSpecLoader
> operator: nil
> loaderPolicy: a MetacelloLoaderPolicy
> disablePackageCache: false
>
> OrderedCollection>>do:
> Receiver: an OrderedCollection(a MetacelloCachingGoferResolvedReference
> name: 'Freetype-Plugin-John ...etc...
> Arguments and temporary variables:
> aBlock: [:each | each version]
> index: 1
> Receiver's instance variables:
> array: an Array(a MetacelloCachingGoferResolvedReference name:
> 'Freetype-Plugin...etc...
> firstIndex: 1
> lastIndex: 1
>
> [aCollection
> do: [:each | each version].
> nearestReference version dependencies do: block.
> notDone := false] in
> MetacelloFetchingMCSpecLoader>>resolveDependencies:nearest:into:
> Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.3
> [ConfigurationOfVMMaker]
> load : FFI-Poo...etc...
> Arguments and temporary variables:
> <<error during printing>
> Receiver's instance variables:
> spec: a MetacelloMCVersionSpecLoader
> operator: nil
> loaderPolicy: a MetacelloLoaderPolicy
> disablePackageCache: false
>
> BlockClosure>>on:do:
> Receiver: [aCollection
> do: [:each | each version].
> nearestReference version dependencies do: bloc...etc...
> Arguments and temporary variables:
> exception: Error
> handlerAction: [:ex |
> retryCount := retryCount + 1.
> retryCount >= 3
> ifTrue:...etc...
> handlerActive: false
> Receiver's instance variables:
> outerContext:
> MetacelloFetchingMCSpecLoader>>resolveDependencies:nearest:into:
> startpc: 226
> numArgs: 0
>
> MetacelloFetchingMCSpecLoader>>resolveDependencies:nearest:into:
> Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.3
> [ConfigurationOfVMMaker]
> load : FFI-Poo...etc...
> Arguments and temporary variables:
> <<error during printing>
> Receiver's instance variables:
> spec: a MetacelloMCVersionSpecLoader
> operator: nil
> loaderPolicy: a MetacelloLoaderPolicy
> disablePackageCache: false
>
> [| references nearestReference cachedReference externalReference
> loadedVersionInfos mcVersion |
> self flag: #cleanup.
> cachedReference := self resolvePackageSpec: packageSpec cachedGofer: self
> loaderPolicy cacheGofer.
> (cachedReference ~~ nil
> and: [packageSpec getFile ~~ nil])
> ifTrue: [cachedReference name = packageSpec file
> ifTrue: [^ self]].
> references := self retryingResolvePackageSpecReferences: packageSpec gofer:
> gofer.
> nearestReference := references last asMetacelloCachingResolvedReference.
> (cachedReference ~~ nil
> and: [cachedReference name = nearestReference name])
> ifTrue: [^ self].
> (self ignoreImage not
> and: [(loadedVersionInfos := self ancestorsFor: packageSpec) ~~ nil])
> ifTrue: [loadedVersionInfos
> do: [:info |
> info name = nearestReference name
> ifTrue: [^ self].
> nil]].
> externalReference := (references
> select: [:ref | ref name = nearestReference name]) first
> asMetacelloCachingResolvedReference.
> self repositoryMap at: externalReference name put: externalReference
> repository.
> (self
> resolveDependencies: externalReference
> nearest: nearestReference
> into: (OrderedCollection with: nearestReference))
> do: [:reference |
> | pSpec l |
> mcVersion := reference version.
> (l := (GoferVersionReference name: reference name)
> resolveAllWith: self loaderPolicy cacheGofer) isEmpty
> ifTrue: [self cacheRepository storeVersion: mcVersion.
> reference == nearestReference
> ifTrue: [pSpec := packageSpec]
> ifFalse: [pSpec := packageSpec project packageSpec.
> pSpec name: mcVersion info].
> self loadData
> addVersion: mcVersion
> versionInfo: mcVersion info
> resolvedReference: reference
> packageSpec: pSpec]].
> self loaderPolicy resetCacheGofer.
> self preLoad: packageSpec.
> (MetacelloDirective
> loadPackage: packageSpec
> externalReference: externalReference
> loader: self)
> addTo: self loadDirective.
> self postLoad: packageSpec.
> Transcript cr; show: 'Fetched -> ' , externalReference name , ' --- ' ,
> externalReference repository description , ' --- ' , nearestReference
> repository description] in
> MetacelloFetchingMCSpecLoader>>linearLoadPackageSpec:gofer:
> Receiver: a MetacelloFetchingMCSpecLoader(linear load : 1.3
> [ConfigurationOfVMMaker]
> load : FFI-Poo...etc...
> Arguments and temporary variables:
> packageSpec: spec
> name: 'Freetype-Plugin';
> requires: #('VMMaker' );
> file: '...etc...
> gofer: a MetacelloGofer
> references: an Array(a GoferResolvedReference name: 'Freetype-Plugin-John M
> McI...etc...
> nearestReference: a MetacelloCachingGoferResolvedReference name:
> 'Freetype-Plug...etc...
> cachedReference: nil
> externalReference: a MetacelloCachingGoferResolvedReference name:
> 'Freetype-Plu...etc...
> loadedVersionInfos: nil
> mcVersion: #(nil)
> Receiver's instance variables:
> spec: a MetacelloMCVersionSpecLoader
> operator: nil
> loaderPolicy: a MetacelloLoaderPolicy
> disablePackageCache: false
>
> [:bar |
> bar value: 1.
> aBlock value.
> bar value: 2] in MetacelloPharoPlatform>>do:displaying:
> Receiver: a MetacelloPharoPlatform
> Arguments and temporary variables:
> aBlock: [:barValArg |
> | barVal return newBarSize |
> barVal := barValArg.
> retur...etc...
> bar: [| references nearestReference cachedReference externalReference
> loadedVer...etc...
> Receiver's instance variables:
> bypassProgressBars: false
> bypassGoferLoadUpdateCategories: false
>
> [result := workBlock value: progress] in [[result := workBlock value:
> progress]
> on: ProgressNotification
> do: [:ex |
> ex extraParam isString
> ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put: ex
> extraParam].
> ex resume]] in ProgressInitiationException>>defaultMorphicAction
> Receiver: ProgressInitiationException
> Arguments and temporary variables:
> progress: [:barValArg |
> | barVal return newBarSize |
> barVal := barValArg.
> ret...etc...
> result: #(nil)
> Receiver's instance variables:
> messageText: nil
> tag: nil
> signaler: 'Fetching Freetype-Plugin-John M McIntosh.55'
> signalContext: ProgressInitiationException(Exception)>>signal
> handlerContext: nil
> outerContext: nil
> workBlock: [:bar |
> bar value: 1.
> aBlock value.
> bar value: 2]
> maxVal: 2
> minVal: 0
> aPoint: (635@231)
> progressTitle: 'Fetching Freetype-Plugin-John M McIntosh.55'
>
> BlockClosure>>on:do:
> Receiver: [result := workBlock value: progress]
> Arguments and temporary variables:
> exception: ProgressNotification
> handlerAction: [:ex |
> ex extraParam isString
> ifTrue: [SystemProgressMorph un...etc...
> handlerActive: true
> Receiver's instance variables:
> outerContext: [[result := workBlock value: progress]
> on: ProgressNotification...etc...
> startpc: 87
> numArgs: 0
>
> [[result := workBlock value: progress]
> on: ProgressNotification
> do: [:ex |
> ex extraParam isString
> ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put: ex
> extraParam].
> ex resume]] in ProgressInitiationException>>defaultMorphicAction
> Receiver: ProgressInitiationException
> Arguments and temporary variables:
> progress: [:barValArg |
> | barVal return newBarSize |
> barVal := barValArg.
> ret...etc...
> result: #(nil)
> Receiver's instance variables:
> messageText: nil
> tag: nil
> signaler: 'Fetching Freetype-Plugin-John M McIntosh.55'
> signalContext: ProgressInitiationException(Exception)>>signal
> handlerContext: nil
> outerContext: nil
> workBlock: [:bar |
> bar value: 1.
> aBlock value.
> bar value: 2]
> maxVal: 2
> minVal: 0
> aPoint: (635@231)
> progressTitle: 'Fetching Freetype-Plugin-John M McIntosh.55'
>
> BlockClosure>>ensure:
> Receiver: [[result := workBlock value: progress]
> on: ProgressNotification
> do: [:ex |
> ex extr...etc...
> Arguments and temporary variables:
> aBlock: [SystemProgressMorph close: progress]
> complete: nil
> returnValue: nil
> Receiver's instance variables:
> outerContext: ProgressInitiationException>>defaultMorphicAction
> startpc: 81
> numArgs: 0
>
> ProgressInitiationException>>defaultMorphicAction
> Receiver: ProgressInitiationException
> Arguments and temporary variables:
> progress: [:barValArg |
> | barVal return newBarSize |
> barVal := barValArg.
> ret...etc...
> result: #(nil)
> Receiver's instance variables:
> messageText: nil
> tag: nil
> signaler: 'Fetching Freetype-Plugin-John M McIntosh.55'
> signalContext: ProgressInitiationException(Exception)>>signal
> handlerContext: nil
> outerContext: nil
> workBlock: [:bar |
> bar value: 1.
> aBlock value.
> bar value: 2]
> maxVal: 2
> minVal: 0
> aPoint: (635@231)
> progressTitle: 'Fetching Freetype-Plugin-John M McIntosh.55'
>
> MorphicUIManager>>progressInitiationExceptionDefaultAction:
> Receiver: a MorphicUIManager
> Arguments and temporary variables:
> anException: ProgressInitiationException
> Receiver's instance variables:
> interactiveParser: nil
>
> ProgressInitiationException>>defaultAction
> Receiver: ProgressInitiationException
> Arguments and temporary variables:
>
> Receiver's instance variables:
> messageText: nil
> tag: nil
> signaler: 'Fetching Freetype-Plugin-John M McIntosh.55'
> signalContext: ProgressInitiationException(Exception)>>signal
> handlerContext: nil
> outerContext: nil
> workBlock: [:bar |
> bar value: 1.
> aBlock value.
> bar value: 2]
> maxVal: 2
> minVal: 0
> aPoint: (635@231)
> progressTitle: 'Fetching Freetype-Plugin-John M McIntosh.55'
>
> UndefinedObject>>handleSignal:
> Receiver: nil
> Arguments and temporary variables:
> exception: ProgressInitiationException
> Receiver's instance variables:
> nil
>
> MethodContext(ContextPart)>>handleSignal:
> Receiver: BlockClosure>>on:do:
> Arguments and temporary variables:
> exception: ProgressInitiationException
> val: nil
> Receiver's instance variables:
> sender: PasteUpMorph>>becomeActiveDuring:
> pc: 17
> stackp: 3
> method: (BlockClosure>>#on:do: "a CompiledMethod(869793792)")
> closureOrNil: nil
> receiver: [aBlock value]
>
> MethodContext(ContextPart)>>handleSignal:
> Receiver: BlockClosure>>on:do:
> Arguments and temporary variables:
> exception: ProgressInitiationException
> val: nil
> Receiver's instance variables:
> sender: SmalltalkEditor>>evaluateSelectionAndDo:
> pc: 17
> stackp: 3
> method: (BlockClosure>>#on:do: "a CompiledMethod(869793792)")
> closureOrNil: nil
> receiver: [rcvr class evaluatorClass new
> evaluate: self selectionForDoitAsStr...etc...
>
> MethodContext(ContextPart)>>handleSignal:
> Receiver: BlockClosure>>on:do:
> Arguments and temporary variables:
> exception: ProgressInitiationException
> val: nil
> Receiver's instance variables:
> sender: [[result := workBlock value: progress]
> on: ProgressNotification
> do:...etc...
> pc: 17
> stackp: 3
> method: (BlockClosure>>#on:do: "a CompiledMethod(869793792)")
> closureOrNil: nil
> receiver: [result := workBlock value: progress]
>
> MethodContext(ContextPart)>>handleSignal:
> Receiver: BlockClosure>>on:do:
> Arguments and temporary variables:
> exception: ProgressInitiationException
> val: nil
> Receiver's instance variables:
> sender:
> MetacelloPharoPlatform(MetacelloPlatform)>>useStackCacheDuring:defaultD...etc...
> pc: 17
> stackp: 3
> method: (BlockClosure>>#on:do: "a CompiledMethod(869793792)")
> closureOrNil: nil
> receiver: [^ aBlock value: dict]
>
> ProgressInitiationException(Exception)>>signal
> Receiver: ProgressInitiationException
> Arguments and temporary variables:
>
> Receiver's instance variables:
> messageText: nil
> tag: nil
> signaler: 'Fetching Freetype-Plugin-John M McIntosh.55'
> signalContext: ProgressInitiationException(Exception)>>signal
> handlerContext: nil
> outerContext: nil
> workBlock: [:bar |
> bar value: 1.
> aBlock value.
> bar value: 2]
> maxVal: 2
> minVal: 0
> aPoint: (635@231)
> progressTitle: 'Fetching Freetype-Plugin-John M McIntosh.55'
>
> ProgressInitiationException>>display:at:from:to:during:
> Receiver: ProgressInitiationException
> Arguments and temporary variables:
> argString: 'Fetching Freetype-Plugin-John M McIntosh.55'
> argPoint: (635@231)
> argMinVal: 0
> argMaxVal: 2
> argWorkBlock: [:bar |
> bar value: 1.
> aBlock value.
> bar value: 2]
> Receiver's instance variables:
> messageText: nil
> tag: nil
> signaler: 'Fetching Freetype-Plugin-John M McIntosh.55'
> signalContext: ProgressInitiationException(Exception)>>signal
> handlerContext: nil
> outerContext: nil
> workBlock: [:bar |
> bar value: 1.
> aBlock value.
> bar value: 2]
> maxVal: 2
> minVal: 0
> aPoint: (635@231)
> progressTitle: 'Fetching Freetype-Plugin-John M McIntosh.55'
>
> ProgressInitiationException class>>display:at:from:to:during:
> Receiver: ProgressInitiationException
> Arguments and temporary variables:
> aString: 'Fetching Freetype-Plugin-John M McIntosh.55'
> aPoint: (635@231)
> minVal: 0
> maxVal: 2
> workBlock: [:bar |
> bar value: 1.
> aBlock value.
> bar value: 2]
> Receiver's instance variables:
> superclass: Exception
> methodDict: a
> MethodDictionary(#defaultAction->(ProgressInitiationException>>#d...etc...
> format: 152
> instanceVariables: #('workBlock' 'maxVal' 'minVal' 'aPoint' 'progressTitle')
> organization: ('*Morphic' defaultMorphicAction)
> ('accessing' maxVal minVal poin...etc...
> subclasses: nil
> name: #ProgressInitiationException
> classPool: nil
> sharedPools: nil
> environment: a SystemDictionary(lots of globals)
> category: #'UIManager-Support'
> traitComposition: nil
> localSelectors: nil
>
> ByteString(String)>>displayProgressAt:from:to:during:
> Receiver: 'Fetching Freetype-Plugin-John M McIntosh.55'
> Arguments and temporary variables:
> aPoint: (635@231)
> minVal: 0
> maxVal: 2
> workBlock: [:bar |
> bar value: 1.
> aBlock value.
> bar value: 2]
> Receiver's instance variables:
> 'Fetching Freetype-Plugin-John M McIntosh.55'
>
> MetacelloPharoPlatform>>do:displaying:
> Receiver: a MetacelloPharoPlatform
> Arguments and temporary variables:
> aBlock: [| references nearestReference cachedReference externalReference
> loaded...etc...
> aString: 'Fetching Freetype-Plugin-John M McIntosh.55'
> Receiver's instance variables:
> bypassProgressBars: false
> bypassGoferLoadUpdateCategories: false
>
>
> --- The full stack ---
> UndefinedObject(Object)>>doesNotUnderstand: #readStream
> MCScanner class>>scanTokens:
> MCMczReader>>parseMember:
> MCMczReader>>loadPackage
> MCMczReader(MCVersionReader)>>package
> MCMczReader(MCVersionReader)>>basicVersion
> MCMczReader(MCVersionReader)>>version
> [:r | r version] in
> MCHttpRepository(MCFileBasedRepository)>>loadVersionFromFileNamed:
> BlockClosure>>cull:
> MCMczReader(ProtoObject)>>ifNotNil:
> MCHttpRepository>>versionReaderForFileNamed:do:
> MCHttpRepository(MCFileBasedRepository)>>loadVersionFromFileNamed:
> MCHttpRepository(MCFileBasedRepository)>>goferVersionFrom:
> MetacelloCachingGoferResolvedReference(GoferResolvedReference)>>version
> MetacelloCachingGoferResolvedReference>>version
> [:each | each version] in [aCollection
> do: [:each | each version].
> nearestReference version dependencies do: block.
> notDone := false] in
> MetacelloFetchingMCSpecLoader>>resolveDependencies:nearest:into:
> OrderedCollection>>do:
> [aCollection
> do: [:each | each version].
> nearestReference version dependencies do: block.
> notDone := false] in
> MetacelloFetchingMCSpecLoader>>resolveDependencies:nearest:into:
> BlockClosure>>on:do:
> MetacelloFetchingMCSpecLoader>>resolveDependencies:nearest:into:
> [| references nearestReference cachedReference externalReference
> loadedVersionInfos mcVersion |
> self flag: #cleanup.
> cachedReference := self resolvePackageSpec: packageSpec cachedGofer: self
> loaderPolicy cacheGofer.
> (cachedReference ~~ nil
> and: [packageSpec getFile ~~ nil])
> ifTrue: [cachedReference name = packageSpec file
> ifTrue: [^ self]].
> references := self retryingResolvePackageSpecReferences: packageSpec gofer:
> gofer.
> nearestReference := references last asMetacelloCachingResolvedReference.
> (cachedReference ~~ nil
> and: [cachedReference name = nearestReference name])
> ifTrue: [^ self].
> (self ignoreImage not
> and: [(loadedVersionInfos := self ancestorsFor: packageSpec) ~~ nil])
> ifTrue: [loadedVersionInfos
> do: [:info |
> info name = nearestReference name
> ifTrue: [^ self].
> nil]].
> externalReference := (references
> select: [:ref | ref name = nearestReference name]) first
> asMetacelloCachingResolvedReference.
> self repositoryMap at: externalReference name put: externalReference
> repository.
> (self
> resolveDependencies: externalReference
> nearest: nearestReference
> into: (OrderedCollection with: nearestReference))
> do: [:reference |
> | pSpec l |
> mcVersion := reference version.
> (l := (GoferVersionReference name: reference name)
> resolveAllWith: self loaderPolicy cacheGofer) isEmpty
> ifTrue: [self cacheRepository storeVersion: mcVersion.
> reference == nearestReference
> ifTrue: [pSpec := packageSpec]
> ifFalse: [pSpec := packageSpec project packageSpec.
> pSpec name: mcVersion info].
> self loadData
> addVersion: mcVersion
> versionInfo: mcVersion info
> resolvedReference: reference
> packageSpec: pSpec]].
> self loaderPolicy resetCacheGofer.
> self preLoad: packageSpec.
> (MetacelloDirective
> loadPackage: packageSpec
> externalReference: externalReference
> loader: self)
> addTo: self loadDirective.
> self postLoad: packageSpec.
> Transcript cr; show: 'Fetched -> ' , externalReference name , ' --- ' ,
> externalReference repository description , ' --- ' , nearestReference
> repository description] in
> MetacelloFetchingMCSpecLoader>>linearLoadPackageSpec:gofer:
> [:bar |
> bar value: 1.
> aBlock value.
> bar value: 2] in MetacelloPharoPlatform>>do:displaying:
> [result := workBlock value: progress] in [[result := workBlock value:
> progress]
> on: ProgressNotification
> do: [:ex |
> ex extraParam isString
> ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put: ex
> extraParam].
> ex resume]] in ProgressInitiationException>>defaultMorphicAction
> BlockClosure>>on:do:
> [[result := workBlock value: progress]
> on: ProgressNotification
> do: [:ex |
> ex extraParam isString
> ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put: ex
> extraParam].
> ex resume]] in ProgressInitiationException>>defaultMorphicAction
> BlockClosure>>ensure:
> ProgressInitiationException>>defaultMorphicAction
> MorphicUIManager>>progressInitiationExceptionDefaultAction:
> ProgressInitiationException>>defaultAction
> UndefinedObject>>handleSignal:
> MethodContext(ContextPart)>>handleSignal:
> MethodContext(ContextPart)>>handleSignal:
> MethodContext(ContextPart)>>handleSignal:
> MethodContext(ContextPart)>>handleSignal:
> ProgressInitiationException(Exception)>>signal
> ProgressInitiationException>>display:at:from:to:during:
> ProgressInitiationException class>>display:at:from:to:during:
> ByteString(String)>>displayProgressAt:from:to:during:
> MetacelloPharoPlatform>>do:displaying:
> Â - - - - - - - - - - - - - - -
> - - - - - - - - - - - - - - - - - -
> MetacelloFetchingMCSpecLoader>>linearLoadPackageSpec:gofer:
> MetacelloPackageSpec>>loadUsing:gofer:
> [:pkg | pkg loadUsing: self gofer: gofer] in
> MetacelloFetchingMCSpecLoader(MetacelloCommonMCSpecLoader)>>linearLoadPackageSpecs:repositories:
> OrderedCollection>>do:
> MetacelloFetchingMCSpecLoader(MetacelloCommonMCSpecLoader)>>linearLoadPackageSpecs:repositories:
> [super linearLoadPackageSpecs: packageSpecs repositories: repositories] in
> MetacelloFetchingMCSpecLoader>>linearLoadPackageSpecs:repositories:
> BlockClosure>>ensure:
> MetacelloLoaderPolicy>>pushLoadDirective:during:
> MetacelloLoaderPolicy>>pushLinearLoadDirectivesDuring:for:
> MetacelloFetchingMCSpecLoader>>linearLoadPackageSpecs:repositories:
> MetacelloFetchingMCSpecLoader(MetacelloCommonMCSpecLoader)>>load
> MetacelloMCVersionSpecLoader>>load
> MetacelloMCVersion>>executeLoadFromArray:
> [:dict | ^ self executeLoadFromArray: anArray] in [self versionSpec loader:
> newLoader.
> MetacelloPlatform current
> useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
> defaultDictionary: Dictionary new] in [[self versionSpec loader: newLoader.
> MetacelloPlatform current
> useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
> defaultDictionary: Dictionary new]
> ensure: [self versionSpec loader: originalLoader]] in
> MetacelloMCVersion>>fetchRequiredFromArray:
> [^ aBlock value: dict] in
> MetacelloPharoPlatform(MetacelloPlatform)>>useStackCacheDuring:defaultDictionary:
> BlockClosure>>on:do:
> MetacelloPharoPlatform(MetacelloPlatform)>>useStackCacheDuring:defaultDictionary:
> [self versionSpec loader: newLoader.
> MetacelloPlatform current
> useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
> defaultDictionary: Dictionary new] in [[self versionSpec loader: newLoader.
> MetacelloPlatform current
> useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
> defaultDictionary: Dictionary new]
> ensure: [self versionSpec loader: originalLoader]] in
> MetacelloMCVersion>>fetchRequiredFromArray:
> BlockClosure>>ensure:
> [[self versionSpec loader: newLoader.
> MetacelloPlatform current
> useStackCacheDuring: [:dict | ^ self executeLoadFromArray: anArray]
> defaultDictionary: Dictionary new]
> ensure: [self versionSpec loader: originalLoader]] in
> MetacelloMCVersion>>fetchRequiredFromArray:
> [:bar |
> bar value: 1.
> aBlock value.
> bar value: 2] in MetacelloPharoPlatform>>do:displaying:
> [result := workBlock value: progress] in [[result := workBlock value:
> progress]
> on: ProgressNotification
> do: [:ex |
> ex extraParam isString
> ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put: ex
> extraParam].
> ex resume]] in ProgressInitiationException>>defaultMorphicAction
> BlockClosure>>on:do:
> [[result := workBlock value: progress]
> on: ProgressNotification
> do: [:ex |
> ex extraParam isString
> ifTrue: [SystemProgressMorph uniqueInstance labelAt: progress put: ex
> extraParam].
> ex resume]] in ProgressInitiationException>>defaultMorphicAction
> BlockClosure>>ensure:
> ProgressInitiationException>>defaultMorphicAction
> MorphicUIManager>>progressInitiationExceptionDefaultAction:
> ProgressInitiationException>>defaultAction
> UndefinedObject>>handleSignal:
> MethodContext(ContextPart)>>handleSignal:
> MethodContext(ContextPart)>>handleSignal:
> ProgressInitiationException(Exception)>>signal
> ProgressInitiationException>>display:at:from:to:during:
> ProgressInitiationException class>>display:at:from:to:during:
> ByteString(String)>>displayProgressAt:from:to:during:
> MetacelloPharoPlatform>>do:displaying:
> MetacelloMCVersion>>fetchRequiredFromArray:
> [| fetchLoader |
> fetchLoader := self
> fetchRequiredFromArray: (self defaultPackageNamesToLoad: anArray).
> MetacelloPlatform current
> do: [fetchLoader doLoad]
> displaying: 'Loading ' , displayString.
> Transcript cr; show: '...finished ' , self versionNumber printString.
> ^ fetchLoader] in MetacelloMCVersion>>doLoadRequiredFromArray:
> BlockClosure>>ensure:
> MetacelloMCVersion>>doLoadRequiredFromArray:
> MetacelloMCVersion>>load
> ConfigurationOfVMMaker class>>load
> UndefinedObject>>DoIt
> Compiler>>evaluate:in:to:notifying:ifFail:logged:
> [rcvr class evaluatorClass new
> evaluate: self selectionForDoitAsStream
> in: ctxt
> to: rcvr
> notifying: self morph
> ifFail: [self morph flash.
> ^ nil]
> logged: true] in SmalltalkEditor>>evaluateSelectionAndDo:
> BlockClosure>>on:do:
> SmalltalkEditor>>evaluateSelectionAndDo:
> SmalltalkEditor>>evaluateSelection
> [textMorph editor evaluateSelection] in PluggableTextMorph>>doIt
> [result := editBlock value] in PluggableTextMorph>>handleEdit:
> TextMorphForEditView(TextMorph)>>handleEdit:
> PluggableTextMorph>>handleEdit:
> PluggableTextMorph>>doIt
> Workspace(StringHolder)>>perform:orSendTo:
> [| selArgCount |
> (selArgCount := selector numArgs) = 0
> ifTrue: [target perform: selector]
> ifFalse: [selArgCount = arguments size
> ifTrue: [target perform: selector withArguments: arguments]
> ifFalse: [target
> perform: selector
> withArguments: (arguments copyWith: evt)]].
> self changed] in ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
> BlockClosure>>ensure:
> CursorWithMask(Cursor)>>showWhile:
> ToggleMenuItemMorph(MenuItemMorph)>>invokeWithEvent:
> ToggleMenuItemMorph(MenuItemMorph)>>mouseUp:
> ToggleMenuItemMorph(MenuItemMorph)>>handleMouseUp:
> MouseButtonEvent>>sentTo:
> ToggleMenuItemMorph(Morph)>>handleEvent:
> MorphicEventDispatcher>>dispatchDefault:with:
> MorphicEventDispatcher>>dispatchEvent:with:
> ToggleMenuItemMorph(Morph)>>processEvent:using:
> MorphicEventDispatcher>>dispatchDefault:with:
> MorphicEventDispatcher>>dispatchEvent:with:
> MenuMorph(Morph)>>processEvent:using:
> MenuMorph(Morph)>>processEvent:
> MenuMorph>>handleFocusEvent:
> [ActiveHand := self.
> ActiveEvent := anEvent.
> result := focusHolder
> handleFocusEvent: (anEvent
> transformedBy: (focusHolder transformedFrom: self))] in
> HandMorph>>sendFocusEvent:to:clear:
> [aBlock value] in PasteUpMorph>>becomeActiveDuring:
> BlockClosure>>on:do:
> PasteUpMorph>>becomeActiveDuring:
> HandMorph>>sendFocusEvent:to:clear:
> HandMorph>>sendEvent:focus:clear:
> HandMorph>>sendMouseEvent:
> HandMorph>>handleEvent:
> HandMorph>>processEvents
> [:h |
> ActiveHand := h.
> h processEvents.
> ActiveHand := nil] in WorldState>>doOneCycleNowFor:
> Array(SequenceableCollection)>>do:
> WorldState>>handsDo:
> WorldState>>doOneCycleNowFor:
> WorldState>>doOneCycleFor:
> WorldState>>doOneSubCycleFor:
> PasteUpMorph>>doOneSubCycle
> MenuMorph>>invokeModalAt:in:allowKeyboard:
> MenuMorph>>invokeModal:
> MenuMorph>>invokeModal
> PluggableTextMorph>>yellowButtonActivity:
> TextMorphForEditView>>mouseDown:
> TextMorphForEditView(Morph)>>handleMouseDown:
> MouseButtonEvent>>sentTo:
> TextMorphForEditView(Morph)>>handleEvent:
> MorphicEventDispatcher>>dispatchMouseDown:with:
> MorphicEventDispatcher>>dispatchEvent:with:
> TextMorphForEditView(Morph)>>processEvent:using:
> MorphicEventDispatcher>>dispatchMouseDown:with:
> MorphicEventDispatcher>>dispatchEvent:with:
> TransformMorph(Morph)>>processEvent:using:
> MorphicEventDispatcher>>dispatchMouseDown:with:
> MorphicEventDispatcher>>dispatchEvent:with:
> PluggableTextMorph(Morph)>>processEvent:using:
> MorphicEventDispatcher>>dispatchMouseDown:with:
> MorphicEventDispatcher>>dispatchEvent:with:
> SystemWindow(Morph)>>processEvent:using:
> MorphicEventDispatcher>>dispatchMouseDown:with:
> MorphicEventDispatcher>>dispatchEvent:with:
> PasteUpMorph(Morph)>>processEvent:using:
> PasteUpMorph>>processEvent:using:
> PasteUpMorph(Morph)>>processEvent:
> HandMorph>>sendEvent:focus:clear:
> HandMorph>>sendMouseEvent:
> HandMorph>>handleEvent:
> HandMorph>>processEvents
> [:h |
> ActiveHand := h.
> h processEvents.
> ActiveHand := nil] in WorldState>>doOneCycleNowFor:
> Array(SequenceableCollection)>>do:
> WorldState>>handsDo:
> WorldState>>doOneCycleNowFor:
> WorldState>>doOneCycleFor:
> PasteUpMorph>>doOneCycle
> [[World doOneCycle.
> Processor yield.
> false] whileFalse.
> nil] in MorphicUIManager>>spawnNewProcess
> [self value.
> Processor terminateActive] in BlockClosure>>newProcess
>
>
> ________________________________
> From: Nicolas Cellier <nicolas.cellier.aka.nice(a)gmail.com>
> To: Pharo-project(a)lists.gforge.inria.fr; dimitris chloupis
> <thekilon(a)yahoo.co.uk>
> Sent: Sunday, 29 January 2012, 11:39
> Subject: Re: [Pharo-project] Trying to build CogVM in MacOSX 10.7 Lion
>
> 2012/1/29 dimitris chloupis <thekilon(a)yahoo.co.uk>:
>> ok if you want me to install the latest I will install the latest , but
>> there is no such documentation I am aware of how to do that .
>>
>> Can you help me ?
>>
>> Currently I have NBCog , Pharo-1.4 image and the latest from "Â git clone
>> git://gitorious.org/cogvm/blessed.git"
>>
>> But I have no idea how to install the latest VMMaker and CMakeVMMaker
>>
>> I tried monticello giving it this adress
>>
>> MCHttpRepository
>>Â Â location: 'http://www.squeaksource.com/VMMaker'
>>Â Â user: ''
>>Â Â password: ''
>>
>
> I agree with you, we are very very bad when it come to documenting how to...
> To aggravate this situation, the ground is moving fast under our feet.
> If you open above address in a web browser, you'll see this:
>
> Effective 05-Sept-2011, the VMMaker repository is hosted at
> http://source.squeak.org/VMMaker.html and new updates will appear in
> that repository, possibly mirrored here for convenience. Please update
> your Montecello browsers accordingly.
>
> There is a Metacello invocation for loading all Pharo compatible or
> Pharo specific packages maybe something like this (I'm not totally
> sure, but Pharo gurus will correct me)
>
> Gofer new
> Â squeaksource: 'MetacelloRepository';
> Â package: 'ConfigurationOfVMMaker';
> Â load.
> (Smalltalk at: #ConfigurationOfVMMaker) perform: #load.
>
> I don't have write access to these repositories, but I wish this
> incantation were in the project description or the wiki of both pages
> http://source.squeak.org/VMMaker.html and
> http://www.squeaksource.com/VMMaker
>
> I also see a notice about SVN, but nothing about the git repository...
> I'm sure detailed instructions exist somewhere but a link should be
> provided from the Monticello project page.
> That's the least we should do, and not only for newbies (I often swear
> like troopers when I loose my time searching the precious
> information).
> These little obstacles are repelling many people I guess, it's like we
> should follow an initiation before we dare putting our dirty nose in
> code.
> I don't like this spirit, and I hope it's unintentional, but it's
> totally contrary to Smalltalk foundations.
>
> Nicolas
>
>>
>> Any package I click to load it gives me dependency issues and update
>> package
>> complains about a Bad
>>
>> Gateway
>>
>>
>> Yes I got the very latest of XCode and I am open to any suggestion.
>>
>> ________________________________
>> From: Igor Stasenko <siguctua(a)gmail.com>
>> To: Pharo-project(a)lists.gforge.inria.fr
>> Sent: Sunday, 29 January 2012, 1:00
>> Subject: Re: [Pharo-project] Trying to build CogVM in MacOSX 10.7 Lion
>>
>>
>>
>> I don't know. But how do you know from his stackstrace that the problem is
>> that ?
>>
>>
>> i dont. :)
>> i replied after seeing an Esteban's message saying that your post is
>> outdated and one should use 3.9 config version.
>> and couple days before we had someone who asking why NB-enabled VM fails
>> to
>> build for him,
>> when he still using this magic
>> Â ((Smalltalk at: #ConfigurationOfVMMaker) project version: '1.5') load.
>>
>> while when i was released an CMakeVMMaker configs for NB , it was already
>> far beyond that version,
>> and of course won't work with 1.5.
>>
>> --
>> Best regards,
>> Igor Stasenko.
>>
>>
>
>
Jan. 29, 2012
Re: [Pharo-project] [squeak-dev] Smalltalk for small projects only?
by Schwab,Wilhelm K
Yes, but that also takes a mythical being: a manager with the cojones to say "blame me, that was my decision."
________________________________________
From: pharo-project-bounces(a)lists.gforge.inria.fr [pharo-project-bounces(a)lists.gforge.inria.fr] on behalf of Michael Haupt [mhaupt(a)gmail.com]
Sent: Sunday, January 29, 2012 1:07 AM
To: Pharo-project(a)lists.gforge.inria.fr
Subject: Re: [Pharo-project] [squeak-dev] Smalltalk for small projects only?
Hi Igor,
Am 29.01.2012 um 00:11 schrieb Igor Stasenko <siguctua(a)gmail.com>:
> now try to merge it with your "magical" SCM which can resolve such
> kind of conflicts.
no tool can ever replace communication. Regardless of programming language used.
Best,
Michael
Jan. 29, 2012