Skip to content
Permalink

Comparing changes

This is a direct comparison between two commits made in this repository or its related repositories. View the default comparison for this range or learn more about diff comparisons.

Open a pull request

Create a new pull request by comparing changes across two branches. If you need to, you can also . Learn more about diff comparisons here.
base repository: uniconproject/unicon
Failed to load repositories. Confirm that selected base ref is valid, then try again.
Loading
base: 632ff294e424adbab8ff67991084cc93f8e0a3f7
Choose a base ref
..
head repository: uniconproject/unicon
Failed to load repositories. Confirm that selected head ref is valid, then try again.
Loading
compare: 00c102aa595901ca8661221f24035ed922d14f0b
Choose a head ref
Showing with 6 additions and 3 deletions.
  1. +6 −3 uni/udb/udap/server.icn
9 changes: 6 additions & 3 deletions uni/udb/udap/server.icn
Original file line number Diff line number Diff line change
@@ -3,7 +3,7 @@ package udap
link ximage
link strings
import json
global seq, lastUdbCmd, waitingForTerminal, requestQueue
global seq, lastUdbCmd, waitingForTerminal, requestQueue, stop_debuggee_dapcom_communication

class Server(port, sock, communicator, shellProcessId, clientDetails, currentRequestBody, udbError)

@@ -510,7 +510,7 @@ class Server(port, sock, communicator, shellProcessId, clientDetails, currentReq
# Enable communication between dapcom and debugee.
method debuggee_dapcom_communication()
local resList, res
repeat {
while /stop_debuggee_dapcom_communication do {
if \communicator then {
resList := select([\communicator.tpSock, \communicator.dapcomSock]) | next
every res := !resList do {
@@ -534,6 +534,7 @@ class Server(port, sock, communicator, shellProcessId, clientDetails, currentReq
communicator.udb_input(&null, &null, 1)
kill(\shellProcessId, 9)
close(\sock)
stop_debuggee_dapcom_communication := "__true__"
startup()
end

@@ -550,6 +551,9 @@ class Server(port, sock, communicator, shellProcessId, clientDetails, currentReq

if /sock then stop("failed to connect to ",port)

stop_debuggee_dapcom_communication := &null
thread debuggee_dapcom_communication()

communicator := Communicator()

seq := 1
@@ -559,6 +563,5 @@ class Server(port, sock, communicator, shellProcessId, clientDetails, currentReq
end

initially
thread debuggee_dapcom_communication()
startup()
end