27
28
29
30
31
32
33
34
35
36
37
38
39
40
|
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
|
+
|
;; (declare (uses csv-xml))
;; (declare (uses keysmod))
(declare (uses mtmod))
(declare (uses dbmod))
(declare (uses rmtmod))
(declare (uses launchmod))
(declare (uses processmod))
(declare (uses servermod))
(module archivemod
*
(import scheme
(prefix sqlite3 sqlite3:)
chicken.base
|
77
78
79
80
81
82
83
84
85
86
87
88
89
90
|
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
|
+
|
;; keysmod
mtmod
mtver
dbmod
rmtmod
launchmod
processmod
servermod
)
;; strftime('%m/%d/%Y %H:%M:%S','now','localtime')
;;
;; (use (prefix sqlite3 sqlite3:) srfi-1 posix regex regex-case srfi-69 format md5 message-digest srfi-18)
;;
|