VDBDebuggerApplication.st
changeset 17 c5ee4ea44165
parent 16 fc1898815ab6
child 22 6684f4d82301
equal deleted inserted replaced
16:fc1898815ab6 17:c5ee4ea44165
     1 "{ Package: 'jv:vdb' }"
     1 "{ Package: 'jv:vdb' }"
     2 
     2 
     3 VDBAbstractApplication subclass:#VDBDebuggerApplication
     3 VDBAbstractApplication subclass:#VDBDebuggerApplication
     4 	instanceVariableNames:'layoutSpecHolder containerBottom'
     4 	instanceVariableNames:'layoutSpecHolder selectedFrameHolder containerBottom'
     5 	classVariableNames:''
     5 	classVariableNames:''
     6 	poolDictionaries:''
     6 	poolDictionaries:''
     7 	category:'VGB-UI'
     7 	category:'VGB-UI'
     8 !
     8 !
     9 
     9 
    39       (SpecCollection
    39       (SpecCollection
    40          collection: (
    40          collection: (
    41           (VariableVerticalPanelSpec
    41           (VariableVerticalPanelSpec
    42              name: 'VariableVerticalPanel'
    42              name: 'VariableVerticalPanel'
    43              layout: (LayoutFrame 0 0 0 0 0 1 0 1)
    43              layout: (LayoutFrame 0 0 0 0 0 1 0 1)
       
    44              showHandle: true
       
    45              snapMode: both
    44              component: 
    46              component: 
    45             (SpecCollection
    47             (SpecCollection
    46                collection: (
    48                collection: (
    47                 (SubCanvasSpec
    49                 (SubCanvasSpec
    48                    name: 'StackCanvas'
    50                    name: 'StackCanvas'
       
    51                    level: 0
    49                    hasHorizontalScrollBar: false
    52                    hasHorizontalScrollBar: false
    50                    hasVerticalScrollBar: false
    53                    hasVerticalScrollBar: false
    51                    majorKey: VDBStackApplication
    54                    majorKey: VDBStackApplication
       
    55                    subAspectHolders: 
       
    56                   (Array
       
    57                      
       
    58                     (SubChannelInfoSpec
       
    59                        subAspect: selectionHolder
       
    60                        aspect: selectedFrameHolder
       
    61                      )
       
    62                    )
       
    63                    createNewApplication: true
       
    64                    createNewBuilder: true
       
    65                  )
       
    66                 (SubCanvasSpec
       
    67                    name: 'SourceCanvas'
       
    68                    hasHorizontalScrollBar: false
       
    69                    hasVerticalScrollBar: false
       
    70                    majorKey: VDBSourceApplication
       
    71                    subAspectHolders: 
       
    72                   (Array
       
    73                      
       
    74                     (SubChannelInfoSpec
       
    75                        subAspect: frameHolder
       
    76                        aspect: selectedFrameHolder
       
    77                      )
       
    78                    )
    52                    createNewApplication: true
    79                    createNewApplication: true
    53                    createNewBuilder: true
    80                    createNewBuilder: true
    54                  )
    81                  )
    55                 (SubCanvasSpec
    82                 (SubCanvasSpec
    56                    name: 'ContainerBottom'
    83                    name: 'ContainerBottom'
    70                    createNewBuilder: true
    97                    createNewBuilder: true
    71                  )
    98                  )
    72                 )
    99                 )
    73               
   100               
    74              )
   101              )
    75              handles: (Any 0.5 1.0)
   102              handles: (Any 0.33333333333333337 0.66666666666666674 1.0)
    76            )
   103            )
    77           )
   104           )
    78         
   105         
    79        )
   106        )
    80      )
   107      )
   317         layoutSpecHolder := ValueHolder with: #layoutEclipseSpec.
   344         layoutSpecHolder := ValueHolder with: #layoutEclipseSpec.
   318     ].
   345     ].
   319     ^ layoutSpecHolder
   346     ^ layoutSpecHolder
   320 
   347 
   321     "Modified: / 18-09-2014 / 23:35:15 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   348     "Modified: / 18-09-2014 / 23:35:15 / Jan Vrany <jan.vrany@fit.cvut.cz>"
       
   349 !
       
   350 
       
   351 selectedFrameHolder
       
   352     "return/create the 'selectedFrameHolder' value holder (automatically generated)"
       
   353 
       
   354     selectedFrameHolder isNil ifTrue:[
       
   355         selectedFrameHolder := ValueHolder new.
       
   356     ].
       
   357     ^ selectedFrameHolder
   322 ! !
   358 ! !
   323 
   359 
   324 !VDBDebuggerApplication methodsFor:'aspects-containers'!
   360 !VDBDebuggerApplication methodsFor:'aspects-containers'!
   325 
   361 
   326 containerBottom
   362 containerBottom