Differences From Artifact [03085d1877]:
- File db.scm — part of check-in [82c6f56ccd] at 2013-04-29 23:40:07 on branch v1.54 — Cleanup/minor refactor, removed unneeded delays (user: matt, size: 95990) [annotate] [blame] [check-ins using] [more...]
To Artifact [7321dcb71d]:
- File db.scm — part of check-in [2976b292d1] at 2013-05-01 17:50:14 on branch refactor — Added correct sqlite finalizer for db wrapper when passed a proc (user: mrwellan, size: 96019) [annotate] [blame] [check-ins using]
| ︙ | |||
87 88 89 90 91 92 93 | 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 | + + - + |
(let* ((db (if idb
(if (procedure? idb)
(idb)
idb)
(open-db)))
(res #f))
(set! res (apply proc db params))
(if (or (not idb)
(procedure? idb))
|
| ︙ |