@@ -64,10 +64,11 @@ (import scheme chicken.base chicken.bitwise chicken.condition + ;; chicken.csi chicken.eval chicken.file chicken.file.posix chicken.format chicken.io @@ -2456,13 +2457,13 @@ (repl)) (else (begin ;; (set! *db* dbstruct) ;; (import extras) ;; might not be needed - ;; (import csi) + ;; (import chicken.csi) ;; (import readline) - (import apropos + #;(import apropos archivemod commonmod configfmod dbmod debugprint @@ -2474,13 +2475,11 @@ servermod tasksmod testsmod) (set-history-length! 300) - (load-history-from-file ".megatest_history") - (current-input-port (make-linenoise-port)) ;; (import (prefix sqlite3 sqlite3:)) ;; doesn't work ... ;; (if *use-new-readline* ;; (begin