Tools__BreakpointBrowser.st
changeset 13788 8cb3d21e2d52
parent 13349 cadf708fe6cc
child 14607 b4a144ee8154
equal deleted inserted replaced
13787:0650705954cf 13788:8cb3d21e2d52
  1395                 ]
  1395                 ]
  1396             ].
  1396             ].
  1397         ].
  1397         ].
  1398 
  1398 
  1399         mthd isMethodWithBreakpoints ifTrue:[
  1399         mthd isMethodWithBreakpoints ifTrue:[
  1400             mthd literalsDo:[:lit | 
  1400             mthd breakpointsDo:[:bp | 
  1401                 lit class == Breakpoint ifTrue:[
  1401                 bp isVisible ifTrue:[
  1402                     lit isVisible ifTrue:[
  1402                     entry := BreakpointListEntryForLineBreak new.
  1403                         entry := BreakpointListEntryForLineBreak new.
  1403                     entry
  1404                         entry
  1404                         type:#line
  1405                             type:#line
  1405                         arg:nil
  1406                             arg:nil
  1406                         className:cls name
  1407                             className:cls name
  1407                         selector:sel
  1408                             selector:sel
  1408                         lineNumber:(bp line)
  1409                             lineNumber:(lit line)
  1409                         info:nil
  1410                             info:nil
  1410                         enabled:true.
  1411                             enabled:true.
  1411                     entry breakPoint:bp.
  1412                         entry breakPoint:lit.
  1412                     aBlock value:entry 
  1413                         aBlock value:entry 
       
  1414                     ]
       
  1415                 ]
  1413                 ]
  1416             ].        
  1414             ].        
  1417         ]
  1415         ]
  1418     ].
  1416     ].
       
  1417 
       
  1418     "Modified: / 03-02-2014 / 10:35:14 / cg"
  1419 ! !
  1419 ! !
  1420 
  1420 
  1421 !BreakpointBrowser methodsFor:'initialization & release'!
  1421 !BreakpointBrowser methodsFor:'initialization & release'!
  1422 
  1422 
  1423 codeViewClass
  1423 codeViewClass
  2053 ! !
  2053 ! !
  2054 
  2054 
  2055 !BreakpointBrowser class methodsFor:'documentation'!
  2055 !BreakpointBrowser class methodsFor:'documentation'!
  2056 
  2056 
  2057 version
  2057 version
  2058     ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.50 2013-08-22 19:12:36 cg Exp $'
  2058     ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.51 2014-02-03 09:36:25 cg Exp $'
  2059 !
  2059 !
  2060 
  2060 
  2061 version_CVS
  2061 version_CVS
  2062     ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.50 2013-08-22 19:12:36 cg Exp $'
  2062     ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.51 2014-02-03 09:36:25 cg Exp $'
  2063 ! !
  2063 ! !
  2064 
  2064 
  2065 
  2065 
  2066 BreakpointBrowser initialize!
  2066 BreakpointBrowser initialize!