Megatest

;;
;;======================================================================

;;======================================================================
;; Database access
;;======================================================================

(import
 (srfi 18)
(require-extension (srfi 18) extras tcp)
(use sqlite3 srfi-1 posix regex regex-case srfi-69 csv-xml s11n md5 message-digest base64)
(import (prefix sqlite3 sqlite3:))
(import (prefix base64 base64:))
 ;; extras tcp)

 sqlite3 srfi-1
 ;; posix regex regex-case srfi-69 csv-xml s11n md5 message-digest base64

 (prefix sqlite3 sqlite3:)
 (prefix base64 base64:))

(declare (unit tdb))
(declare (uses common))
(declare (uses keys))
(declare (uses ods))
(declare (uses client))
(declare (uses mt))