Overview
| Comment: | Oops. Forgot to clean out the cache after processing the cached writes |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | v1.80-cached-writes |
| Files: | files | file ages | folders |
| SHA1: |
b564f3f99c33a4a6137b8f256029ea71 |
| User & Date: | matt on 2023-10-13 20:41:12 |
| Other Links: | branch diff | manifest | tags |
Context
|
2023-10-13
| ||
| 20:42 | Merged in cached writes check-in: cdc7397963 user: matt tags: v1.80-matt-fixme | |
| 20:41 | Oops. Forgot to clean out the cache after processing the cached writes Leaf check-in: b564f3f99c user: matt tags: v1.80-cached-writes | |
|
2023-10-12
| ||
| 21:04 | Cached writes for steps working correctly check-in: eee1dce5a3 user: matt tags: v1.80-cached-writes | |
Changes
Modified db.scm from [43baddb3c1] to [eca878b6ec].
| ︙ | ︙ | |||
4294 4295 4296 4297 4298 4299 4300 | db (lambda () (for-each (lambda (queued-write) (match queued-write ((proc params)(apply proc dbstruct params)) (else (assert #f "BAD queued-write")))) | | > | 4294 4295 4296 4297 4298 4299 4300 4301 4302 4303 4304 4305 4306 4307 4308 4309 |
db
(lambda ()
(for-each
(lambda (queued-write)
(match queued-write
((proc params)(apply proc dbstruct params))
(else (assert #f "BAD queued-write"))))
writes-list)))
(hash-table-delete! *cached-writes-queues* hkey))))))
(set! *cached-writes-flag* #f)
(mutex-unlock! *cached-writes-mutex*))
;; (db:extract-ods-file db "outputfile.ods" '(("sysname" "%")("fsname" "%")("datapath" "%")) "%")
;;======================================================================
;; moving watch dogs here due to dependencies
|
| ︙ | ︙ |