Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Set current-database-environment to #f when it is closed |
|---|---|
| Downloads: | Tarball | ZIP archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA3-256: |
9f4cd15298639df169397bccc69fb453 |
| User & Date: | murphy 2018-08-20 18:09:29.762 |
Context
|
2018-08-20
| ||
| 21:13 | Conversions between databases and association lists check-in: 6ef9d5e1d4 user: murphy tags: trunk | |
| 18:09 | Set current-database-environment to #f when it is closed check-in: 9f4cd15298 user: murphy tags: trunk | |
| 16:35 | Initial binding of cursor operations check-in: 85c0637f63 user: murphy tags: trunk | |
Changes
Changes to lmdb.scm.
| ︙ | ︙ | |||
218 219 220 221 222 223 224 |
env path (fxior flags no-tls) mode)))
(current-database-environment env))))
(define (close-database-environment #!optional [env (current-database-environment)])
((foreign-lambda
void "mdb_env_close"
nonnull-database-environment)
| | > > > | 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 |
env path (fxior flags no-tls) mode)))
(current-database-environment env))))
(define (close-database-environment #!optional [env (current-database-environment)])
((foreign-lambda
void "mdb_env_close"
nonnull-database-environment)
env)
(when (equal? env (current-database-environment))
(current-database-environment #f))
(void))
(define-foreign-enum-argconvert (database-environment-copy-flags unsigned-int)
[#:compact "MDB_CP_COMPACT"])
(define (copy-database-environment path . args)
(let-keys+flags copy-database-environment args
([0 env (current-database-environment)])
|
| ︙ | ︙ |