Changeset 37560 in project


Ignore:
Timestamp:
04/25/19 02:42:31 (5 months ago)
Author:
evhan
Message:

debugger-protocol: Avoid TCP timeout when waiting for events

File:
1 edited

Legend:

Unmodified
Added
Removed
  • release/4/debugger-protocol/trunk/debugger-protocol.scm

    r33212 r37560  
    8787    (newline out)
    8888    (flush-output out)
    89     (let ((evt (read in)))
    90       (process-event con evt '()))))
     89    (parameterize ((tcp-read-timeout #f))
     90      (let ((evt (read in)))
     91        (process-event con evt '())))))
    9192
    9293(define (process-event con evt pdata)
Note: See TracChangeset for help on using the changeset viewer.