Overview
Comment: | Removed call to rmt:update-db-stats, it was causing a problem in waiver processing |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | v1.60 |
Files: | files | file ages | folders |
SHA1: |
27c316be9dc0cb6ce20fda38cb71f84c |
User & Date: | matt on 2015-04-28 23:43:21 |
Other Links: | branch diff | manifest | tags |
Context
2015-04-29
| ||
23:41 | Added skip rundelay feature per discussion with Jeff Moon. check-in: 6824ad8f72 user: matt tags: v1.60 | |
2015-04-28
| ||
23:43 | Removed call to rmt:update-db-stats, it was causing a problem in waiver processing check-in: 27c316be9d user: matt tags: v1.60 | |
2015-04-24
| ||
08:48 | Added comment re. hostname fail check-in: e94161ccb3 user: matt tags: v1.60 | |
Changes
Modified rmt.scm from [e57d73e7b7] to [a135a02f0b].
︙ | ︙ | |||
245 246 247 248 249 250 251 | (debug:print 0 "ERROR: local query failed. Trying again.") (thread-sleep! (/ (random 5000) 1000)) ;; some random delay (rmt:open-qry-close-locally cmd run-id params remretries: (- remretries 1))) (begin (debug:print 0 "ERROR: too many retries in rmt:open-qry-close-locally, giving up") #f)) (begin | | | 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 | (debug:print 0 "ERROR: local query failed. Trying again.") (thread-sleep! (/ (random 5000) 1000)) ;; some random delay (rmt:open-qry-close-locally cmd run-id params remretries: (- remretries 1))) (begin (debug:print 0 "ERROR: too many retries in rmt:open-qry-close-locally, giving up") #f)) (begin ;; (rmt:update-db-stats run-id cmd params duration) ;; mark this run as dirty if this was a write (if (not (member cmd api:read-only-queries)) (let ((start-time (current-seconds))) (mutex-lock! *db-multi-sync-mutex*) ;; (if (not (hash-table-ref/default *db-local-sync* run-id #f)) ;; just set it every time. Is a write more expensive than a read and does it matter? (hash-table-set! *db-local-sync* (or run-id 0) start-time) ;; the oldest "write" |
︙ | ︙ |