QB64/qb64
QB64/qb64
1
1
Fork 0
mirror of https://github.com/QB64Official/qb64.git synced 2024-07-05 00:40:26 +00:00
Code Releases Wiki Activity

Detects when the debuggee closes (connection lost).

Browse source
This commit is contained in:
FellippeHeitor 2021-07-31 17:44:58 -03:00
parent 4c141a3514
commit 0f82c6320f
1 changed files with 16 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

16
source/ide/ide_methods.bas
View file

@ -7428,6 +7428,14 @@ SUB DebugMode
GetCommand:
GET #client&, , temp$
IF _CONNECTED(client&) = 0 THEN
clearStatusWindow 0
setStatusMessage 1, "Debug session aborted.", 7
setStatusMessage 2, "Disconnected.", 2
WHILE _MOUSEINPUT: WEND
_KEYCLEAR
EXIT SUB
END IF
buffer$ = buffer$ + temp$
IF INSTR(buffer$, endc$) THEN
@ -7448,6 +7456,14 @@ SUB DebugMode
SendCommand:
cmd$ = cmd$ + endc$
PUT #client&, , cmd$
IF _CONNECTED(client&) = 0 THEN
clearStatusWindow 0
setStatusMessage 1, "Debug session aborted.", 7
setStatusMessage 2, "Disconnected.", 2
WHILE _MOUSEINPUT: WEND
_KEYCLEAR
EXIT SUB
END IF
cmd$ = ""
RETURN