Re: [Pharo-dev] DNU with GT Debugger

Aug. 9, 2016

      Hi doru

I sent you a drop box where you just have to click to repeat the problem.

Let me know if this is enough. Else I should send you more scripts and 
files.

Stef

Le 9/8/16 Ã  12:07, Tudor Girba a Ã©crit :
...
Hi,
Thanks for the report. Do you happen to have an image around?
Doru
...
On Aug 9, 2016, at 11:47 AM, stepharo <stepharo@free.fr> wrote:
While trying to debug pillar I got a DNU when clicking on the raw pane (when the items was selected)
DNU:
presentation rawSelection is aLinkedList and it does not understand key
'From Pharo 6.0 of 13 May 2016 [Latest update: #60173] on 9 August 2016 at 11:45:10.355092 am'!
!GTRawObjectVariablesBrowser methodsFor: 'private building' stamp: 'AndreiChis 4/26/2016 10:37'!
variablesIn: composite
    ^ composite table
        showOnly: 50;
        shouldValidate: false;
        allowsRecursiveSearch: false;
        children: [ :assoc |
            assoc key = 'self'
                ifTrue: [ #() ]
                ifFalse: [ self variableValuePairsFor: assoc value ] ];
        icon: [ :assoc | self iconFor: assoc value ];
        display: [ :anObject |
            self rebuildCacheFor: anObject.
            self variableValuePairsFor: anObject ];
        column: 'Variable'
            evaluated: [:assoc | '  ', (GTObjectPrinter new asNonTruncatedTextFrom: assoc key) ];
        column: 'Value'
            evaluated: [:assoc | GTObjectPrinter new asTruncatedTextFrom: assoc value ]
            modified: [:newValue :assoc :presentation |
                self updateInstanceVariable: assoc key from: presentation entity basedOn: newValue.
                presentation update ];
        morphicSelectionAct: [:list | list selection value browse ]
            icon: GLMUIThemeExtraIcons glamorousBrowse
            on: $b
            entitled: 'Browse';
        morphicSelectionAct: [:list | list selection value inspect ]
            icon: GLMUIThemeExtraIcons glamorousInspect
            on: $i
            entitled: 'Inspect';
        selectionAct: [:list |
            ((list selection pointersToExcept: { list selection })
                                    reject: [ :each | each pointsOnlyWeaklyTo: list selection ]) inspect ]
            on: $t
            entitled: 'Open pointers to';
        dynamicActionsOnSelection: [ :presentation |
            (presentation entity class hasInstVarNamed: presentation rawSelection key)
^^^^^^^^ here
ifTrue: [
                    {
                        GLMGenericAction new
                                action: [:list | self systemNavigation browseAllAccessesTo: list rawSelection key from: list entity class ];
                                title: 'List methods using this variable'.
                        GLMGenericAction new
                                action: [:list | self systemNavigation browseAllStoresInto: list rawSelection key from: list entity class ];
                                title: 'List methods storing into this variable'.
                    }
                    ]
                ifFalse: [ #() ] ]! !
<GTRawObjectVariablesBrowser-variablesIn.st>
--
www.tudorgirba.com
www.feenk.com
"Reasonable is what we are accustomed with."