Overview
| Comment: | minor reformatting |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | v1.7001-multi-db-rb01 |
| Files: | files | file ages | folders |
| SHA1: |
98e76b1aca86c40e7fdf0c522c9509ce |
| User & Date: | mrwellan on 2022-04-12 19:06:38 |
| Other Links: | branch diff | manifest | tags |
Context
|
2022-04-18
| ||
| 12:48 | avoided locking db when read-only, changed db:get-keys to use keys:config-get-fields, corrected formatting in list-servers check-in: b34c691e5f user: mmgraham tags: v1.7001-multi-db-rb01 | |
|
2022-04-12
| ||
| 19:06 | minor reformatting check-in: 98e76b1aca user: mrwellan tags: v1.7001-multi-db-rb01 | |
| 09:08 | Turn off db:multi-db-sync calls for now check-in: 7f0aa9d15d user: matt tags: v1.7001-multi-db-rb01 | |
Changes
Modified http-transport.scm from [4a4c885dbb] to [0925a1edaf].
| ︙ | ︙ | |||
505 506 507 508 509 510 511 |
(mutex-lock! *heartbeat-mutex*)
(set! last-access *db-last-access*)
(mutex-unlock! *heartbeat-mutex*)
(if (common:low-noise-print 120 (conc "server running on " iface ":" port))
(begin
(if (not *server-id*)
| | > | | | 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 |
(mutex-lock! *heartbeat-mutex*)
(set! last-access *db-last-access*)
(mutex-unlock! *heartbeat-mutex*)
(if (common:low-noise-print 120 (conc "server running on " iface ":" port))
(begin
(if (not *server-id*)
(set! *server-id* (server:mk-signature)))
(debug:print 0 *default-log-port* (current-seconds) (current-directory) (current-process-id) (argv))
(debug:print 0 *default-log-port* "SERVER STARTED: " iface ":" port " AT " (current-seconds) " server-id: " *server-id*)
(flush-output *default-log-port*)))
(if (common:low-noise-print 60 "dbstats")
(begin
(debug:print 0 *default-log-port* "Server stats:")
(db:print-current-query-stats)))
(let* ((hrs-since-start (/ (- (current-seconds) server-start-time) 3600)))
(cond
((and *server-run*
|
| ︙ | ︙ |