db: fix sqlite3 custodian/finalizer registration
See racket/racket#3841.
This commit is contained in:
parent
64b834c9c0
commit
64f0c8a7ed
|
@ -31,11 +31,10 @@
|
|||
busy-retry-delay)
|
||||
(super-new)
|
||||
|
||||
(register-finalizer this shutdown-connection)
|
||||
|
||||
(define -db db)
|
||||
(define saved-tx-status #f) ;; set by with-lock, only valid while locked
|
||||
(define creg (register-custodian-shutdown this shutdown-connection))
|
||||
(define creg (register-custodian-shutdown this shutdown-connection #:ordered? #t))
|
||||
(register-finalizer this shutdown-connection)
|
||||
|
||||
(sqlite3_extended_result_codes db #t)
|
||||
|
||||
|
|
Loading…
Reference in New Issue
Block a user