Differences From Artifact [a50045152b]:
- File common.scm — part of check-in [76975179f6] at 2019-02-13 00:51:37 on branch v1.65-telemetry — added telemetry logging func common:telemetry-log (user: bjbarcla, size: 119712) [annotate] [blame] [check-ins using]
To Artifact [5eb5f0d32c]:
- File common.scm — part of check-in [673fea48bc] at 2019-02-13 00:53:36 on branch v1.65-telemetry — removed stray prints (user: bjbarcla, size: 119678) [annotate] [blame] [check-ins using]
| ︙ | ︙ | |||
3070 3071 3072 3073 3074 3075 3076 |
(z3:encode-buffer
(with-output-to-string (lambda () (pp payload))))))
(msg (conc user":"host":"start":"
toppath":"payload-serialized))
(s (udp-open-socket)))
(udp-bind! s #f 0)
(udp-connect! s serverhost serverport)
| < | | | 3070 3071 3072 3073 3074 3075 3076 3077 3078 |
(z3:encode-buffer
(with-output-to-string (lambda () (pp payload))))))
(msg (conc user":"host":"start":"
toppath":"payload-serialized))
(s (udp-open-socket)))
(udp-bind! s #f 0)
(udp-connect! s serverhost serverport)
(udp-send s msg)
(udp-close-socket s))))))
|