Moose-dev February 2013

moose-dev@list.inf.unibe.ch

21 participants
145 discussions

Moving XMLSupport to Smalltalk
by Usman Bhatti 15 Feb '13

15 Feb '13

Hello, We are moving Moose to SmalltalkHub and once the projects in Moose moved and tested, we will port Moose to Pharo 2.0. Stef has volunteered to move XMLSupport to SThub and update configs for both Pharo 1.4 and Pharo 2.0. What do you think because it is important to have XMLSupport on a reliable repo. Usman

1 0

stuck in Glamour-Merlin flow and update doesn't help
by Usman Bhatti 14 Feb '13

14 Feb '13

Scenario : I have an EyeSee chart that is updated from user input. Problem: The EyeSee chart does not update. There are two methods (AFAIK) to update glamour browser pane and its contents: explicitly send update message to the pane or new transmission to the port of the pane to be updated. Now, the first method does not work for EyeSee (may be a bug, i suggested a fix yesterday). The second method requires that transmissions are triggered but since Merlin is outside Glamour, I have to fake a transmission on a dummy port (I tried that but when I execute my browser, the dummy port is nil). I spent several hours looking into ports and their transmissions but couldn't obtain a workable solution for my problem. Here is a mock executable code to see what I am trying to achieve. | browser aModel myColor| browser := GLMDashboard new. browser title: 'Customizable EyeSee Chart Example'. browser addPaneNamed: #chart1 extent: 600@600. myColor := Color green. browser transmit to: #chart1; andShow: [ :a | a eyesee title: 'Sample bar chart'; diagram: [:renderer :x | (renderer kiviat) borderWidth: 1; radius: 150; models: {#(8 10 1). #(7 2 10). #(3 10 8)}; metrics: {#first. #second. #last. [ :each | each first + 2]}; maxs: {[ :model | 10]. [ :model | 10]. [ :model | 10]. [ :model | 10].}; mins: {[ :model | 1]. [ :model | 1]. [ :model | 1]. [ :model | 1]}; roundedBorder: true; backgroundColor: myColor; displayLegend: true; kiviatBackground: true; useColors: ESAbstractDiagram strongColorsTransparent]; act: [ | wizardControl wizardPane1 dropListPart| wizardControl := WizardControl new. wizardControl renderer: MerlinMorphicWizardRenderer new. wizardPane1 := WizardSinglePane new. dropListPart := DropListPart new list: #(red black green); yourself. wizardPane1 row: dropListPart associatedTo: #color. wizardControl addPane: wizardPane1. wizardControl atEndDo: [ :aDictionaryOfOutputs | myColor := aDictionaryOfOutputs at: #color. (browser paneNamed: #chart1) update ]. wizardControl open. ] entitled: 'Parameterize Color'. ]. browser openOn: #(1 2 3 4 5 6 7 8). "can't put color in the input model" Can you please have a look and see if I am missing something? regards, Usman

1 1

Mondrian dependencies
by Usman Bhatti 14 Feb '13

14 Feb '13

Dependencies of Mondrian: Shout: 'http://www.squeaksource.com/MetacelloRepository' ProfStef: 'http://www.squeaksource.com/MetacelloRepository HealthReportProducer: 'http://www.squeaksource.com/HealthReportProducer' Nile-Base: http://www.squeaksource.com/Nile Which ones are exclusively used by Moose? Do we move them? CollectionExtensions: 'http://www.squeaksource.com/CollectionExtensions' This package seem to have moved from Moose repo to its own repo. I'll create a new project in STHub for it.

3 3

flatCollect: in absence of Nile
by Stéphane Ducasse 13 Feb '13

13 Feb '13

http://code.google.com/p/pharo/issues/detail?id=7199

1 0

Build failed in Jenkins: moose-latest-dev #1280
by address not configured yet 13 Feb '13

13 Feb '13

See <http://localhost:8020/job/moose-latest-dev/1280/> ------------------------------------------ [...truncated 717 lines...] BlockClosure>>on:do: [:bar | [workBlock value] on: HTTPProgress do: [:ex | (ex total ifNil: [true] ifNotNil: [ex amount == nil]) ifFalse: [(nextUpdateTime < Time millisecondClockValue or: [ex total = ex amount]) ifTrue: [bar value: ex amount asFloat / ex total asFloat. nextUpdateTime := Time millisecondClockValue + 100]]. ex resume]] in MCHttpRepository>>displayProgress:during: NonInteractiveUIManager(CommandLineUIManager)>>progressInitiationExceptionDefaultAction: ProgressInitiationException>>defaultAction UndefinedObject>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>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: NonInteractiveUIManager(CommandLineUIManager)>>displayProgress:from:to:during: MCHttpRepository>>displayProgress:during: MCHttpRepository>>readStreamForFileNamed:do: MCHttpRepository(MCFileBasedRepository)>>versionReaderForFileNamed:do: [self resizeCache: readerCache. super versionReaderForFileNamed: aString do: [:r | r ifNotNil: [readerCache at: aString put: r]]] in MCHttpRepository>>versionReaderForFileNamed: Dictionary>>at:ifAbsent: MCHttpRepository>>versionReaderForFileNamed: 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: NonInteractiveUIManager(CommandLineUIManager)>>progressInitiationExceptionDefaultAction: ProgressInitiationException>>defaultAction UndefinedObject>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>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>>atomicLoadPackageSpecs:repositories: BlockClosure>>ensure: MetacelloLoaderPolicy>>pushLoadDirective:during: MetacelloLoaderPolicy>>pushAtomicLoadDirectivesDuring:for: MetacelloFetchingMCSpecLoader>>atomicLoadPackageSpecs: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: NonInteractiveUIManager(CommandLineUIManager)>>progressInitiationExceptionDefaultAction: ProgressInitiationException>>defaultAction UndefinedObject>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: MethodContext(ContextPart)>>handleSignal: -- and more not shown --------------------------------------------------------------------------------- THERE_BE_DRAGONS_HERE Got startup errors: ------------------------------------------------------------------------------- THERE_BE_DRAGONS_HERE PrimitiveFailed: primitive #primSocketCreateNetwork:type:receiveBufferSize:sendBufSize:semaIndex:readSemaIndex:writeSemaIndex: in Socket failed ------------------------------------------------------------------------------- Build step 'Execute shell' marked build as failure Recording test results Archiving artifacts

1 1

Customizable Eyesee chart example
by Usman Bhatti 13 Feb '13

13 Feb '13

Hello, I think it would be good to include this example in GlamourExamples. There are some more in MooseBrowsers implemented by André. | browser aModel| browser := GLMDashboard new. browser title: 'Customizable EyeSee Chart Example'. browser addPaneNamed: #firstInput; addPaneNamed: #chart1 extent: 300@300. browser transmit to: #firstInput; andShow: [ :a | a dropDownList title: 'Colors'; display: [ :model | model first ]; selectedIndex: 1 ]. browser transmit to: #chart1; fromOutsidePort: #entity; from: #firstInput; andShow: [ :a | a eyesee title: 'Sample bar chart'; diagram: [:renderer :model :color | renderer verticalBarDiagram y: #yourself; defaultColor: color; models: model second; width: 200; height: 150; baseAxisLine. renderer interaction popupText: #yourself ]]. aModel := Array with: {Color black. Color red. Color green} with: #(1 2 3 4 5 6 7 8). browser openOn: aModel.

1 0

http://www.squeaksource.com/ShapeST80
by Usman Bhatti 13 Feb '13

13 Feb '13

I am moving EyeSee from squeaksource to SThub. EyeSee has a dependency on ShapeST80 (ss/ShapeST80). Should I move this project to Moose team or is this project used somewhere independent of EyeSee? usman

3 2

SS/Moose -> St/Moose + St/MooseArchive
by Usman Bhatti 12 Feb '13

12 Feb '13

As the subject suggests, moose repo on squeaksource has been completely moved to SThub. Now, we distinguish two types of package in squeaksource/Moose: - the packages from the repo loaded by the current moose configuration are moved to Moose project on SThub. - the packages not loaded by the current moose config are moved to MooseArchive project on SThub (to be sure that we do not lose code). ConfigurationOfMoose cannot be updated and tested unless all peripheral tools (Mondrian/XMLSupport/etc.) are moved to SThub. So, we are first moving and updating leaves before updating and testing the config of trunk. So, now remaining projects (in the coreDefault: baseline of Moose): Mondrian, MooseAlgos, Glamour, PetitParser, XMLSupport. I've already downloaded all packages of Mondrian, tomorrow I'll push them and update the config. The ones that require more effort in terms of organization: Glamour and PetitParser. So, may be during of the next week we can start loading the first basic config of moose (after some cleanup: exclude DSM, Smalldude, Nile, etc.) loadable from STHub and it would be good to make it rapid otherwise, if someone needs to push some changes in moose and (s)he starts doing it on SS, it'll be a mess. usman

1 0

EyeSee update - a fix
by Usman Bhatti 12 Feb '13

12 Feb '13

Currently, an EyeSee chart does not update itself when its pane is updated in Glamour. I think the problem comes from the fact that erroneously the presentation is assigned a new diagram block instead of a new renderer. This code fixes this problem. Can I integrate it in glamour? GLMMorphicEyeSeeRenderer >> actOnPresentationUpdate: ann "ann presentation diagram: ESDiagramRenderer new." ann presentation eyeseeRenderer: ESDiagramRenderer new. canvasScrollPane scroller removeMorph: canvasScrollPane scroller submorphs first. self eyeseeCanvasFor: ann presentation

1 0

EyeSee + STShape80 now on SThub
by Usman Bhatti 12 Feb '13

12 Feb '13

- moved the code of the both to SThub - updated the config - tested in 1.4 (all tests green) - tested in 2.0 1. Apparently, BlockContext is removed in 2.0 so eyeSeeValue: cannot be loaded from EyeSee in 2.0. 2. All tests green except ESExamplesTest>>testSmoke Should I open bug entries for these? Usman

1 0

Jump to page:

2025

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

Moose-dev February 2013