Regression

osx-32 / Tests-osx-32 / MacOSX32.Spec2.Tests.Core.Widgets.SpCodePresenterTest.testInsertAt (from Spec2-Tests)

Failing for the past 1 build (Since Failed#740 )
Took 4.1 sec.

Error Message

MorphicAlarm(#hideShow -> a RubCursor(992360704)) not found in Heap

Stacktrace

Heap(Collection)>>errorNotFound:
[ self errorNotFound: oldObject ] in Heap(Collection)>>remove:
Heap>>remove:ifAbsent:
Heap(Collection)>>remove:
[ :alarm | self alarms remove: alarm ] in WorldState>>removeAlarm:for:
BlockClosure>>cull:
[ :each | 
(aBlock value: each)
	ifTrue: [ ^ foundBlock cull: each ] ] in Heap(Collection)>>detect:ifFound:ifNone:
Heap>>do:
Heap(Collection)>>detect:ifFound:ifNone:
Heap(Collection)>>detect:ifFound:
WorldState>>removeAlarm:for:
WorldMorph>>removeAlarm:for:
RubCursor>>removeAlarm
RubCursor>>ensureFor:
RubCursor>>startBlinking
RubCursor>>updateVisibility
RubCursor>>whenTextAreaSelectionChanged:
MessageSend>>value:
MessageSend>>cull:
MessageSend>>cull:cull:
[ action cull: anAnnouncement cull: announcer ] in AnnouncementSubscription>>deliver:
BlockClosure>>on:do:
BlockClosure>>on:fork:
AnnouncementSubscription>>deliver:
[ "Ensure delivery to remaining announcements" subscription deliver: anAnnouncement ] in SubscriptionRegistry>>deliver:to:startingAt:
BlockClosure>>ifCurtailed:
SubscriptionRegistry>>deliver:to:startingAt:
SubscriptionRegistry>>deliver:to:
SubscriptionRegistry>>deliver:
Announcer>>announce:
RubEditingArea(RubAbstractTextArea)>>announce:
RubEditingArea(RubAbstractTextArea)>>handleSelectionChange:
RubEditingArea(RubAbstractTextArea)>>markIndex:pointIndex:
RubSmalltalkEditor(RubTextEditor)>>markIndex:pointIndex:
RubSmalltalkEditor(RubTextEditor)>>selectInvisiblyFrom:to:
RubSmalltalkEditor(RubTextEditor)>>selectFrom:to:
RubSmalltalkEditor(RubTextEditor)>>selectAll
RubEditingArea(RubAbstractTextArea)>>selectAll
[ | s |
s := self validateTextFrom: aStringOrText.
s = self text
	ifFalse: [ self selectAll.
		self editor replaceSelectionWith: s.
		self deselect ] ] in [ self
	beEditableWhile: [ | s |
		s := self validateTextFrom: aStringOrText.
		s = self text
			ifFalse: [ self selectAll.
				self editor replaceSelectionWith: s.
				self deselect ] ] ] in RubEditingArea(RubAbstractTextArea)>>updateTextWith:
BlockClosure>>ensure:
RubEditingArea(RubAbstractTextArea)>>beEditableWhile:
[ self
	beEditableWhile: [ | s |
		s := self validateTextFrom: aStringOrText.
		s = self text
			ifFalse: [ self selectAll.
				self editor replaceSelectionWith: s.
				self deselect ] ] ] in RubEditingArea(RubAbstractTextArea)>>updateTextWith:
RubEditingArea(RubAbstractTextArea)>>handleEdit:
RubEditingArea(RubAbstractTextArea)>>updateTextWith:
RubTextScrollPane>>updateTextWith:
RubScrolledTextMorph>>updateTextWith:
RubScrolledTextMorph>>setText:
[ :text | newWidget setText: text ] in SpMorphicCodeAdapter(SpMorphicTextAdapter)>>buildWidget
BlockClosure>>cull:
BlockClosure>>cull:cull:
[ :block | block cull: self value cull: oldValue ] in SpValueHolder>>valueChanged:
OrderedCollection>>do:
SpValueHolder>>valueChanged:
[ | oldValue |
oldValue := value.
value := anObject.
self valueChanged: oldValue ] in SpValueHolder>>value:
BlockClosure>>ensure:
SpValueHolder>>value:
SpObservableSlot>>write:to:
SpCodePresenter(Object)>>writeSlot:value:
SpCodePresenter(SpAbstractTextPresenter)>>text:
SpMorphicCodeAdapter(SpMorphicTextAdapter)>>insert:at:
[ :anAdapter | anAdapter insert: aString at: positionIndex ] in SpCodePresenter(SpAbstractTextPresenter)>>insert:at:
BlockClosure>>cull:
SpMorphicCodeAdapter(ProtoObject)>>ifNotNil:
SpCodePresenter(SpAbstractPresenter)>>withAdapterDo:
SpCodePresenter(SpAbstractTextPresenter)>>insert:at:
SpCodePresenterTest(SpTextPresenterTest)>>testInsertAt
SpCodePresenterTest(TestCase)>>performTest