QB64/QB64-PE
QB64/QB64-PE
1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-07-03 11:11:20 +00:00
Code Issues Releases Wiki Activity

Allows toggling breakpoints while running.

Browse source
This commit is contained in:
Fellippe Heitor 2021-07-16 00:02:56 -03:00
parent 16b2c82b2f
commit b748f7b209
1 changed files with 10 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
source/utilities/vwatch.bm
View file

@ -65,7 +65,16 @@ SUB vwatch (linenumber AS LONG)
lastLine = linenumber
GOSUB GetCommand
IF cmd$ = "break" THEN pauseMode = -1: stepOver = 0: cmd$ = ""
SELECT CASE cmd$
CASE "break"
pauseMode = -1
stepOver = 0
cmd$ = ""
CASE "set breakpoint"
vwatch_breakpoints(CVL(value$)) = -1
CASE "clear breakpoint"
vwatch_breakpoints(CVL(value$)) = 0
END SELECT
IF stepOver = -1 AND vwatch_sublevel > startLevel AND vwatch_breakpoints(linenumber) = 0 THEN
EXIT SUB