Changes In Branch v1.65-telemetry-sideeye Excluding Merge-Ins
This is equivalent to a diff from 3797a8bab4 to 48c73df9dc
2019-02-20
| ||
16:21 | 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 check-in: 71819d884d user: bjbarcla tags: v1.65-telemetry | |
2019-02-19
| ||
12:06 | dead end Closed-Leaf check-in: 48c73df9dc user: bjbarcla tags: v1.65-telemetry-sideeye | |
2019-02-15
| ||
18:03 | wip check-in: e9f1734405 user: bjbarcla tags: v1.65-telemetry-sideeye | |
2019-02-14
| ||
15:04 | pulled in docs/manual changes check-in: 3797a8bab4 user: bjbarcla tags: v1.65-telemetry | |
15:04 | allowed for nfs latency when reading testconfig in launch:execute check-in: d75080c8ce user: bjbarcla tags: v1.65-telemetry | |
15:02 | merged in trunk to get docs/manual updates check-in: 73cb4bf58e user: bjbarcla tags: v1.65 | |
Modified common.scm from [91f2f49c15] to [df6616f1cb].
︙ | |||
160 161 162 163 164 165 166 167 168 169 170 171 172 173 | 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 | + | (define *transport-type* 'http) ;; override with [server] transport http|rpc|nmsg (define *runremote* #f) ;; if set up for server communication this will hold <host port> ;; (define *max-cache-size* 0) (define *logged-in-clients* (make-hash-table)) (define *server-id* #f) (define *server-info* #f) ;; good candidate for easily convert to non-global (define *time-to-exit* #f) (define *time-to-exit-cleanup-thunk-list* '()) (define *server-run* #t) (define *run-id* #f) (define *server-kind-run* (make-hash-table)) (define *home-host* #f) ;; (define *total-non-write-delay* 0) (define *heartbeat-mutex* (make-mutex)) (define *api-process-request-count* 0) |
︙ | |||
888 889 890 891 892 893 894 895 896 897 898 899 900 901 | 889 890 891 892 893 894 895 896 897 898 899 900 901 902 903 904 905 906 907 908 909 910 | + + + + + + + + | (debug:print-info 13 *default-log-port* "watchdog done.")) (debug:print-info 13 *default-log-port* "no need for watchdog on non-homehost")))) (define (std-exit-procedure) ;;(common:telemetry-log-close) (on-exit (lambda () 0)) (for-each (lambda (thunk) (handle-exceptions exn (debug:print 0 *default-log-port* "WARNING: exception while running on-exit thunk item") (thunk))) *time-to-exit-cleanup-thunk-list*) ;;(debug:print-info 13 *default-log-port* "std-exit-procedure called; *time-to-exit*="*time-to-exit*) (let ((no-hurry (if *time-to-exit* ;; hurry up #f (begin (set! *time-to-exit* #t) #t)))) (debug:print-info 4 *default-log-port* "starting exit process, finalizing databases.") |
︙ |
Added docs/manual/debug_techniques.txt version [9c5fdaf595].