equal
deleted
inserted
replaced
172 |
172 |
173 hasEnabledBreakpoints |
173 hasEnabledBreakpoints |
174 "true if any of my breakpoints is actually enabled" |
174 "true if any of my breakpoints is actually enabled" |
175 |
175 |
176 self breakpointsDo:[:any | |
176 self breakpointsDo:[:any | |
177 any isEnabled ifTrue:[^ true]. |
177 any isEnabled ifTrue:[ |
|
178 any isTracepoint ifFalse:[ ^ true]. |
|
179 ]. |
|
180 ]. |
|
181 ^ false. |
|
182 ! |
|
183 |
|
184 hasEnabledTracepoints |
|
185 "true if any of my tracepoints is actually enabled" |
|
186 |
|
187 self breakpointsDo:[:any | |
|
188 any isEnabled ifTrue:[ |
|
189 any isTracepoint ifTrue:[ |
|
190 ^ true |
|
191 ]. |
|
192 ]. |
178 ]. |
193 ]. |
179 ^ false. |
194 ^ false. |
180 ! |
195 ! |
181 |
196 |
182 isMethodWithBreakpoints |
197 isMethodWithBreakpoints |