Traits and Omnibrowser, errors testing clean copy

Thomas Koenig tomkoenig at mindspring.com
Sat Apr 9 18:53:14 UTC 2005


When running all SUNIT tests after installing Traits in 5989, I get
multiple errors in Omnibrowser that deal with Dictionary not
understanding #associations.  I see that OBDictionaryNode does
understand #associations.  Does any have suggestions on best way to fix
these errors?  For example, should I extend dictionary to implement
associations or wrap the dictionary objects with OBDictionaryNode? 
Tom 
PS: Below are the details: downloaded 3.7 and extracted as
Squeak3.7-5989-full.image. Opened SM, SU TestRunner;  installed
Monticello 183 Traits beta2.1 and ran all sunit test. (The results are
1497 run 1425 succcesses 45 failures 27errors. Many of which exist w/o
Traits of course. A lot of the OB related failures are easily fixed by
correcting fakeTemplate etc.)  The following is representative errors I
see involving #associations MNU.
OBAccessBrowserTest>>testSelectCVars produces a debugger context of an
OrderedCollection(
Dictionary(Object)>>doesNotUnderstand: #associations [] in
OBPackageContext(OBImageContext)>>accessesToClassVar:ofClass: {[:ea | ea
classPool associations]} [] in OrderedCollection(Collection)>>gather:
{[:ea | stream   nextPutAll: (aBlock value: ea)]} OrderedCollection>>do:
[] in OrderedCollection(Collection)>>gather: {[:stream | self   do: [:ea
| stream     nextPutAll: (aBlock value: ea)]]} Array
class(SequenceableCollection class)>>streamContents:
OrderedCollection(Collection)>>gather:
OBPackageContext(OBImageContext)>>accessesToClassVar:ofClass:
OBPackageContext>>accessesToClassVar:ofClass:
OBClassVariableNode>>accessors OBMetaEdge>>nodesForParent:
OBModalFilter>>nodesForParent: OBColumn>>getChildren
OBColumn>>setBrowser:metaNode:node: OBColumn
class>>inBrowser:metaNode:node: OBMetaNode>>columnInBrowser:node:
OBColumn>>createNext OBColumn>>next OBColumn>>selected OBColumn>>clicked
OBColumn>>selectionChanged OBColumn>>selection:
PluggableListMorph>>changeModelSelection:
OBAccessBrowserTest(OBBrowserTest)>>select:
OBAccessBrowserTest>>testSelectCVar
OBAccessBrowserTest(TestCase)>>performTest [] in
OBAccessBrowserTest(TestCase)>>runCase {[self setUp.  self performTest]}
BlockContext>>ensure: BlockContext>>sunitEnsure:
OBAccessBrowserTest(TestCase)>>runCase [] in
OBAccessBrowserTest(TestCase)>>debug {[(self class selector:
testSelector) runCase]} BlockContext>>ensure: BlockContext>>sunitEnsure:
OBAccessBrowserTest(TestCase)>>debug TestRunner>>debugErrorTest:
PluggableListMorph>>changeModelSelection: PluggableListMorph>>mouseUp:
PluggableListMorph(Morph)>>handleMouseUp: MouseButtonEvent>>sentTo:
PluggableListMorph(Morph)>>handleEvent:
PluggableListMorph(Morph)>>handleFocusEvent: [] in
HandMorph>>sendFocusEvent:to:clear: {[ActiveHand := self.  ActiveEvent
:= anEvent.  result := focusHolder     han...]} [] in
PasteUpMorph>>becomeActiveDuring: {[aBlock value]} BlockContext>>on:do:
PasteUpMorph>>becomeActiveDuring: HandMorph>>sendFocusEvent:to:clear:
HandMorph>>sendEvent:focus:clear: HandMorph>>sendMouseEvent:
HandMorph>>handleEvent: HandMorph>>processEvents [] in
WorldState>>doOneCycleNowFor: {[:h |  ActiveHand := h.  h processEvents.
capturingGesture := capturingGest...]}
Array(SequenceableCollection)>>do: WorldState>>handsDo:
WorldState>>doOneCycleNowFor: WorldState>>doOneCycleFor:
PasteUpMorph>>doOneCycle [] in Project class>>spawnNewProcess {[[World
doOneCycle.  Processor yield.  false] whileFalse.  nil]} [] in
BlockContext>>newProcess {[self value.  Processor terminateActive]})




More information about the Squeak-dev mailing list