Pharo7 DebugSession fails because of Roassal2Spec?

Hi All,

Attempting to load DataFrame with:

Metacello new
  baseline: 'DataFrame';
  repository: 'github://PolyMathOrg/DataFrame';
  load.


results in what looks like a stack trace being displayed on the window
background.  See the attached image.  The system is unresponsive until
interrupted (Ctrl-. on linux).

The stack in the image appears to match the stack included below from
MorphicUIManager>>onPrimitiveError: onwards.

I'm not at all familiar with this code, but it looks a bit like the load
has failed, and then the attempt to trap it and open a debugger has
failed.

One of the failures, at least, appears to be because the Roassal2Spec
package overrides the inherited definition of #announcer in
NewValueHolder to remove the lazy initialisation.  However the
NewValueHolder>>announcer extension has been there for a couple of
years, so I presume it is some other change that has triggered the
problem.

Can someone, Alexandre? :-), comment on whether
NewValueHolder>>announcer should be removed?


Thanks,
Alistair



[ delaySemaphore wait ] in Delay>>wait in Block: [ delaySemaphore wait ]
BlockClosure>>ifCurtailed:
Delay>>wait
[ | evt type |
(Delay forMilliseconds: 20) wait.
Sensor nextEvent
        ifNotNil: [ :evtBuf |
                type := evtBuf first.
                type = EventTypeKeyboard
                        ifTrue: [ evt := World currentHand generateKeyboardEvent: evtBuf.
                                evt isKeystroke
                                        ifTrue: [ | c |
                                                c := evt keyCharacter.
                                                (c asciiValue < 128
                                                        or:
                                                                [ c isSeparator or: [ c isSpecial or: [ c = Character backspace ] ] ])
                                                        ifTrue: [ Sensor flushKeyboard.
                                                                ^ evt keyCharacter ] ] ] ] ] in Transcripter class>>nextChar in Block: [ | evt type |...
BlockClosure>>repeat
Transcripter class>>nextChar
Transcripter class>>askForEmergencyEvaluatorOrExitWithText:
MorphicUIManager>>onPrimitiveError:
DebugSession(Object)>>primitiveError:
DebugSession>>signalDebuggerError:
[ :ex | debugSession signalDebuggerError: ex ] in [ "schedule debugger in deferred UI message to address
                        redraw problems after opening a debugger e.g. from
                        the testrunner."
[ Smalltalk tools debugger
        openOn: debugSession
        withFullView: bool
        andNotification: notificationString ]
        on: Error
        do: [ :ex | debugSession signalDebuggerError: ex ] ] in MorphicUIManager>>debugProcess:context:label:fullView:notification: in Block: [ :ex | debugSession signalDebuggerError: ex ]
BlockClosure>>cull:
Context>>evaluateSignal:
Context>>handleSignal:
MessageNotUnderstood(Exception)>>signal
UndefinedObject(Object)>>doesNotUnderstand: #announce:
DictionaryValueHolder(NewValueHolder)>>valueChanged:
[ | oldValue |
oldValue := value.
value := anObject.
self valueChanged: oldValue ] in DictionaryValueHolder(NewValueHolder)>>value: in Block: [ | oldValue |...
BlockClosure>>ensure:
DictionaryValueHolder(NewValueHolder)>>handleCircularReferencesWhile:
DictionaryValueHolder(NewValueHolder)>>value:
DictionaryValueHolder>>initialize
DictionaryValueHolder class(Behavior)>>new
DictionaryValueHolder class(NewValueHolder class)>>value:
OrderedIdentityDictionary(OrderedDictionary)>>asValueHolder
GTSpecPreDebugWindow(DynamicComposablePresenter)>>initialize
GTSpecPreDebugWindow(SpecPreDebugWindow)>>initialize
GTSpecPreDebugWindow class(Behavior)>>new
GTGenericStackDebugger>>openWithNotification:
GTGenericStackDebugger class(GTMoldableDebugger class)>>openOn:withFullView:andNotification:

--