DebugView.st
changeset 13544 9a6069a18d4e
parent 13538 bd35b9f1813a
child 13553 728eae2b6327
equal deleted inserted replaced
13543:df44ffafef5a 13544:9a6069a18d4e
  1851         "/ closedown of the debugger.
  1851         "/ closedown of the debugger.
  1852         [self controlLoop] ifCurtailed:[
  1852         [self controlLoop] ifCurtailed:[
  1853             windowGroup notNil ifTrue:[
  1853             windowGroup notNil ifTrue:[
  1854                 windowGroup setProcess:nil.
  1854                 windowGroup setProcess:nil.
  1855             ].
  1855             ].
  1856             NumberOfDebuggers := NumberOfDebuggers - 1.
  1856             NumberOfDebuggers := (NumberOfDebuggers ? 1) - 1.
  1857             self destroy
  1857             self destroy
  1858         ].
  1858         ].
  1859         NumberOfDebuggers := NumberOfDebuggers - 1.
  1859         NumberOfDebuggers := (NumberOfDebuggers ? 1) - 1.
  1860     ].
  1860     ].
  1861     "/ here after my own control loop is finished.
  1861     "/ here after my own control loop is finished.
  1862 
  1862 
  1863     "/ release all context stuff.
  1863     "/ release all context stuff.
  1864     "/ This is required to avoid keeping references to the debuggees objects
  1864     "/ This is required to avoid keeping references to the debuggees objects
  9011 ! !
  9011 ! !
  9012 
  9012 
  9013 !DebugView class methodsFor:'documentation'!
  9013 !DebugView class methodsFor:'documentation'!
  9014 
  9014 
  9015 version
  9015 version
  9016     ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.635 2013-09-09 15:08:32 cg Exp $'
  9016     ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.636 2013-09-10 18:29:57 ab Exp $'
  9017 !
  9017 !
  9018 
  9018 
  9019 version_CVS
  9019 version_CVS
  9020     ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.635 2013-09-09 15:08:32 cg Exp $'
  9020     ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.636 2013-09-10 18:29:57 ab Exp $'
  9021 !
  9021 !
  9022 
  9022 
  9023 version_SVN
  9023 version_SVN
  9024     ^ '$Id: DebugView.st,v 1.635 2013-09-09 15:08:32 cg Exp $'
  9024     ^ '$Id: DebugView.st,v 1.636 2013-09-10 18:29:57 ab Exp $'
  9025 ! !
  9025 ! !
  9026 
  9026 
  9027 
  9027 
  9028 DebugView initialize!
  9028 DebugView initialize!