Differences From Artifact [88b05b876a]:
- File dbmod.scm — part of check-in [5651f9dd0e] at 2023-05-31 05:20:23 on branch v1.80 — Bump the debug print level to 4 for skipping sync message (user: matt, size: 35004) [annotate] [blame] [check-ins using]
To Artifact [72dc45b2c8]:
- File dbmod.scm — part of check-in [ee2dabe551] at 2023-08-20 20:33:15 on branch v1.80-adjutant — Merged in adjutant code from v1.65 (user: matt, size: 35006) [annotate] [blame] [check-ins using] [more...]
| ︙ | ︙ | |||
847 848 849 850 851 852 853 854 |
(sdb (dbmod:safely-open-db src-db init-proc #t))
(ddb (dbmod:safely-open-db dest-db init-proc d-wr))
(res (dbmod:sync-gasket tables last-update sdb ddb dest-db 'todisk keys)))
(sqlite3:finalize! sdb)
(sqlite3:finalize! ddb)
res)))
#f))
)
| > > | 847 848 849 850 851 852 853 854 855 856 |
(sdb (dbmod:safely-open-db src-db init-proc #t))
(ddb (dbmod:safely-open-db dest-db init-proc d-wr))
(res (dbmod:sync-gasket tables last-update sdb ddb dest-db 'todisk keys)))
(sqlite3:finalize! sdb)
(sqlite3:finalize! ddb)
res)))
#f))
)
|