Failed

osx-32 / Tests-osx-32 / MacOSX32.Spec2.Tests.Examples.SpDemoTest.testSmokeTestForDemoPages (from Spec2-Tests)

Failing for the past 1 build (Since #422 )
Took 1.5 sec.

Error Message

Broken demo page: SpProgressBarDemoPage  UndefinedObject(Object)>>doesNotUnderstand: #hasPositiveExtent UndefinedObject>>doesNotUnderstand: #hasPositiveExtent PanelMorph(Morph)>>invalidRect:from: PanelMorph(Morph)>>invalidRect: PanelMorph(Morph)>>position: PanelMorph(Morph)>>bounds: PanelMorph(Morph)>>layoutInBounds: PanelMorph(Morph)>>layoutProportionallyIn: [ :m | m layoutProportionallyIn: newBounds ] in ProportionalLayout>>layout:in: Array(SequenceableCollection)>>do: 

Stacktrace

SpDemoTest(TestAsserter)>>assert:description:resumable:
SpDemoTest(TestAsserter)>>assert:description:
SpDemoTest(TestAsserter)>>fail:
[ :e | 
self
	fail:
		'Broken demo page: ' , demoPage asString
			,
				'

' , e signalerContext shortStack ] in [ [ window := demoPage new openWithSpec ]
	on: Error
	do: [ :e | 
		self
			fail:
				'Broken demo page: ' , demoPage asString
					,
						'

' , e signalerContext shortStack ] ] in [ :demoPage | 
[ [ window := demoPage new openWithSpec ]
	on: Error
	do: [ :e | 
		self
			fail:
				'Broken demo page: ' , demoPage asString
					,
						'

' , e signalerContext shortStack ] ]
	ensure: [ window ifNotNil: #close ] ] in SpDemoTest>>testSmokeTestForDemoPages
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
MessageNotUnderstood(Exception)>>pass
[ :ex | 
"This should do it unless you don't screw up the bounds"
fullBounds := bounds.
ex pass ] in PanelMorph(Morph)>>computeFullBounds
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
MessageNotUnderstood(Exception)>>pass
[ :ex | 
"This should do it unless you don't screw up the bounds"
fullBounds := bounds.
ex pass ] in SpNotebookMorph(Morph)>>computeFullBounds
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
MessageNotUnderstood(Exception)>>pass
[ :ex | 
"This should do it unless you don't screw up the bounds"
fullBounds := bounds.
ex pass ] in PanelMorph(Morph)>>computeFullBounds
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
MessageNotUnderstood(Exception)>>pass
[ :ex | 
"This should do it unless you don't screw up the bounds"
fullBounds := bounds.
ex pass ] in PanelMorph(Morph)>>computeFullBounds
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
MessageNotUnderstood(Exception)>>pass
[ :ex | 
"This should do it unless you don't screw up the bounds"
fullBounds := bounds.
ex pass ] in PanelMorph(Morph)>>computeFullBounds
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
MessageNotUnderstood(Exception)>>signal
UndefinedObject(Object)>>doesNotUnderstand: #hasPositiveExtent
UndefinedObject>>doesNotUnderstand: #hasPositiveExtent
PanelMorph(Morph)>>invalidRect:from:
PanelMorph(Morph)>>invalidRect:
PanelMorph(Morph)>>position:
PanelMorph(Morph)>>bounds:
PanelMorph(Morph)>>layoutInBounds:
PanelMorph(Morph)>>layoutProportionallyIn:
[ :m | m layoutProportionallyIn: newBounds ] in ProportionalLayout>>layout:in:
Array(SequenceableCollection)>>do:
PanelMorph(Morph)>>submorphsDo:
ProportionalLayout>>layout:in:
PanelMorph(Morph)>>doLayoutIn:
[ self doLayoutIn: self layoutBounds ] in PanelMorph(Morph)>>computeFullBounds
BlockClosure>>on:do:
PanelMorph(Morph)>>computeFullBounds
PanelMorph(Morph)>>fullBounds
[ :m | 
| subBox |
m visible
	ifTrue: [ subBox := m fullBounds.
		box
			ifNil: [ box := subBox copy ]
			ifNotNil: [ box := box quickMerge: subBox ] ] ] in PanelMorph(Morph)>>submorphBounds
Array(SequenceableCollection)>>do:
PanelMorph(Morph)>>submorphBounds
PanelMorph(Morph)>>privateFullBounds
PanelMorph(Morph)>>doLayoutIn:
[ self doLayoutIn: self layoutBounds ] in PanelMorph(Morph)>>computeFullBounds
BlockClosure>>on:do:
PanelMorph(Morph)>>computeFullBounds
PanelMorph(Morph)>>fullBounds
[ :m | 
| subBox |
m visible
	ifTrue: [ subBox := m fullBounds.
		box
			ifNil: [ box := subBox copy ]
			ifNotNil: [ box := box quickMerge: subBox ] ] ] in PanelMorph(Morph)>>submorphBounds
Array(SequenceableCollection)>>do:
PanelMorph(Morph)>>submorphBounds
PanelMorph(Morph)>>privateFullBounds
PanelMorph(Morph)>>doLayoutIn:
[ self doLayoutIn: self layoutBounds ] in PanelMorph(Morph)>>computeFullBounds
BlockClosure>>on:do:
PanelMorph(Morph)>>computeFullBounds
PanelMorph(Morph)>>fullBounds
PanelMorph(Morph)>>position:
PanelMorph(Morph)>>bounds:
PanelMorph(Morph)>>layoutInBounds:
TableLayout>>layoutTopToBottom:in:
TableLayout>>layout:in:
SpNotebookMorph(Morph)>>doLayoutIn:
[ self doLayoutIn: self layoutBounds ] in SpNotebookMorph(Morph)>>computeFullBounds
BlockClosure>>on:do:
SpNotebookMorph(Morph)>>computeFullBounds
SpNotebookMorph(Morph)>>fullBounds
[ :m | 
| subBox |
m visible
	ifTrue: [ subBox := m fullBounds.
		box
			ifNil: [ box := subBox copy ]
			ifNotNil: [ box := box quickMerge: subBox ] ] ] in PanelMorph(Morph)>>submorphBounds
Array(SequenceableCollection)>>do:
PanelMorph(Morph)>>submorphBounds
PanelMorph(Morph)>>privateFullBounds
PanelMorph(Morph)>>changed
PanelMorph(Morph)>>extent:
PanelMorph(Morph)>>bounds:
PanelMorph(Morph)>>layoutInBounds:
TableLayout>>layoutTopToBottom:in:
TableLayout>>layout:in:
PanelMorph(Morph)>>doLayoutIn:
[ self doLayoutIn: self layoutBounds ] in PanelMorph(Morph)>>computeFullBounds
BlockClosure>>on:do:
PanelMorph(Morph)>>computeFullBounds
PanelMorph(Morph)>>fullBounds
[ :m | 
| subBox |
m visible
	ifTrue: [ subBox := m fullBounds.
		box
			ifNil: [ box := subBox copy ]
			ifNotNil: [ box := box quickMerge: subBox ] ] ] in PanelMorph(Morph)>>submorphBounds
Array(SequenceableCollection)>>do:
PanelMorph(Morph)>>submorphBounds
PanelMorph(Morph)>>privateFullBounds
PanelMorph(Morph)>>changed
PanelMorph(BorderedMorph)>>borderStyle:
SpWindow(SystemWindow)>>addMorph:fullFrame:
SpMorphicWindowAdapter>>add:toWindow:
SpMorphicWindowAdapter>>addContent:toWindow:
SpMorphicWindowAdapter>>addPresenterIn:withSpecLayout:
SpMorphicWindowAdapter(SpAbstractAdapter)>>update:with:
[ :aDependent | aDependent update: anAspect with: anObject ] in SpWindowPresenter(Model)>>changed:with:
DependentsArray>>do:
SpWindowPresenter(Model)>>changed:with:
SpWindowPresenter>>addPresenterIn:withSpecLayout:
SpWindowPresenter>>buildWindowWithLayout:presenterLayout:
SpWindowPresenter>>basicBuildWithSpecLayout:
[ self basicBuildWithSpecLayout: aSpecLayout ] in SpWindowPresenter>>buildWithSpecLayout:
[ activeProcess psValueAt: index put: anObject.
aBlock value ] in SpBindings(DynamicVariable)>>value:during:
BlockClosure>>ensure:
SpBindings(DynamicVariable)>>value:during:
SpBindings class(DynamicVariable class)>>value:during:
SpWindowPresenter>>buildWithSpecLayout:
SpWindowPresenter>>openWithSpecLayout:
SpNullApplication(SpApplication)>>open:withSpecLayout:using:
SpNullApplication(SpApplication)>>open:withSpecLayout:
SpProgressBarDemoPage(SpAbstractPresenter)>>openWithSpec
[ window := demoPage new openWithSpec ] in [ [ window := demoPage new openWithSpec ]
	on: Error
	do: [ :e | 
		self
			fail:
				'Broken demo page: ' , demoPage asString
					,
						'

' , e signalerContext shortStack ] ] in [ :demoPage | 
[ [ window := demoPage new openWithSpec ]
	on: Error
	do: [ :e | 
		self
			fail:
				'Broken demo page: ' , demoPage asString
					,
						'

' , e signalerContext shortStack ] ]
	ensure: [ window ifNotNil: #close ] ] in SpDemoTest>>testSmokeTestForDemoPages
BlockClosure>>on:do:
[ [ window := demoPage new openWithSpec ]
	on: Error
	do: [ :e | 
		self
			fail:
				'Broken demo page: ' , demoPage asString
					,
						'

' , e signalerContext shortStack ] ] in [ :demoPage | 
[ [ window := demoPage new openWithSpec ]
	on: Error
	do: [ :e | 
		self
			fail:
				'Broken demo page: ' , demoPage asString
					,
						'

' , e signalerContext shortStack ] ]
	ensure: [ window ifNotNil: #close ] ] in SpDemoTest>>testSmokeTestForDemoPages
BlockClosure>>ensure:
[ :demoPage | 
[ [ window := demoPage new openWithSpec ]
	on: Error
	do: [ :e | 
		self
			fail:
				'Broken demo page: ' , demoPage asString
					,
						'

' , e signalerContext shortStack ] ]
	ensure: [ window ifNotNil: #close ] ] in SpDemoTest>>testSmokeTestForDemoPages
OrderedCollection>>do:
SpDemoTest>>testSmokeTestForDemoPages
SpDemoTest(TestCase)>>performTest