Differences From Artifact [0b46126861]:
- File rmtmod.scm — part of check-in [8c1d89ef36] at 2021-05-18 22:20:04 on branch v1.6584-ck5 — main.db starting again. (user: matt, size: 108821) [annotate] [blame] [check-ins using]
To Artifact [c678d93a8b]:
- File rmtmod.scm — part of check-in [db05dadd93] at 2021-05-20 05:41:42 on branch v1.6584-ck5 — wip (user: matt, size: 108827) [annotate] [blame] [check-ins using]
| ︙ | |||
279 280 281 282 283 284 285 286 287 288 289 290 291 292 | 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 | + | (case res ((server-started) (if (> num-tries 0) (begin (thread-sleep! 2) (rmt:general-open-connection remote apath dbname num-tries: (- num-tries 1))) 'failed)) (else res)))))) ;;====================================================================== ;; Defaults to current area ;; |
| ︙ |