Megatest

Check-in [9e6dfde44c]
Login
Overview
Comment:Removed db fixer
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | v1.6014_fix01
Files: files | file ages | folders
SHA1: 9e6dfde44c0614cbd222d2c19533b525e20642a4
User & Date: mrwellan on 2015-06-04 12:35:26
Other Links: branch diff | manifest | tags
Context
2015-06-04
22:56
Merged db fix in check-in: e65b212f1d user: matt tags: v1.60
12:35
Removed db fixer Closed-Leaf check-in: 9e6dfde44c user: mrwellan tags: v1.6014_fix01
2015-06-03
21:57
Changed scary error to the warning it should be, added ability to dump cmdinfo from a value passed in command line, added safety check on access to a testconfig dat in case it wasn't actually read successfully check-in: 50be72f3df user: mrwellan tags: v1.60
Changes

Modified db.scm from [165209a3bd] to [8eebff6d98].

529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
     ;; 
     ;;  NOPE: apply this same approach to all db files
     ;;
     (else ;; ((equal? fname "megatest.db") ;; this file can be regenerated if needed
      (handle-exceptions
       exn
       (begin
	 (db:move-and-recreate-db dbdat)
	 (if (> numtries 0)
	     (db:repair-db dbdat numtries: (- numtries 1))
	     #f)
	 (debug:print 0 "FATAL: file " dbpath " was found corrupted, an attempt to fix has been made but you must start over.")
	 (debug:print 0
		      "   check the following:\n"
		      "      1. full directories, look in ~/ /tmp and " dbdir "\n"







|







529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
     ;; 
     ;;  NOPE: apply this same approach to all db files
     ;;
     (else ;; ((equal? fname "megatest.db") ;; this file can be regenerated if needed
      (handle-exceptions
       exn
       (begin
	 ;; (db:move-and-recreate-db dbdat)
	 (if (> numtries 0)
	     (db:repair-db dbdat numtries: (- numtries 1))
	     #f)
	 (debug:print 0 "FATAL: file " dbpath " was found corrupted, an attempt to fix has been made but you must start over.")
	 (debug:print 0
		      "   check the following:\n"
		      "      1. full directories, look in ~/ /tmp and " dbdir "\n"