Overview
| Comment: | Updated to try 150 times for send-receive before giving up |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | v1.65 |
| Files: | files | file ages | folders |
| SHA1: |
36d5ae8d9f42524366b6f3e076623525 |
| User & Date: | jmoon18 on 2020-02-05 15:39:11 |
| Other Links: | branch diff | manifest | tags |
Context
|
2020-02-05
| ||
| 15:41 | Updated version tag to 1.65/42 check-in: e37d51cfa5 user: jmoon18 tags: v1.65, v1.6542 | |
| 15:39 | Updated to try 150 times for send-receive before giving up check-in: 36d5ae8d9f user: jmoon18 tags: v1.65 | |
| 14:36 | Fixed improper create directory for the .sysdata location check-in: 7e2466117d user: mrwellan tags: v1.65 | |
Changes
Modified rmt.scm from [aeb32064e1] to [fec600860e].
| ︙ | ︙ | |||
110 111 112 113 114 115 116 |
(thread-sleep! 0.1) ;; since we shouldn't get here, delay a little
(remote-hh-dat-set! runremote (common:get-homehost)))
;;(print "BB> readonly-mode is "readonly-mode" dbfile is "dbfile)
(cond
;;DOT EXIT;
;;DOT MUTEXLOCK -> EXIT [label="> 15 attempts"]; {rank=same "case 1" "EXIT" }
| | | | 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 |
(thread-sleep! 0.1) ;; since we shouldn't get here, delay a little
(remote-hh-dat-set! runremote (common:get-homehost)))
;;(print "BB> readonly-mode is "readonly-mode" dbfile is "dbfile)
(cond
;;DOT EXIT;
;;DOT MUTEXLOCK -> EXIT [label="> 15 attempts"]; {rank=same "case 1" "EXIT" }
;; give up if more than 150 attempts
((> attemptnum 150)
(debug:print 0 *default-log-port* "ERROR: 15 tries to start/connect to server. Giving up.")
(exit 1))
;;DOT CASE2 [label="local\nreadonly\nquery"];
;;DOT MUTEXLOCK -> CASE2; {rank=same "case 2" CASE2}
;;DOT CASE2 -> "rmt:open-qry-close-locally";
;; readonly mode, read request- handle it - case 2
|
| ︙ | ︙ |