Changes In Branch v1.63-no-wal Through [320ed4c8d5] Excluding Merge-Ins
This is equivalent to a diff from 738c84b513 to 320ed4c8d5
|
2017-03-01
| ||
| 15:36 | made wal mode optional check-in: 3dd33d4cce user: bjbarcla tags: v1.63 | |
| 15:35 | reversed polarity of walmode Closed-Leaf check-in: e6ea5fd0f3 user: bjbarcla tags: v1.63-no-wal | |
| 15:22 | test remove wal mode check-in: 320ed4c8d5 user: bjbarcla tags: v1.63-no-wal | |
|
2017-02-23
| ||
| 19:11 | Brought v1.64 up to date with v1.63 check-in: 995f56ced6 user: matt tags: v1.64 | |
| 16:41 | bumped version check-in: 738c84b513 user: bjbarcla tags: v1.63, v1.6309 | |
| 15:31 | various check-in: c5e3d3ecf6 user: bjbarcla tags: v1.63 | |
Modified db.scm from [08ea3af600] to [9d0175c3bb].
| ︙ | ︙ | |||
218 219 220 221 222 223 224 |
(if file-write ;; dir-writable
(let (;; (lock (obtain-dot-lock fname 1 5 10))
(db (sqlite3:open-database fname)))
(sqlite3:set-busy-handler! db (make-busy-timeout 136000))
;; (db:set-sync db)
(sqlite3:execute db "PRAGMA synchronous = 0;")
(if (not file-exists)
| | > | | 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 |
(if file-write ;; dir-writable
(let (;; (lock (obtain-dot-lock fname 1 5 10))
(db (sqlite3:open-database fname)))
(sqlite3:set-busy-handler! db (make-busy-timeout 136000))
;; (db:set-sync db)
(sqlite3:execute db "PRAGMA synchronous = 0;")
(if (not file-exists)
(begin
(if (and (not (configf:lookup *configdat* "setup" "no-wal"))
(string-match "^/tmp/.*" fname)) ;; this is a file in /tmp
(sqlite3:execute db "PRAGMA journal_mode=WAL;")
(print "Creating " fname " in NON-WAL mode."))
(initproc db)))
;; (release-dot-lock fname)
db)
(begin
(debug:print 2 *default-log-port* "WARNING: opening db in non-writable dir " fname)
|
| ︙ | ︙ |