@@ -32,15 +32,18 @@
 (declare (uses keys))
 (declare (uses ods))
 (declare (uses clientmod))
 (declare (uses mt))
 (declare (uses db))
+(declare (uses debugprint))
 
 (include "common_records.scm")
 (include "db_records.scm")
 (include "key_records.scm")
 (include "run_records.scm")
+
+(import debugprint)
 
 ;;======================================================================
 ;;
 ;; T E S T   D A T A B A S E S
 ;;