29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
|
(declare (uses dbfile))
(declare (uses tasks))
(declare (uses debugprint))
(import dbmod)
(import dbfile)
(import rmtmod
debugprint)
(define *db-write-mutexes* (make-hash-table))
;; These are called by the server on recipt of /api calls
;; - keep it simple, only return the actual result of the call, i.e. no meta info here
;;
;; - returns #( flag result )
|
|
>
|
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
|
(declare (uses dbfile))
(declare (uses tasks))
(declare (uses debugprint))
(import dbmod)
(import dbfile)
(import rmtmod
;; debugprint
)
(define *db-write-mutexes* (make-hash-table))
;; These are called by the server on recipt of /api calls
;; - keep it simple, only return the actual result of the call, i.e. no meta info here
;;
;; - returns #( flag result )
|