[BUG]TextEditor(Object)>>doesNotUnderstand: #select

I am trying to create a method for a new class, using the Package
Browser.  I have the 3.10.2 image with the new editors, and have enabled
them.  I entered
initialize
        super initialize.
        allocations := SortedCollection sortBlock: [:a :b | a when start <= b
when start].
and selected accept with the menu.  This led to the error below.
Apparently the new editors don't understand #select.

The editors are also not responding to some command keys I type; mainly
this has been alt-s (tried ctl and shft too).  alt-f in the upper left
pane of the the system browser does bring up the find class dialog.

I'm running using a VM from Pharo (for closures) on Linux.

7 December 2009 1:01:56.255 am

VM: unix - a SmalltalkImage
Image: Squeak3.10.2 [latest update: #7179]

SecurityManager state:
Restricted: false
FileAccess: true
SocketAccess: true
Working Dir /usr/local/src/squeak
Trusted Dir /usr/local/src/squeak/secure
Untrusted Dir /usr/local/src/squeak/My Squeak

TextEditor(Object)>>doesNotUnderstand: #select
        Receiver: a TextEditor
        Arguments and temporary variables:
                aMessage: select
                exception: MessageNotUnderstood: TextEditor>>select
                resumeValue: nil
        Receiver's instance variables:
                sensor: a KeyboardBuffer
                morph: a TextMorphForEditView(3073)
                selectionShowing: false
                model: a PackagePaneBrowser
                paragraph: a MultiNewParagraph
                pointBlock: a CharacterBlock with index 90 and character Character
space and re...etc...
                markBlock: a CharacterBlock with index 86 and character $w and
rectangle 331@32...etc...
                beginTypeInBlock: nil
                emphasisHere: {a TextColor code: Color veryDarkGray . a TextEmphasis
code: 4}
                otherInterval: (86 to: 89)
                lastParenLocation: nil
                oldInterval: (86 to: 89)

PluggableTextMorphPlus(PluggableTextMorph)>>select
        Receiver: a PluggableTextMorphPlus(3208)
        Arguments and temporary variables:

        Receiver's instance variables:
                bounds: 176@251 corner: 766@433
                owner: a PluggablePanelMorph(2223)
                submorphs: {a ScrollBar(952) . a TransformMorph(3123)}
                fullBounds: 176@251 corner: 766@433
                color: Color white
                extension: a MorphExtension (863) [other:  (borderStyle -> a
SimpleBorder) (vSc...etc...
                borderWidth: 1
                borderColor: Color lightGray
                model: a PackagePaneBrowser
                slotName: nil
                open: false
                pinSpecs: nil
                scrollBar: a ScrollBar(952)
                scroller: a TransformMorph(3123)
                retractableScrollBar: false
                scrollBarOnLeft: false
                getMenuSelector: #codePaneMenu:shifted:
                getMenuTitleSelector: nil
                scrollBarHidden: nil
                hasFocus: false
                hScrollBar: a ScrollBar(1485)
                textMorph: a TextMorphForEditView(3073)
                getTextSelector: #contents
                setTextSelector: #contents:notifying:
                getSelectionSelector: #contentsSelection
                hasUnacceptedEdits: true
                askBeforeDiscardingEdits: true
                selectionInterval: (86 to: 89)
                hasEditingConflicts: false
                getColorSelector: nil
                acceptAction: nil
                unstyledAcceptText: a Text for 'initialize
        super initialize.
        allocations := S...etc...
                styler: a SHTextStylerST80

Parser>>correctSelector:wordIntervals:exprInterval:ifAbort:
        Receiver: a Parser
        Arguments and temporary variables:
                proposedKeyword: 'when'
                spots: an OrderedCollection((86 to: 89))
                expInt: (86 to: 89)
                abortAction: [closure] in Parser>>messagePart:repeat:
                correctSelector: nil
                userSelection: (114 to: 113)
        Receiver's instance variables:
                source: a ReadStream 'initialize
        super initialize.
        allocations := SortedColle...etc...
                mark: 97
                hereChar: Character space
                aheadChar: $b
                token: #'<='
                tokenType: #binary
                currentComment: nil
                buffer: a WriteStream 'start'
                typeTable: #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary
#xBinary #xB...etc...
                here: 'start'
                hereType: #word
                hereMark: 91
                hereEnd: 95
                prevMark: 86
                prevEnd: 89
                encoder: {an EncoderForV3PlusClosures}
                requestor: a PluggableTextMorphPlus(3208)
                parseNode: {a}
                failBlock: [closure] in Compiler>>translate:noPattern:ifFail:
                requestorOffset: 0
                tempsMark: 13
                doitFlag: false
                properties: an AdditionalMethodState
                category: #'initialize-release'

Parser>>messagePart:repeat:
        Receiver: a Parser
        Arguments and temporary variables:
                level: 3
                repeat: true
                start: 86
                receiver: {a}
                args: #()
                precedence: nil
                words: an OrderedCollection((86 to: 89))
                keywordStart: nil
                selector: #('when')
        Receiver's instance variables:
                source: a ReadStream 'initialize
        super initialize.
        allocations := SortedColle...etc...
                mark: 97
                hereChar: Character space
                aheadChar: $b
                token: #'<='
                tokenType: #binary
                currentComment: nil
                buffer: a WriteStream 'start'
                typeTable: #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary
#xBinary #xB...etc...
                here: 'start'
                hereType: #word
                hereMark: 91
                hereEnd: 95
                prevMark: 86
                prevEnd: 89
                encoder: {an EncoderForV3PlusClosures}
                requestor: a PluggableTextMorphPlus(3208)
                parseNode: {a}
                failBlock: [closure] in Compiler>>translate:noPattern:ifFail:
                requestorOffset: 0
                tempsMark: 13
                doitFlag: false
                properties: an AdditionalMethodState
                category: #'initialize-release'


--- The full stack ---
TextEditor(Object)>>doesNotUnderstand: #select
...etc...

[hidden email] wrote:
> I am trying to create a method for a new class, using the Package
> Browser.  I have the 3.10.2 image with the new editors, and have enabled
> them.  I entered
> initialize
> super initialize.
> allocations := SortedCollection sortBlock: [:a :b | a when start <= b
> when start].
> and selected accept with the menu.  This led to the error below.
> Apparently the new editors don't understand #select.

Sounds like a bug, thanks for reporting it.

> The editors are also not responding to some command keys I type; mainly
> this has been alt-s (tried ctl and shft too).  alt-f in the upper left
> pane of the the system browser does bring up the find class dialog.
>
> I'm running using a VM from Pharo (for closures) on Linux.

I believe that the 3.11 VMs from http://squeakvm.org/unix/ are closure
compatible. You might try those out.

Cheers,
   - andreas