db: fix sqlite3 #:use-place for raco exe
This commit is contained in:
parent
b839b03d4b
commit
0b3691691a
|
@ -4,6 +4,8 @@
|
|||
racket/place
|
||||
racket/promise
|
||||
racket/serialize
|
||||
racket/runtime-path
|
||||
(for-syntax (only-in racket/base quote))
|
||||
ffi/unsafe/atomic
|
||||
"interfaces.rkt"
|
||||
"prepared.rkt")
|
||||
|
@ -15,6 +17,9 @@
|
|||
(define (pchan-get chan)
|
||||
(deserialize (place-channel-get chan)))
|
||||
|
||||
(define-runtime-module-path-index _place-server
|
||||
'db/private/generic/place-server)
|
||||
|
||||
(define connection-server-channel
|
||||
(delay/sync
|
||||
(dynamic-place 'db/private/generic/place-server 'connection-server)))
|
||||
|
|
Loading…
Reference in New Issue
Block a user