equal
deleted
inserted
replaced
2140 lineNr == -1 ifTrue:[ |
2140 lineNr == -1 ifTrue:[ |
2141 steppedContextLineno := skipLineNr := nil. |
2141 steppedContextLineno := skipLineNr := nil. |
2142 ]. |
2142 ]. |
2143 |
2143 |
2144 stepHow == #nextOut ifTrue:[ |
2144 stepHow == #nextOut ifTrue:[ |
2145 steppedContext := con methodHome. |
2145 steppedContext := con home. |
2146 ] ifFalse:[ |
2146 ] ifFalse:[ |
2147 steppedContext := con. |
2147 steppedContext := con. |
2148 ]. |
2148 ]. |
2149 wrapperContext := nil. |
2149 wrapperContext := nil. |
2150 |
2150 |
2176 "/ not reached |
2176 "/ not reached |
2177 'DebugView [warning]: step failed' errorPrintCR. |
2177 'DebugView [warning]: step failed' errorPrintCR. |
2178 stepButton turnOff. nextButton turnOff. sendButton turnOff. |
2178 stepButton turnOff. nextButton turnOff. sendButton turnOff. |
2179 ] |
2179 ] |
2180 |
2180 |
2181 "Modified: 3.3.1997 / 21:44:30 / cg" |
2181 "Modified: 3.3.1997 / 22:36:14 / cg" |
2182 ! |
2182 ! |
2183 |
2183 |
2184 doStop |
2184 doStop |
2185 "stop the process (if its running, otherwise this is a no-op)" |
2185 "stop the process (if its running, otherwise this is a no-op)" |
2186 |
2186 |
3402 ! ! |
3402 ! ! |
3403 |
3403 |
3404 !DebugView class methodsFor:'documentation'! |
3404 !DebugView class methodsFor:'documentation'! |
3405 |
3405 |
3406 version |
3406 version |
3407 ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.141 1997-03-03 20:45:15 cg Exp $' |
3407 ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.142 1997-03-03 21:37:04 cg Exp $' |
3408 ! ! |
3408 ! ! |