Differences From Artifact [91f2f49c15]:
- File common.scm — part of check-in [c4fac28c5c] at 2019-02-13 19:03:23 on branch v1.65-telemetry — ensured telemetry logging does not happen if no mention in megatest.config (user: bjbarcla, size: 121524) [annotate] [blame] [check-ins using]
To Artifact [7fb4515436]:
- File common.scm — part of check-in [71819d884d] at 2019-02-20 16:21:27 on branch v1.65-telemetry — added loop to wait for testconfig to show up (combat nfs cache latency) ; added testconfig path derived from launch:execute payload to search path in case tests:get-all has gaps due to nfs cache latency (user: bjbarcla, size: 121525) [annotate] [blame] [check-ins using]
| ︙ | ︙ | |||
3112 3113 3114 3115 3116 3117 3118 |
(define *common:telemetry-log-state* 'closed-fail)
(debug:print-info 0 *default-log-port* "common-telemetry-log closure failure")
)
(begin
(define *common:telemetry-log-state* 'closed)
(udp-close-socket *common:telemetry-log-socket*)
(set! *common:telemetry-log-socket* #f)))))
| > | 3112 3113 3114 3115 3116 3117 3118 3119 |
(define *common:telemetry-log-state* 'closed-fail)
(debug:print-info 0 *default-log-port* "common-telemetry-log closure failure")
)
(begin
(define *common:telemetry-log-state* 'closed)
(udp-close-socket *common:telemetry-log-socket*)
(set! *common:telemetry-log-socket* #f)))))
|