mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-06-26 17:10:38 +00:00
Fixes "double pause" in $DEBUG mode.
When a breakpoint was reached, it'd be necessary to hit F8 twice to step into the next line.
This commit is contained in:
parent
99e31018c5
commit
ca11243112
|
@ -6103,9 +6103,11 @@ SUB DebugMode
|
|||
|
||||
IF startPaused THEN
|
||||
cmd$ = "break"
|
||||
PauseMode = -1
|
||||
setStatusMessage 2, "Paused.", 2
|
||||
ELSE
|
||||
cmd$ = "run"
|
||||
PauseMode = 0
|
||||
setStatusMessage 2, "Running...", 10
|
||||
END IF
|
||||
GOSUB SendCommand
|
||||
|
@ -6176,6 +6178,7 @@ SUB DebugMode
|
|||
ELSE
|
||||
setStatusMessage 2, "Paused.", 2
|
||||
END IF
|
||||
PauseMode = -1
|
||||
CASE "error"
|
||||
clearStatusWindow 1
|
||||
setStatusMessage 1, "Debug session aborted.", 7
|
||||
|
|
Loading…
Reference in a new issue