@@ -26,11 +26,11 @@
 (declare (uses debugprint))
 (declare (uses mtargs))
 (declare (uses mtmod))
 
 (module dbmod
-	*
+()
 	
 (import scheme)
 	
 (cond-expand
  (chicken-4
@@ -79,11 +79,11 @@
 	dbfile
 	debugprint
 	mtmod
 	)
 
-(include "common_records.scm")
+;; (include "common_records.scm")
 ;; (include "db_records.scm")
 ;; (include "key_records.scm")
 (include "run_records.scm")
 
 (define *number-of-writes* 0)