Megatest

Check-in [c44c180c40]
Login
Overview
Comment:fixed paren mismatch
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | v1.65-choosesync
Files: files | file ages | folders
SHA1: c44c180c4002c5b21e4460113e46123b93f1787b
User & Date: bjbarcla on 2019-06-14 10:52:04
Other Links: branch diff | manifest | tags
Context
2019-06-14
12:19
ensured nfs_mode and tmp_mode execute on each dbopen check-in: 56f4d2f160 user: bjbarcla tags: v1.65-choosesync
10:52
fixed paren mismatch check-in: c44c180c40 user: bjbarcla tags: v1.65-choosesync
10:49
enabled choice of syncer method from server/sync-method in config; brute-force-sync or delta-sync check-in: 85b79f3b43 user: bjbarcla tags: v1.65-choosesync
Changes

Modified common.scm from [057b8de7e8] to [9c0e4e970f].

934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
                (cond
                 ((equal? syncer "brute-force-sync")
                  (server:writable-watchdog-bruteforce dbstruct))
                 ((equal? syncer "delta-sync")
                  (server:writable-watchdog-deltasync dbstruct))
                 (else
                  (debug:print-error 0 *default-log-port* "Unknown server/sync-method specified ("syncer") - valid values are brute-force-sync and delta-sync.")
                  (exit 1))
                 (debug:print 1 *default-log-port* "INFO: ["(common:human-time)"] Syncer started (method="syncer")")))))
	    (debug:print-info 13 *default-log-port* "watchdog done."))
	  (debug:print-info 13 *default-log-port* "no need for watchdog on non-homehost"))))


(define (std-exit-procedure)
  ;;(common:telemetry-log-close)
  (on-exit (lambda () 0))







|
|







934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
                (cond
                 ((equal? syncer "brute-force-sync")
                  (server:writable-watchdog-bruteforce dbstruct))
                 ((equal? syncer "delta-sync")
                  (server:writable-watchdog-deltasync dbstruct))
                 (else
                  (debug:print-error 0 *default-log-port* "Unknown server/sync-method specified ("syncer") - valid values are brute-force-sync and delta-sync.")
                  (exit 1)))
                (debug:print 1 *default-log-port* "INFO: ["(common:human-time)"] Syncer started (method="syncer")"))))
	    (debug:print-info 13 *default-log-port* "watchdog done."))
	  (debug:print-info 13 *default-log-port* "no need for watchdog on non-homehost"))))


(define (std-exit-procedure)
  ;;(common:telemetry-log-close)
  (on-exit (lambda () 0))