1
1
Fork 0
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:
FellippeHeitor 2021-07-14 00:08:20 -03:00
parent 99e31018c5
commit ca11243112

View file

@ -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