DebugView.st
changeset 11647 2fc55dce6e0d
parent 11645 4f39a925956d
child 11661 2bda6075f0fa
equal deleted inserted replaced
11646:32f3ceaad846 11647:2fc55dce6e0d
   790            (Menu
   790            (Menu
   791               (
   791               (
   792                (MenuItem
   792                (MenuItem
   793                   enabled: canShowMore
   793                   enabled: canShowMore
   794                   label: 'Show More WalkBack'
   794                   label: 'Show More WalkBack'
   795                   itemValue: showMore
   795                   itemValue: showMoreWalkback
   796                   translateLabel: true
   796                   translateLabel: true
       
   797                 )
       
   798                (MenuItem
       
   799                   enabled: canShowMore
       
   800                   label: 'Show Full WalkBack'
       
   801                   itemValue: showFullWalkback
       
   802                   translateLabel: true
       
   803                 )
       
   804                (MenuItem
       
   805                   label: '-'
   797                 )
   806                 )
   798                (MenuItem
   807                (MenuItem
   799                   label: 'Show Verbose WalkBack'
   808                   label: 'Show Verbose WalkBack'
   800                   itemValue: toggleVerboseWalkback
   809                   itemValue: toggleVerboseWalkback
   801                   translateLabel: true
   810                   translateLabel: true
  1221           )
  1230           )
  1222          )
  1231          )
  1223         nil
  1232         nil
  1224         nil
  1233         nil
  1225       )
  1234       )
       
  1235 
       
  1236     "Modified: / 23-07-2012 / 12:41:03 / cg"
  1226 ! !
  1237 ! !
  1227 
  1238 
  1228 !DebugView class methodsFor:'misc'!
  1239 !DebugView class methodsFor:'misc'!
  1229 
  1240 
  1230 interestingContextFrom:aContext
  1241 interestingContextFrom:aContext
  4975 
  4986 
  4976     "Created: / 17.11.2001 / 20:08:08 / cg"
  4987     "Created: / 17.11.2001 / 20:08:08 / cg"
  4977     "Modified: / 17.11.2001 / 22:39:48 / cg"
  4988     "Modified: / 17.11.2001 / 22:39:48 / cg"
  4978 !
  4989 !
  4979 
  4990 
       
  4991 showFullWalkback
       
  4992     "double the number of contexts shown"
       
  4993 
       
  4994     contextArray notNil ifTrue:[
       
  4995         nChainShown := 9999.
       
  4996         self redisplayBacktrace.
       
  4997     ]
       
  4998 
       
  4999     "Created: / 23-07-2012 / 12:24:02 / cg"
       
  5000 !
       
  5001 
  4980 showMore
  5002 showMore
  4981     "double the number of contexts shown"
  5003     "double the number of contexts shown"
  4982 
  5004 
  4983     contextArray notNil ifTrue:[
  5005     contextArray notNil ifTrue:[
  4984         nChainShown := nChainShown * 2.
  5006         nChainShown := nChainShown * 2.
  7750     "
  7772     "
  7751     self updateMenuItems
  7773     self updateMenuItems
  7752 
  7774 
  7753     "Created: / 14-08-1997 / 20:15:00 / cg"
  7775     "Created: / 14-08-1997 / 20:15:00 / cg"
  7754     "Modified: / 05-10-2011 / 11:55:14 / Jan Vrany <jan.vrany@fit.cvut.cz>"
  7776     "Modified: / 05-10-2011 / 11:55:14 / Jan Vrany <jan.vrany@fit.cvut.cz>"
  7755     "Modified: / 19-07-2012 / 11:20:42 / cg"
  7777     "Modified: / 23-07-2012 / 12:23:49 / cg"
  7756 ! !
  7778 ! !
  7757 
  7779 
  7758 !DebugView::IgnoredHaltOrBreakpoint methodsFor:'accessing'!
  7780 !DebugView::IgnoredHaltOrBreakpoint methodsFor:'accessing'!
  7759 
  7781 
  7760 ignoreCount:something
  7782 ignoreCount:something
  7999 ! !
  8021 ! !
  8000 
  8022 
  8001 !DebugView class methodsFor:'documentation'!
  8023 !DebugView class methodsFor:'documentation'!
  8002 
  8024 
  8003 version
  8025 version
  8004     ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.547 2012-07-23 09:18:47 stefan Exp $'
  8026     ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.548 2012-07-23 10:43:16 cg Exp $'
  8005 !
  8027 !
  8006 
  8028 
  8007 version_CVS
  8029 version_CVS
  8008     ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.547 2012-07-23 09:18:47 stefan Exp $'
  8030     ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.548 2012-07-23 10:43:16 cg Exp $'
  8009 !
  8031 !
  8010 
  8032 
  8011 version_SVN
  8033 version_SVN
  8012     ^ '§Id: DebugView.st 7818 2011-08-18 11:42:39Z vranyj1 §'
  8034     ^ '§Id: DebugView.st 7818 2011-08-18 11:42:39Z vranyj1 §'
  8013 ! !
  8035 ! !