Browsing code files with prettyPrint

What I did:

Navigate with a file to a .st file, click on the button "browse", select a
method. With "browseWithPrettyPrint" enabled.

This applies both to recent Pharo and a Squeak3.10-closures image.

Best regards,
     Markus


Stacktrace:

'20 April 2009 1:00:43 am

VM: Win32 - a SmalltalkImage
Image: Pharo0.1 [Latest update: #10279]

SecurityManager state:
Restricted: false
FileAccess: true
SocketAccess: true
Working Dir C:\Dokumente und Einstellungen\mfritsche\Desktop\Seaside
Trusted Dir C:\Dokumente und
Einstellungen\mfritsche\Desktop\Seaside\mfritsche
Untrusted Dir C:\Dokumente und Einstellungen\mfritsche\Eigene Dateien\My
Squeak

PseudoClass(Object)>>doesNotUnderstand: #variablesAndOffsetsDo:
        Receiver: a PseudoClass(#TraitMethodDescription)
        Arguments and temporary variables:
                aMessage: variablesAndOffsetsDo: [closure] in
EncoderForV3PlusClosures(Encoder)...etc...
                exception: MessageNotUnderstood:
PseudoClass>>variablesAndOffsetsDo:
                resumeValue: nil
        Receiver''s instance variables:
                name: #TraitMethodDescription
                definition: nil
                organization: (''accessing'' providedLocatedMethod)

                source: a Dictionary(#providedLocatedMethod->a
ChangeRecord )
                metaClass: a PseudoMetaclass(#TraitMethodDescription)

EncoderForV3PlusClosures(Encoder)>>init:context:notifying:
        Receiver: {an EncoderForV3PlusClosures}
        Arguments and temporary variables:
                aClass: a PseudoClass(#TraitMethodDescription)
                aContext: nil
                req: a Parser
                homeNode: nil
        Receiver''s instance variables:
                comment: nil
                pc: nil
                scopeTable: a Dictionary(''false''->{false}
                ''nil''->{nil} ''self''->{self} ''super''->...etc...
                nTemps: 0
                supered: false
                requestor: a Parser
                class: a PseudoClass(#TraitMethodDescription)
                selector: nil
                literalStream: a WriteStream #()
                selectorSet: a Dictionary(#*->{*} #+->{+} #-->{-} #/->{/}
                #''//''->{//} #<->{<} #...etc...
                litIndSet: a Dictionary()
                litSet: a LiteralDictionary(-1->{-1} 0->{0} 1->{1}
2->{2} )
                sourceRanges: nil
                globalSourceRanges: nil
                stream: nil
                position: nil
                rootNode: nil
                blockExtentsToLocals: nil

[] in Parser>>parse:class:category:noPattern:context:notifying:ifFail:
        Receiver: a Parser
        Arguments and temporary variables:
<<error during printing>
        Receiver''s instance variables:
                source: a ReadStream ''providedLocatedMethod
        | locatedMethod aLocatedMet...etc...
                mark: 31
                hereChar: Character space
                aheadChar: $l
                token: #|
                tokenType: #verticalBar
                currentComment: nil
                buffer: a WriteStream ''providedLocatedMethod''
                typeTable: #(#xBinary #xBinary #xBinary #xBinary
                #xBinary #xBinary #xBinary #xB...etc...
                here: ''providedLocatedMethod''
                hereType: #word
                hereMark: 1
                hereEnd: 21
                prevMark: 1
                prevEnd: nil
                encoder: {an EncoderForV3PlusClosures}
                requestor: nil
                parseNode: nil
                failBlock: [closure] in
                Compiler>>format:noPattern:ifFail:
                requestorOffset: 0
                tempsMark: nil
                doitFlag: false
                properties: nil
                category: nil

BlockClosure>>on:do:
        Receiver: [closure] in
Parser>>parse:class:category:noPattern:context:notifying:ifFail:
        Arguments and temporary variables:
                exception: ReparseAfterSourceEditing
                handlerAction: [closure] in
                Parser>>parse:class:category:noPattern:context:noti...etc...
                handlerActive: true
        Receiver''s instance variables:
                outerContext:
Parser>>parse:class:category:noPattern:context:notifying:ifFail:
                startpc: 131
                numArgs: 0


--- The full stack ---
PseudoClass(Object)>>doesNotUnderstand: #variablesAndOffsetsDo:
EncoderForV3PlusClosures(Encoder)>>init:context:notifying:
[] in Parser>>parse:class:category:noPattern:context:notifying:ifFail:
BlockClosure>>on:do:
 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
Parser>>parse:class:category:noPattern:context:notifying:ifFail:
Parser>>parse:class:noPattern:context:notifying:ifFail:
Compiler>>format:noPattern:ifFail:
Compiler>>format:in:notifying:decorated:
Compiler class>>format:in:notifying:decorated:
FileContentsBrowser>>selectedMessage
FileContentsBrowser(Browser)>>contents
FileContentsBrowser>>contents
PluggableShoutMorph(PluggableTextMorph)>>getText
PluggableShoutMorph(PluggableTextMorph)>>update:
[] in FileContentsBrowser(Object)>>changed:
DependentsArray>>do:
FileContentsBrowser(Object)>>changed:
FileContentsBrowser(Object)>>contentsChanged
FileContentsBrowser(CodeHolder)>>contentsChanged
FileContentsBrowser(Browser)>>messageListIndex:
PluggableListMorph>>changeModelSelection:
PluggableListMorph>>mouseUp:
PluggableListMorph(Morph)>>handleMouseUp:
MouseButtonEvent>>sentTo:
PluggableListMorph(Morph)>>handleEvent:
MorphicEventDispatcher>>dispatchDefault:with:
...etc...'



_______________________________________________
Pharo-project mailing list
[hidden email]
http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project