Index: dbfile.scm
==================================================================
--- dbfile.scm
+++ dbfile.scm
@@ -42,10 +42,11 @@
 	;; debugprint
 	)
 
 (import debugprint)
 (define num-run-dbs (make-parameter 10))     ;; number of db's in .megatest
+(define keep-age-param (make-parameter 10))
 
 ;;======================================================================
 ;;  R E C O R D S
 ;;======================================================================