equal
deleted
inserted
replaced
|
1 "{ Encoding: utf8 }" |
|
2 |
1 " |
3 " |
2 COPYRIGHT (c) 2008 by eXept Software AG |
4 COPYRIGHT (c) 2008 by eXept Software AG |
3 All Rights Reserved |
5 All Rights Reserved |
4 |
6 |
5 This software is furnished under a license and may be used |
7 This software is furnished under a license and may be used |
91 (#tracePoint: #tracepoint) |
93 (#tracePoint: #tracepoint) |
92 (#tracePoint:message: #tracepoint) |
94 (#tracePoint:message: #tracepoint) |
93 ). |
95 ). |
94 ! |
96 ! |
95 |
97 |
96 initialize |
98 messagesAndTypes |
97 MessagesAndTypes := self defaultListOfMessagesAndTypes |
99 "the spec of selectors to search for coded breakpoints" |
|
100 |
|
101 MessagesAndTypes isNil ifTrue:[ |
|
102 MessagesAndTypes := self defaultListOfMessagesAndTypes |
|
103 ]. |
|
104 ^ MessagesAndTypes |
98 ! ! |
105 ! ! |
99 |
106 |
100 !BreakpointBrowser class methodsFor:'defaults'! |
107 !BreakpointBrowser class methodsFor:'defaults'! |
101 |
108 |
102 defaultIcon |
109 defaultIcon |
847 ! |
854 ! |
848 |
855 |
849 messagesAndTypes |
856 messagesAndTypes |
850 "the spec of selectors to search for coded breakpoints" |
857 "the spec of selectors to search for coded breakpoints" |
851 |
858 |
852 ^ MessagesAndTypes |
859 ^ self class messagesAndTypes |
853 ! |
860 ! |
854 |
861 |
855 selectedBreakpointListEntry |
862 selectedBreakpointListEntry |
856 self selectionIndex isNil ifTrue:[^ nil]. |
863 self selectionIndex isNil ifTrue:[^ nil]. |
857 ^ self breakpointListEntryAtIndex:(self selectionIndex). |
864 ^ self breakpointListEntryAtIndex:(self selectionIndex). |
2055 ! ! |
2062 ! ! |
2056 |
2063 |
2057 !BreakpointBrowser class methodsFor:'documentation'! |
2064 !BreakpointBrowser class methodsFor:'documentation'! |
2058 |
2065 |
2059 version |
2066 version |
2060 ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.54 2015-02-24 11:48:49 cg Exp $' |
2067 ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.55 2015-05-07 22:32:03 cg Exp $' |
2061 ! |
2068 ! |
2062 |
2069 |
2063 version_CVS |
2070 version_CVS |
2064 ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.54 2015-02-24 11:48:49 cg Exp $' |
2071 ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.55 2015-05-07 22:32:03 cg Exp $' |
2065 ! ! |
2072 ! ! |
2066 |
2073 |
2067 |
|
2068 BreakpointBrowser initialize! |
|