24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
|
;; dbstruct vector containing all the relevant dbs like main.db, megatest.db, run.db etc
(declare (unit db))
(module db
(
*
)
(import scheme posix chicken data-structures ports)
(use (prefix sqlite3 sqlite3:)
(srfi 18) extras tcp stack srfi-1 posix regex regex-case srfi-69
csv-xml s11n md5 message-digest base64 format dot-locking z3
|
<
>
|
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
|
;; dbstruct vector containing all the relevant dbs like main.db, megatest.db, run.db etc
(declare (unit db))
(module db
(
db:setup
)
(import scheme posix chicken data-structures ports)
(use (prefix sqlite3 sqlite3:)
(srfi 18) extras tcp stack srfi-1 posix regex regex-case srfi-69
csv-xml s11n md5 message-digest base64 format dot-locking z3
|