Tools__MethodList.st
changeset 16891 02a3f0fafc59
parent 16669 95d91cbcf7a5
child 16970 472000f80562
child 17133 f9f20407fbf9
equal deleted inserted replaced
16890:8b4fad7fb72d 16891:02a3f0fafc59
  1686     icn isNil ifTrue:[
  1686     icn isNil ifTrue:[
  1687         (aMethod notNil and:[aMethod isMethodWithBreakpoints]) ifTrue:[
  1687         (aMethod notNil and:[aMethod isMethodWithBreakpoints]) ifTrue:[
  1688             aMethod hasEnabledBreakpoints ifTrue:[ 
  1688             aMethod hasEnabledBreakpoints ifTrue:[ 
  1689                 icn := self lineBreakPointedIcon
  1689                 icn := self lineBreakPointedIcon
  1690             ] ifFalse:[    
  1690             ] ifFalse:[    
  1691                 icn := self lineTracePointedIcon
  1691                 aMethod hasEnabledTracepoints ifTrue:[ 
       
  1692                     icn := self lineTracePointedIcon
       
  1693                 ] ifFalse:[    
       
  1694                     icn := self disabledBreakpointIcon
       
  1695                 ]    
  1692             ].
  1696             ].
  1693         ].
  1697         ].
  1694     ].
  1698     ].
  1695 
  1699 
  1696     icn isNil ifTrue:[
  1700     icn isNil ifTrue:[