[vwnc] [7.6] ANSIUnCompatibility

... breaks RB when loaded. The intent is quite noble, but its usefulness
is limited at the moment. To reproduce, open clean visual.im, load the
parcel, open RB and click on Base VisualWorks bundle.

Unhandled exception: Subscript out of bounds:
OrderedCollection(Object)>>subscriptBoundsErrorFor:index:
OrderedCollection>>at:
optimized [] in StatusPanel>>layoutRows:in:
SortedCollection(OrderedCollection)>>do:
StatusPanel>>layoutRows:in:
optimized [] in StatusPanel>>initializeLayoutAlgorithm
StatusPanel(Panel)>>updatePartFrames:
StatusPanel>>updatePartFrames:
StatusPanel(Panel)>>bounds:
StatusPanel(Panel)>>changedPreferredBounds:forComponent:
Refactory.Browser.SelectionInfoStatus(VisualPart)>>changedPreferredBound
s:
Refactory.Browser.SelectionInfoStatus(Refactory.Browser.SimpleTextSelect
ionStatus)>>updateIsActive
Refactory.Browser.SelectionInfoStatus(Refactory.Browser.SimpleTextSelect
ionStatus)>>touch
optimized [] in [] in Refactory.Browser.CodeModel>>updateStatusPanel
optimized [] in Panel>>subpartsDo:
OrderedCollection>>do:
StatusPanel(Panel)>>subpartsDo:
optimized [] in Refactory.Browser.CodeModel>>updateStatusPanel
BlockClosure>>cull:
StatusPanel(Object)>>ifNotNil:
Refactory.Browser.CodeModel>>updateStatusPanel
Refactory.Browser.CodeModel>>update
Refactory.Browser.CodeModel>>update:with:from:
Refactory.Browser.BrowserNavigator(Object)>>changed:with:
Refactory.Browser.BrowserNavigator(Object)>>changed:
Refactory.Browser.BrowserNavigator(Object)>>changed
Refactory.Browser.BrowserNavigator>>changed
Refactory.Browser.BrowserNavigator(Refactory.Browser.Navigator)>>changed
Part:
Refactory.Browser.CodeComponentTabNavigatorPart(Refactory.Browser.Naviga
torPart)>>changed:with:
Refactory.Browser.CodeComponentTabNavigatorPart(Refactory.Browser.TabNav
igatorPart)>>update:with:from:
Refactory.Browser.CodeComponentTabNavigatorPart>>update:with:from:
Refactory.Browser.ClassNavigatorPart(Object)>>changed:with:
Refactory.Browser.ClassNavigatorPart(Refactory.Browser.NavigatorPart)>>c
hanged:with:
Refactory.Browser.ClassNavigatorPart>>changed:with:
Refactory.Browser.ClassNavigatorPart(Refactory.Browser.NavigatorPart)>>u
pdate:with:from:
Refactory.Browser.ClassNavigatorPart(Refactory.Browser.ListNavigatorPart
)>>update:with:from:
Refactory.Browser.PundleNavigatorPart(Object)>>changed:with:
Refactory.Browser.PundleNavigatorPart(Refactory.Browser.NavigatorPart)>>
changed:with:
optimized [] in Refactory.Browser.NavigatorPart>>changed
BlockClosure>>ensure:
Refactory.Browser.PundleNavigatorPart(Refactory.Browser.BrowserApplicati
onModel)>>showWaitCursorWhile:
Refactory.Browser.PundleNavigatorPart(Refactory.Browser.NavigatorPart)>>
changed
MessageChannel>>value
UIDispatcher>>dispatch:for:
UIDispatcher>>valueChangeFor:
MultiSequenceTreeController(Controller)>>valueChange
MultiSequenceTreeController(SequenceController)>>valueChange
MultiSequenceTreeController>>toggleTargetWithEvent:
MultiSequenceTreeController>>selectUpAt:withEvent:
EmulatedSequenceTracker>>finishSelectionForEvent:
EmulatedSequenceTracker>>redButtonReleasedEvent:
RedButtonReleasedEvent>>dispatchTo:
EmulatedSequenceTracker(SelectionTracker)>>handleEvent:
EventDispatcher>>dispatch:to:
EventDispatcher>>dispatchEvent:
RedButtonReleasedEvent(Event)>>dispatch
RedButtonReleasedEvent(Event)>>dispatchForWindowManager:
optimized [] in WindowManager>>safelyDispatchForWindowManager:
BlockClosure>>on:do:
WindowManager>>safelyDispatchForWindowManager:
WindowManager>>processNextEvent
optimized [] in [] in WindowManager>>newProcess
BlockClosure>>on:do:
optimized [] in WindowManager>>newProcess
BlockClosure>>on:do:
optimized [] in Process class>>forBlock:priority:

----------------------------------------------------------------------
OrderedCollection(Object)>>subscriptBoundsErrorFor:index:
Receiver:
        an OrderedCollection
Instance Variables:
        firstIndex = 1
        lastIndex = 1
Arguments:
        selector = #at:
        index = 0
Context PC = 9

----------------------------------------------------------------------
OrderedCollection>>at:
Receiver:
        an OrderedCollection
Instance Variables:
        firstIndex = 1
        lastIndex = 1
Arguments:
        anInteger = 0
Context PC = 30

----------------------------------------------------------------------
optimized [] in StatusPanel>>layoutRows:in:
Receiver:
        an UndefinedObject
Arguments:
        row = 0
Temporaries:
        rowRectangle = 0@0 corner: 800@0
        rowParts = nil
        .aRectangle = 0@0 corner: 800@0
        .rowHeights = an OrderedCollection[1]
        .rows = a Dictionary[1]
        .super = a StatusPanel
        .rectangles = a Dictionary[0]
Context PC = 12

----------------------------------------------------------------------
SortedCollection(OrderedCollection)>>do:
Receiver:
        a SortedCollection
Instance Variables:
        firstIndex = 1
        lastIndex = 1
        sortBlock = BlockClosure [] in SortedCollection
class>>initialize
Arguments:
        aBlock = BlockClosure [] in StatusPanel>>layoutRows:in:
Temporaries:
        index = 1
Context PC = 17

----------------------------------------------------------------------
StatusPanel>>layoutRows:in:
Receiver:
        a StatusPanel
Instance Variables:
        container = a Panel
        eventHandlers = nil
        properties = a Dictionary[2]
        components = an OrderedCollection[2]
        preferredBounds = 0@0 corner: 0@0
        layoutAlgorithm = BlockClosure [] in
StatusPanel>>initializeLayoutAlgorithm
        sumRowHeight = 28
        isEnabled = true
Arguments:
        aCollection = an OrderedCollection[2]
        aRectangle = 0@0 corner: 800@0
Temporaries:
        rectangles = a Dictionary[0]
        rows = a Dictionary[1]
        rowHeights = an OrderedCollection[1]
        rowRectangle = 0@0 corner: 800@0
        rowParts = nil
        activeParts = an OrderedCollection[1]
Context PC = 64

----------------------------------------------------------------------
optimized [] in StatusPanel>>initializeLayoutAlgorithm
Receiver:
        an UndefinedObject
Arguments:
        rectangle = 0@0 corner: 800@0
        subParts = an OrderedCollection[2]
Temporaries:
        .super = a StatusPanel
Context PC = 8

----------------------------------------------------------------------
StatusPanel(Panel)>>updatePartFrames:
Receiver:
        a StatusPanel
Instance Variables:
        container = a Panel
        eventHandlers = nil
        properties = a Dictionary[2]
        components = an OrderedCollection[2]
        preferredBounds = 0@0 corner: 0@0
        layoutAlgorithm = BlockClosure [] in
StatusPanel>>initializeLayoutAlgorithm
        sumRowHeight = 28
        isEnabled = true
Arguments:
        aRectangle = 0@0 corner: 800@0
Temporaries:
        unionFrame = nil
        oldBox = nil
        oldFrames = an OrderedCollection[2]
        newFrames = nil
Context PC = 23

----------------------------------------------------------------------
StatusPanel>>updatePartFrames:
Receiver:
        a StatusPanel
Instance Variables:
        container = a Panel
        eventHandlers = nil
        properties = a Dictionary[2]
        components = an OrderedCollection[2]
        preferredBounds = 0@0 corner: 0@0
        layoutAlgorithm = BlockClosure [] in
StatusPanel>>initializeLayoutAlgorithm
        sumRowHeight = 28
        isEnabled = true
Arguments:
        aRectangle = 0@0 corner: 800@0
Context PC = 6

----------------------------------------------------------------------
StatusPanel(Panel)>>bounds:
Receiver:
        a StatusPanel
Instance Variables:
        container = a Panel
        eventHandlers = nil
        properties = a Dictionary[2]
        components = an OrderedCollection[2]
        preferredBounds = 0@0 corner: 0@0
        layoutAlgorithm = BlockClosure [] in
StatusPanel>>initializeLayoutAlgorithm
        sumRowHeight = 28
        isEnabled = true
Arguments:
        aRectangle = 0@0 corner: 800@0
Context PC = 9

----------------------------------------------------------------------
StatusPanel(Panel)>>changedPreferredBounds:forComponent:
Receiver:
        a StatusPanel
Instance Variables:
        container = a Panel
        eventHandlers = nil
        properties = a Dictionary[2]
        components = an OrderedCollection[2]
        preferredBounds = 0@0 corner: 0@0
        layoutAlgorithm = BlockClosure [] in
StatusPanel>>initializeLayoutAlgorithm
        sumRowHeight = 28
        isEnabled = true
Arguments:
        ignored = nil
        aPart = a Refactory.Browser.SelectionInfoStatus
Context PC = 16

----------------------------------------------------------------------
Refactory.Browser.SelectionInfoStatus(VisualPart)>>changedPreferredBound
s:
Receiver:
        a Refactory.Browser.SelectionInfoStatus
Instance Variables:
        container = a StatusPanel
        eventHandlers = nil
        properties = a Dictionary[2]
        codeModel = Base VisualWorks
        inputField = an InputFieldView
Arguments:
        oldPreferredBoundsOrNil = nil
Context PC = 10

----------------------------------------------------------------------
Refactory.Browser.SelectionInfoStatus(Refactory.Browser.SimpleTextSelect
ionStatus)>>updateIsActive
Receiver:
        a Refactory.Browser.SelectionInfoStatus
Instance Variables:
        container = a StatusPanel
        eventHandlers = nil
        properties = a Dictionary[2]
        codeModel = Base VisualWorks
        inputField = an InputFieldView
Temporaries:
        isCurrentlyActive = true
Context PC = 23

----------------------------------------------------------------------
Refactory.Browser.SelectionInfoStatus(Refactory.Browser.SimpleTextSelect
ionStatus)>>touch
Receiver:
        a Refactory.Browser.SelectionInfoStatus
Instance Variables:
        container = a StatusPanel
        eventHandlers = nil
        properties = a Dictionary[2]
        codeModel = Base VisualWorks
        inputField = an InputFieldView
Context PC = 7

----------------------------------------------------------------------
optimized [] in [] in Refactory.Browser.CodeModel>>updateStatusPanel
Receiver:
        an UndefinedObject
Arguments:
        each = a Refactory.Browser.SelectionInfoStatus
Context PC = 3

----------------------------------------------------------------------
optimized [] in Panel>>subpartsDo:
Receiver:
        an UndefinedObject
Arguments:
        each = a Refactory.Browser.SelectionInfoStatus
Temporaries:
        .aBlock = BlockClosure [] in [] in
Refactory.Browser.CodeModel>>updateStatusPanel
Context PC = 6

----------------------------------------------------------------------
OrderedCollection>>do:
Receiver:
        an OrderedCollection
Instance Variables:
        firstIndex = 1
        lastIndex = 2
Arguments:
        aBlock = BlockClosure [] in Panel>>subpartsDo:
Temporaries:
        index = 1
Context PC = 17

----------------------------------------------------------------------
StatusPanel(Panel)>>subpartsDo:
Receiver:
        a StatusPanel
Instance Variables:
        container = a Panel
        eventHandlers = nil
        properties = a Dictionary[2]
        components = an OrderedCollection[2]
        preferredBounds = 0@0 corner: 0@0
        layoutAlgorithm = BlockClosure [] in
StatusPanel>>initializeLayoutAlgorithm
        sumRowHeight = 28
        isEnabled = true
Arguments:
        aBlock = BlockClosure [] in [] in
Refactory.Browser.CodeModel>>updateStatusPanel
Context PC = 8

----------------------------------------------------------------------
optimized [] in Refactory.Browser.CodeModel>>updateStatusPanel
Receiver:
        an UndefinedObject
Temporaries:
        .super = Base VisualWorks
Context PC = 7

----------------------------------------------------------------------
BlockClosure>>cull:
Receiver:
        a BlockClosure
Instance Variables:
        method = CompiledBlock [] in
Refactory.Browser.CodeModel>>updateStatusPanel
        outerContext = nil
        copiedValues = Base VisualWorks
Arguments:
        anObject = a StatusPanel
Context PC = 10

----------------------------------------------------------------------
StatusPanel(Object)>>ifNotNil:
Receiver:
        a StatusPanel
Instance Variables:
        container = a Panel
        eventHandlers = nil
        properties = a Dictionary[2]
        components = an OrderedCollection[2]
        preferredBounds = 0@0 corner: 0@0
        layoutAlgorithm = BlockClosure [] in
StatusPanel>>initializeLayoutAlgorithm
        sumRowHeight = 28
        isEnabled = true
Arguments:
        aBlock = BlockClosure [] in
Refactory.Browser.CodeModel>>updateStatusPanel
Context PC = 4

----------------------------------------------------------------------
Refactory.Browser.CodeModel>>updateStatusPanel
Receiver:
        a Refactory.Browser.CodeModel
Instance Variables:
        dependents = nil
        builder = an UIBuilder
        uiSession = nil
        eventHandlers = nil
        navigator = a Refactory.Browser.BrowserNavigator
        lockPolicy = a Refactory.Browser.StateLockPolicy
        state = Base VisualWorks
        isZoomed = false
        tabList = a SelectionInList
        statusPanel = a StatusPanel
        tools = an OrderedCollection[13]
Context PC = 7

----------------------------------------------------------------------
Refactory.Browser.CodeModel>>update
Receiver:
        a Refactory.Browser.CodeModel
Instance Variables:
        dependents = nil
        builder = an UIBuilder
        uiSession = nil
        eventHandlers = nil
        navigator = a Refactory.Browser.BrowserNavigator
        lockPolicy = a Refactory.Browser.StateLockPolicy
        state = Base VisualWorks
        isZoomed = false
        tabList = a SelectionInList
        statusPanel = a StatusPanel
        tools = an OrderedCollection[13]
Context PC = 17

----------------------------------------------------------------------
Refactory.Browser.CodeModel>>update:with:from:
Receiver:
        a Refactory.Browser.CodeModel
Instance Variables:
        dependents = nil
        builder = an UIBuilder
        uiSession = nil
        eventHandlers = nil
        navigator = a Refactory.Browser.BrowserNavigator
        lockPolicy = a Refactory.Browser.StateLockPolicy
        state = Base VisualWorks
        isZoomed = false
        tabList = a SelectionInList
        statusPanel = a StatusPanel
        tools = an OrderedCollection[13]
Arguments:
        anAspectSymbol = nil
        aParameter = nil
        aSender = a Refactory.Browser.BrowserNavigator
Context PC = 24

----------------------------------------------------------------------
Refactory.Browser.BrowserNavigator(Object)>>changed:with:
Receiver:
        a Refactory.Browser.BrowserNavigator
Instance Variables:
        dependents = Base VisualWorks
        builder = an UIBuilder
        uiSession = nil
        eventHandlers = nil
        environment =
        state = Base VisualWorks
        dispatcher = a Refactory.Browser.RBActionDispatcher
        parts = an OrderedCollection[2]
        partsDictionary = a Dictionary[2]
        menus = a Dictionary[4]
        showOnlyFiltered = true
        navigatorType = #Package
        cachedSelectors = nil->nil
        windowLabel = 'Base VisualWorks'
Arguments:
        anAspectSymbol = nil
        aParameter = nil
Context PC = 7

----------------------------------------------------------------------
Refactory.Browser.BrowserNavigator(Object)>>changed:
Receiver:
        a Refactory.Browser.BrowserNavigator
Instance Variables:
        dependents = Base VisualWorks
        builder = an UIBuilder
        uiSession = nil
        eventHandlers = nil
        environment =
        state = Base VisualWorks
        dispatcher = a Refactory.Browser.RBActionDispatcher
        parts = an OrderedCollection[2]
        partsDictionary = a Dictionary[2]
        menus = a Dictionary[4]
        showOnlyFiltered = true
        navigatorType = #Package
        cachedSelectors = nil->nil
        windowLabel = 'Base VisualWorks'
Arguments:
        anAspectSymbol = nil
Context PC = 6

----------------------------------------------------------------------
Refactory.Browser.BrowserNavigator(Object)>>changed
Receiver:
        a Refactory.Browser.BrowserNavigator
Instance Variables:
        dependents = Base VisualWorks
        builder = an UIBuilder
        uiSession = nil
        eventHandlers = nil
        environment =
        state = Base VisualWorks
        dispatcher = a Refactory.Browser.RBActionDispatcher
        parts = an OrderedCollection[2]
        partsDictionary = a Dictionary[2]
        menus = a Dictionary[4]
        showOnlyFiltered = true
        navigatorType = #Package
        cachedSelectors = nil->nil
        windowLabel = 'Base VisualWorks'
Context PC = 5

----------------------------------------------------------------------
Refactory.Browser.BrowserNavigator>>changed
Receiver:
        a Refactory.Browser.BrowserNavigator
Instance Variables:
        dependents = Base VisualWorks
        builder = an UIBuilder
        uiSession = nil
        eventHandlers = nil
        environment =
        state = Base VisualWorks
        dispatcher = a Refactory.Browser.RBActionDispatcher
        parts = an OrderedCollection[2]
        partsDictionary = a Dictionary[2]
        menus = a Dictionary[4]
        showOnlyFiltered = true
        navigatorType = #Package
        cachedSelectors = nil->nil
        windowLabel = 'Base VisualWorks'
Context PC = 8

----------------------------------------------------------------------
Refactory.Browser.BrowserNavigator(Refactory.Browser.Navigator)>>changed
Part:
Receiver:
        a Refactory.Browser.BrowserNavigator
Instance Variables:
        dependents = Base VisualWorks
        builder = an UIBuilder
        uiSession = nil
        eventHandlers = nil
        environment =
        state = Base VisualWorks
        dispatcher = a Refactory.Browser.RBActionDispatcher
        parts = an OrderedCollection[2]
        partsDictionary = a Dictionary[2]
        menus = a Dictionary[4]
        showOnlyFiltered = true
        navigatorType = #Package
        cachedSelectors = nil->nil
        windowLabel = 'Base VisualWorks'
Arguments:
        aPart = a Refactory.Browser.CodeComponentTabNavigatorPart
Temporaries:
        index = 1
        visibleParts = an OrderedCollection[2]
        i = 3
Context PC = 34

----------------------------------------------------------------------
Refactory.Browser.CodeComponentTabNavigatorPart(Refactory.Browser.Naviga
torPart)>>changed:with:
Receiver:
        a Refactory.Browser.CodeComponentTabNavigatorPart
Instance Variables:
        dependents = nil
        builder = an UIBuilder
        uiSession = nil
        eventHandlers = nil
        navigator = a Refactory.Browser.BrowserNavigator
        objectList = a SelectionInList
        subcanvasBuilder = an UIBuilder
        namedComponents = an OrderedCollection[2]
Arguments:
        anAspectSymbol = #navigatorState
        aParameter = Base VisualWorks
Context PC = 10

----------------------------------------------------------------------
Refactory.Browser.CodeComponentTabNavigatorPart(Refactory.Browser.TabNav
igatorPart)>>update:with:from:
Receiver:
        a Refactory.Browser.CodeComponentTabNavigatorPart
Instance Variables:
        dependents = nil
        builder = an UIBuilder
        uiSession = nil
        eventHandlers = nil
        navigator = a Refactory.Browser.BrowserNavigator
        objectList = a SelectionInList
        subcanvasBuilder = an UIBuilder
        namedComponents = an OrderedCollection[2]
Arguments:
        anAspectSymbol = #navigatorState
        aParameter = Base VisualWorks
        aSender = a Refactory.Browser.ClassNavigatorPart
Context PC = 20

----------------------------------------------------------------------
Refactory.Browser.CodeComponentTabNavigatorPart>>update:with:from:
Receiver:
        a Refactory.Browser.CodeComponentTabNavigatorPart
Instance Variables:
        dependents = nil
        builder = an UIBuilder
        uiSession = nil
        eventHandlers = nil
        navigator = a Refactory.Browser.BrowserNavigator
        objectList = a SelectionInList
        subcanvasBuilder = an UIBuilder
        namedComponents = an OrderedCollection[2]
Arguments:
        anAspectSymbol = #navigatorState
        aParameter = Base VisualWorks
        aSender = a Refactory.Browser.ClassNavigatorPart
Context PC = 27

----------------------------------------------------------------------
Refactory.Browser.ClassNavigatorPart(Object)>>changed:with:
Receiver:
        a Refactory.Browser.ClassNavigatorPart
Instance Variables:
        dependents = a Refactory.Browser.CodeComponentTabNavigatorPart
        builder = an UIBuilder
        uiSession = nil
        eventHandlers = nil
        navigator = a Refactory.Browser.BrowserNavigator
        menu = a Menu
        visualBlock = BlockClosure [] in
Refactory.Browser.ListNavigatorPart class>>initializeDefaultVisualBlock
        objectList = a Refactory.Browser.RBMultiSelectionInList
Arguments:
        anAspectSymbol = #navigatorState
        aParameter = Base VisualWorks
Context PC = 7

----------------------------------------------------------------------
Refactory.Browser.ClassNavigatorPart(Refactory.Browser.NavigatorPart)>>c
hanged:with:
Receiver:
        a Refactory.Browser.ClassNavigatorPart
Instance Variables:
        dependents = a Refactory.Browser.CodeComponentTabNavigatorPart
        builder = an UIBuilder
        uiSession = nil
        eventHandlers = nil
        navigator = a Refactory.Browser.BrowserNavigator
        menu = a Menu
        visualBlock = BlockClosure [] in
Refactory.Browser.ListNavigatorPart class>>initializeDefaultVisualBlock
        objectList = a Refactory.Browser.RBMultiSelectionInList
Arguments:
        anAspectSymbol = #navigatorState
        aParameter = Base VisualWorks
Context PC = 17

----------------------------------------------------------------------
Refactory.Browser.ClassNavigatorPart>>changed:with:
Receiver:
        a Refactory.Browser.ClassNavigatorPart
Instance Variables:
        dependents = a Refactory.Browser.CodeComponentTabNavigatorPart
        builder = an UIBuilder
        uiSession = nil
        eventHandlers = nil
        navigator = a Refactory.Browser.BrowserNavigator
        menu = a Menu
        visualBlock = BlockClosure [] in
Refactory.Browser.ListNavigatorPart class>>initializeDefaultVisualBlock
        objectList = a Refactory.Browser.RBMultiSelectionInList
Arguments:
        anAspectSymbol = #navigatorState
        aParameter = Base VisualWorks
Context PC = 15

----------------------------------------------------------------------
Refactory.Browser.ClassNavigatorPart(Refactory.Browser.NavigatorPart)>>u
pdate:with:from:
Receiver:
        a Refactory.Browser.ClassNavigatorPart
Instance Variables:
        dependents = a Refactory.Browser.CodeComponentTabNavigatorPart
        builder = an UIBuilder
        uiSession = nil
        eventHandlers = nil
        navigator = a Refactory.Browser.BrowserNavigator
        menu = a Menu
        visualBlock = BlockClosure [] in
Refactory.Browser.ListNavigatorPart class>>initializeDefaultVisualBlock
        objectList = a Refactory.Browser.RBMultiSelectionInList
Arguments:
        anAspectSymbol = #navigatorState
        aParameter = Base VisualWorks
        aSender = a Refactory.Browser.PundleNavigatorPart
Context PC = 23

----------------------------------------------------------------------
Refactory.Browser.ClassNavigatorPart(Refactory.Browser.ListNavigatorPart
)>>update:with:from:
Receiver:
        a Refactory.Browser.ClassNavigatorPart
Instance Variables:
        dependents = a Refactory.Browser.CodeComponentTabNavigatorPart
        builder = an UIBuilder
        uiSession = nil
        eventHandlers = nil
        navigator = a Refactory.Browser.BrowserNavigator
        menu = a Menu
        visualBlock = BlockClosure [] in
Refactory.Browser.ListNavigatorPart class>>initializeDefaultVisualBlock
        objectList = a Refactory.Browser.RBMultiSelectionInList
Arguments:
        anAspectSymbol = #navigatorState
        aParameter = Base VisualWorks
        aSender = a Refactory.Browser.PundleNavigatorPart
Context PC = 18

----------------------------------------------------------------------
Refactory.Browser.PundleNavigatorPart(Object)>>changed:with:
Receiver:
        a Refactory.Browser.PundleNavigatorPart
Instance Variables:
        dependents = a Refactory.Browser.ClassNavigatorPart
        builder = an UIBuilder
        uiSession = nil
        eventHandlers = nil
        navigator = a Refactory.Browser.BrowserNavigator
        menu = a Menu
        visualBlock = BlockClosure [] in
Refactory.Browser.ListNavigatorPart class>>initializeDefaultVisualBlock
        objectList = a MultiSelectionInTree
        definingPackage = nil
Arguments:
        anAspectSymbol = #navigatorState
        aParameter = Base VisualWorks
Context PC = 7

----------------------------------------------------------------------
Refactory.Browser.PundleNavigatorPart(Refactory.Browser.NavigatorPart)>>
changed:with:
Receiver:
        a Refactory.Browser.PundleNavigatorPart
Instance Variables:
        dependents = a Refactory.Browser.ClassNavigatorPart
        builder = an UIBuilder
        uiSession = nil
        eventHandlers = nil
        navigator = a Refactory.Browser.BrowserNavigator
        menu = a Menu
        visualBlock = BlockClosure [] in
Refactory.Browser.ListNavigatorPart class>>initializeDefaultVisualBlock
        objectList = a MultiSelectionInTree
        definingPackage = nil
Arguments:
        anAspectSymbol = #navigatorState
        aParameter = Base VisualWorks
Context PC = 17

----------------------------------------------------------------------
optimized [] in Refactory.Browser.NavigatorPart>>changed
Receiver:
        an UndefinedObject
Temporaries:
        .super = a Refactory.Browser.PundleNavigatorPart
Context PC = 10

----------------------------------------------------------------------
BlockClosure>>ensure:
Receiver:
        a BlockClosure
Instance Variables:
        method = CompiledBlock [] in
Refactory.Browser.NavigatorPart>>changed
        outerContext = nil
        copiedValues = a Refactory.Browser.PundleNavigatorPart
Arguments:
        aBlock = BlockClosure [] in
Refactory.Browser.BrowserApplicationModel>>showWaitCursorWhile:
Temporaries:
        result = nil
Context PC = 4

----------------------------------------------------------------------
Refactory.Browser.PundleNavigatorPart(Refactory.Browser.BrowserApplicati
onModel)>>showWaitCursorWhile:
Receiver:
        a Refactory.Browser.PundleNavigatorPart
Instance Variables:
        dependents = a Refactory.Browser.ClassNavigatorPart
        builder = an UIBuilder
        uiSession = nil
        eventHandlers = nil
        navigator = a Refactory.Browser.BrowserNavigator
        menu = a Menu
        visualBlock = BlockClosure [] in
Refactory.Browser.ListNavigatorPart class>>initializeDefaultVisualBlock
        objectList = a MultiSelectionInTree
        definingPackage = nil
Arguments:
        aBlock = BlockClosure [] in
Refactory.Browser.NavigatorPart>>changed
Temporaries:
        originalCursor = Cursor normal
        done = false
Context PC = 40

----------------------------------------------------------------------
Refactory.Browser.PundleNavigatorPart(Refactory.Browser.NavigatorPart)>>
changed
Receiver:
        a Refactory.Browser.PundleNavigatorPart
Instance Variables:
        dependents = a Refactory.Browser.ClassNavigatorPart
        builder = an UIBuilder
        uiSession = nil
        eventHandlers = nil
        navigator = a Refactory.Browser.BrowserNavigator
        menu = a Menu
        visualBlock = BlockClosure [] in
Refactory.Browser.ListNavigatorPart class>>initializeDefaultVisualBlock
        objectList = a MultiSelectionInTree
        definingPackage = nil
Context PC = 8

----------------------------------------------------------------------
MessageChannel>>value
Receiver:
        a MessageChannel
Instance Variables:
        receiver = a Refactory.Browser.PundleNavigatorPart
        selector = #changed
        numArgs = 0
Context PC = 16

----------------------------------------------------------------------
UIDispatcher>>dispatch:for:
Receiver:
        an UIDispatcher
Instance Variables:
        receiver = a Refactory.Browser.PundleNavigatorPart
        focusIn = nil
        focusOut = nil
        valueChange = a MessageChannel
        doubleClick = a MessageChannel
        requestFocusIn = nil
        requestFocusOut = nil
        requestValueChange = a MessageChannel
        requestDoubleClick = nil
Arguments:
        aBlockLikeThing = a MessageChannel
        aController = a MultiSequenceTreeController
Temporaries:
        na = 0
Context PC = 16

----------------------------------------------------------------------
UIDispatcher>>valueChangeFor:
Receiver:
        an UIDispatcher
Instance Variables:
        receiver = a Refactory.Browser.PundleNavigatorPart
        focusIn = nil
        focusOut = nil
        valueChange = a MessageChannel
        doubleClick = a MessageChannel
        requestFocusIn = nil
        requestFocusOut = nil
        requestValueChange = a MessageChannel
        requestDoubleClick = nil
Arguments:
        aController = a MultiSequenceTreeController
Context PC = 6

----------------------------------------------------------------------
MultiSequenceTreeController(Controller)>>valueChange
Receiver:
        a MultiSequenceTreeController
Instance Variables:
        model = a ValueHolder on: TreeModel on: a
Refactory.Browser.PundleItem (opened: 12)
        view = a MultiSelectionTreeView
        sensor = a TranslatingSensor
        menuHolder = a Menu
        performer = a Refactory.Browser.PundleNavigatorPart
        keyboardProcessor = a KeyboardProcessor
        outside = false
        searchString = nil
        keyboardHook = nil
        doStringSearching = true
        dispatcher = an UIDispatcher
        dragDropCallbacks = a WidgetDragDropCallbacks
        selectOnDownWithDrag = true
        autoSelect = true
        inPlaceEditor = nil
        composite = a SubCanvas
Context PC = 6

----------------------------------------------------------------------
MultiSequenceTreeController(SequenceController)>>valueChange
Receiver:
        a MultiSequenceTreeController
Instance Variables:
        model = a ValueHolder on: TreeModel on: a
Refactory.Browser.PundleItem (opened: 12)
        view = a MultiSelectionTreeView
        sensor = a TranslatingSensor
        menuHolder = a Menu
        performer = a Refactory.Browser.PundleNavigatorPart
        keyboardProcessor = a KeyboardProcessor
        outside = false
        searchString = nil
        keyboardHook = nil
        doStringSearching = true
        dispatcher = an UIDispatcher
        dragDropCallbacks = a WidgetDragDropCallbacks
        selectOnDownWithDrag = true
        autoSelect = true
        inPlaceEditor = nil
        composite = a SubCanvas
Context PC = 5

----------------------------------------------------------------------
MultiSequenceTreeController>>toggleTargetWithEvent:
Receiver:
        a MultiSequenceTreeController
Instance Variables:
        model = a ValueHolder on: TreeModel on: a
Refactory.Browser.PundleItem (opened: 12)
        view = a MultiSelectionTreeView
        sensor = a TranslatingSensor
        menuHolder = a Menu
        performer = a Refactory.Browser.PundleNavigatorPart
        keyboardProcessor = a KeyboardProcessor
        outside = false
        searchString = nil
        keyboardHook = nil
        doStringSearching = true
        dispatcher = an UIDispatcher
        dragDropCallbacks = a WidgetDragDropCallbacks
        selectOnDownWithDrag = true
        autoSelect = true
        inPlaceEditor = nil
        composite = a SubCanvas
Arguments:
        event = a RedButtonReleasedEvent
Temporaries:
        index = 2
Context PC = 25

----------------------------------------------------------------------
MultiSequenceTreeController>>selectUpAt:withEvent:
Receiver:
        a MultiSequenceTreeController
Instance Variables:
        model = a ValueHolder on: TreeModel on: a
Refactory.Browser.PundleItem (opened: 12)
        view = a MultiSelectionTreeView
        sensor = a TranslatingSensor
        menuHolder = a Menu
        performer = a Refactory.Browser.PundleNavigatorPart
        keyboardProcessor = a KeyboardProcessor
        outside = false
        searchString = nil
        keyboardHook = nil
        doStringSearching = true
        dispatcher = an UIDispatcher
        dragDropCallbacks = a WidgetDragDropCallbacks
        selectOnDownWithDrag = true
        autoSelect = true
        inPlaceEditor = nil
        composite = a SubCanvas
Arguments:
        aPoint = 56@30
        event = a RedButtonReleasedEvent
Context PC = 8

----------------------------------------------------------------------
EmulatedSequenceTracker>>finishSelectionForEvent:
Receiver:
        an EmulatedSequenceTracker
Instance Variables:
        controller = a MultiSequenceTreeController
        process = nil
        wantsToDrag = false
        selectionDone = false
        startPoint = 56@30
Arguments:
        aMouseButtonEvent = a RedButtonReleasedEvent
Temporaries:
        currentPoint = 56@30
Context PC = 22

----------------------------------------------------------------------
EmulatedSequenceTracker>>redButtonReleasedEvent:
Receiver:
        an EmulatedSequenceTracker
Instance Variables:
        controller = a MultiSequenceTreeController
        process = nil
        wantsToDrag = false
        selectionDone = false
        startPoint = 56@30
Arguments:
        aMouseButtonEvent = a RedButtonReleasedEvent
Context PC = 10

----------------------------------------------------------------------
RedButtonReleasedEvent>>dispatchTo:
Receiver:
        a RedButtonReleasedEvent
Instance Variables:
        time = 338258828
        initiator = an EventDispatcher
        window = an ApplicationWindow 188
        state = 0
        x = 58
        y = 106
        gx = 938
        gy = 606
        buttonNumber = 1
Arguments:
        anObject = an EmulatedSequenceTracker
Context PC = 4

----------------------------------------------------------------------
EmulatedSequenceTracker(SelectionTracker)>>handleEvent:
Receiver:
        an EmulatedSequenceTracker
Instance Variables:
        controller = a MultiSequenceTreeController
        process = nil
        wantsToDrag = false
        selectionDone = false
        startPoint = 56@30
Arguments:
        anEvent = a RedButtonReleasedEvent
Context PC = 4

----------------------------------------------------------------------
EventDispatcher>>dispatch:to:
Receiver:
        an EventDispatcher
Instance Variables:
        windowController = an ApplicationStandardSystemController
        currentMouseConsumer = nil
        grabbingMouse = false
        keyboardProcessor = a KeyboardProcessor
        lastControlObject = a MultiSequenceTreeController
        trapList = nil
        state = nil
        repairDamageWhenDebugging = true
        flushQueueAfterError = true
        distributeEventsWhenDebugging = true
        dragDropInProgress = false
        dragDropTracker = nil
        dispatchUnknownEvents = false
Arguments:
        event = a RedButtonReleasedEvent
        object = an EmulatedSequenceTracker
Temporaries:
        tmp = nil
Context PC = 10

----------------------------------------------------------------------
EventDispatcher>>dispatchEvent:
Receiver:
        an EventDispatcher
Instance Variables:
        windowController = an ApplicationStandardSystemController
        currentMouseConsumer = nil
        grabbingMouse = false
        keyboardProcessor = a KeyboardProcessor
        lastControlObject = a MultiSequenceTreeController
        trapList = nil
        state = nil
        repairDamageWhenDebugging = true
        flushQueueAfterError = true
        distributeEventsWhenDebugging = true
        dragDropInProgress = false
        dragDropTracker = nil
        dispatchUnknownEvents = false
Arguments:
        event = a RedButtonReleasedEvent
Temporaries:
        objectWantingControl = nil
        targetKeyboardProcessor = nil
Context PC = 60

----------------------------------------------------------------------
RedButtonReleasedEvent(Event)>>dispatch
Receiver:
        a RedButtonReleasedEvent
Instance Variables:
        time = 338258828
        initiator = an EventDispatcher
        window = an ApplicationWindow 188
        state = 0
        x = 58
        y = 106
        gx = 938
        gy = 606
        buttonNumber = 1
Context PC = 16

----------------------------------------------------------------------
RedButtonReleasedEvent(Event)>>dispatchForWindowManager:
Receiver:
        a RedButtonReleasedEvent
Instance Variables:
        time = 338258828
        initiator = an EventDispatcher
        window = an ApplicationWindow 188
        state = 0
        x = 58
        y = 106
        gx = 938
        gy = 606
        buttonNumber = 1
Arguments:
        aWinMgr = a WindowManager
Context PC = 4

----------------------------------------------------------------------
optimized [] in WindowManager>>safelyDispatchForWindowManager:
Receiver:
        an UndefinedObject
Temporaries:
        .event = a RedButtonReleasedEvent
        .super = a WindowManager
Context PC = 6

----------------------------------------------------------------------
BlockClosure>>on:do:
Receiver:
        a BlockClosure
Instance Variables:
        method = CompiledBlock [] in
WindowManager>>safelyDispatchForWindowManager:
        outerContext = nil
        copiedValues = an Array[2]
Arguments:
        anExceptionSelector = BadControllerError
        handlerBlock = BlockClosure [] in
WindowManager>>safelyDispatchForWindowManager:
Context PC = 18

----------------------------------------------------------------------
WindowManager>>safelyDispatchForWindowManager:
Receiver:
        a WindowManager
Instance Variables:
        windows = an OrderedCollection[1]
        activeController = nil
        interruptLock = false
        outstandingMetaOrDamage = false
        openInProgress = false
        eventQueue = an EventQueue
        baseProcess = a Process in Semaphore>>wait
        dontFilterEvents = false
Arguments:
        event = a RedButtonReleasedEvent
Context PC = 13

----------------------------------------------------------------------
WindowManager>>processNextEvent
Receiver:
        a WindowManager
Instance Variables:
        windows = an OrderedCollection[1]
        activeController = nil
        interruptLock = false
        outstandingMetaOrDamage = false
        openInProgress = false
        eventQueue = an EventQueue
        baseProcess = a Process in Semaphore>>wait
        dontFilterEvents = false
Temporaries:
        event = a RedButtonReleasedEvent
Context PC = 9

----------------------------------------------------------------------
optimized [] in [] in WindowManager>>newProcess
Receiver:
        an UndefinedObject
Temporaries:
        .super = a WindowManager
Context PC = 13

----------------------------------------------------------------------
BlockClosure>>on:do:
Receiver:
        a BlockClosure
Instance Variables:
        method = CompiledBlock [] in [] in WindowManager>>newProcess
        outerContext = nil
        copiedValues = a WindowManager
Arguments:
        anExceptionSelector = TerminateException
        handlerBlock = BlockClosure [] in [] in
WindowManager>>newProcess
Context PC = 18

----------------------------------------------------------------------
optimized [] in WindowManager>>newProcess
Receiver:
        an UndefinedObject
Temporaries:
        .super = a WindowManager
Context PC = 15

----------------------------------------------------------------------
BlockClosure>>on:do:
Receiver:
        a BlockClosure
Instance Variables:
        method = CompiledBlock [] in WindowManager>>newProcess
        outerContext = nil
        copiedValues = a WindowManager
Arguments:
        anExceptionSelector = TerminateException
        handlerBlock = BlockClosure [] in [] in Process
class>>forBlock:priority:
Context PC = 18

----------------------------------------------------------------------
optimized [] in Process class>>forBlock:priority:
Receiver:
        an UndefinedObject
Temporaries:
        .aBlock = BlockClosure [] in WindowManager>>newProcess
Context PC = 9

-Boris

--
+1.604.689.0322
DeepCove Labs Ltd.
4th floor 595 Howe Street
Vancouver, Canada V6C 2T5
http://tinyurl.com/r7uw4

[hidden email]

CONFIDENTIALITY NOTICE

This email is intended only for the persons named in the message
header. Unless otherwise indicated, it contains information that is
private and confidential. If you have received it in error, please
notify the sender and delete the entire message including any
attachments.

Thank you.


_______________________________________________
vwnc mailing list
[hidden email]
http://lists.cs.uiuc.edu/mailman/listinfo/vwnc