Megatest

Check-in [673fea48bc]
Login
Overview
Comment:removed stray prints
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | v1.65-telemetry
Files: files | file ages | folders
SHA1: 673fea48bc65c30eaabeb9ee0c8ca30fff910d11
User & Date: bjbarcla on 2019-02-13 00:53:36
Other Links: branch diff | manifest | tags
Context
2019-02-13
18:27
added telemetry on rmt: and api: check-in: f5bedac3fb user: bjbarcla tags: v1.65-telemetry
00:53
removed stray prints check-in: 673fea48bc user: bjbarcla tags: v1.65-telemetry
00:51
added telemetry logging func common:telemetry-log check-in: 76975179f6 user: bjbarcla tags: v1.65-telemetry
Changes

Modified common.scm from [a50045152b] to [5eb5f0d32c].

3070
3071
3072
3073
3074
3075
3076
3077
3078
3079
                  (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)
            (print msg)
            (print (udp-send s msg))
            (udp-close-socket s))))))







<
|
|
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))))))