Overview
Comment: | missing field in print |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | v1.65 |
Files: | files | file ages | folders |
SHA1: |
c7af076fb5441a6521944c470fcc7eb7 |
User & Date: | mrwellan on 2020-01-29 10:59:15 |
Other Links: | branch diff | manifest | tags |
Context
2020-01-29
| ||
13:39 | Updated version tag to 1.65/41 check-in: 070a358879 user: jmoon18 tags: v1.65, v1.6541 | |
10:59 | missing field in print check-in: c7af076fb5 user: mrwellan tags: v1.65 | |
10:24 | missing field in print check-in: fca9c83d51 user: mrwellan tags: v1.65 | |
Changes
Modified rmt.scm from [c7629a739b] to [aeb32064e1].
︙ | ︙ | |||
61 62 63 64 65 66 67 | (define (rmt:send-receive cmd rid params #!key (attemptnum 1)(area-dat #f)) ;; start attemptnum at 1 so the modulo below works as expected #;(common:telemetry-log (conc "rmt:"(->string cmd)) payload: `((rid . ,rid) (params . ,params))) (if (> attemptnum 2) | | | 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 | (define (rmt:send-receive cmd rid params #!key (attemptnum 1)(area-dat #f)) ;; start attemptnum at 1 so the modulo below works as expected #;(common:telemetry-log (conc "rmt:"(->string cmd)) payload: `((rid . ,rid) (params . ,params))) (if (> attemptnum 2) (debug:print 0 *default-log-port* "INFO: attemptnum in rmt:send-receive is " attemptnum)) (cond ((> attemptnum 2) (thread-sleep! 0.05)) ((> attemptnum 10) (thread-sleep! 0.5)) ((> attemptnum 20) (thread-sleep! 1))) |
︙ | ︙ |