19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
|
;;======================================================================
(declare (unit commonmod))
(module commonmod
*
(import scheme chicken data-structures extras files ports)
(import (prefix sqlite3 sqlite3:) posix typed-records srfi-18 srfi-69
md5 message-digest
regex regex-case
srfi-1
format
matchable
srfi-13)
|
|
>
>
|
>
|
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
|
;;======================================================================
(declare (unit commonmod))
(module commonmod
*
;;(import scheme chicken data-structures extras files ports)
(import scheme chicken)
(use data-structures extras files ports)
;;(import (prefix sqlite3 sqlite3:) posix typed-records srfi-18 srfi-69
(use (prefix sqlite3 sqlite3:) posix typed-records srfi-18 srfi-69
md5 message-digest
regex regex-case
srfi-1
format
matchable
srfi-13)
|