@@ -16,11 +16,28 @@
 ;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
 ;;
 
 ;;  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)
+(import
+ (prefix sqlite3 sqlite3:) srfi-1
+ ;; posix
+ regex regex-case srfi-69 format md5 message-digest srfi-18
+ srfi-13
+ 
+ chicken.file
+ chicken.io
+ chicken.pathname
+ chicken.port
+ chicken.pretty-print
+ chicken.process
+ chicken.string
+ chicken.time
+ chicken.time.posix
+ chicken.condition
+
+ )
 
 (declare (unit archive))
 (declare (uses db))
 (declare (uses common))