@@ -54,10 +54,11 @@
 					       (string->number (args:get-arg "-override-timeout"))
 					       136000))))
 	(handle-exceptions
 	 exn
 	 (begin
+	   (print-call-chain (current-error-port))
 	   (debug:print 2 "ERROR: problem accessing test db " work-area ", you probably should clean and re-run this test"
 			((condition-property-accessor 'exn 'message) exn))
 	   (set! db (sqlite3:open-database ":memory:")) ;; open an in-memory db to allow readonly access 
 	   (set! dbexists #f)) ;; must force re-creation of tables, more tom-foolery
 	 (set! db (sqlite3:open-database dbpath)))
@@ -71,10 +72,11 @@
 	(debug:print-info 11 "open-test-db END (sucessful)" work-area)
 	;; now let's test that everything is correct
 	(handle-exceptions
 	 exn
 	 (begin
+	   (print-call-chain (current-error-port))
 	   (debug:print 0 "ERROR: problem accessing test db " work-area ", you probably should clean and re-run this test or remove the file " 
 			dbpath ".\n  "
 			((condition-property-accessor 'exn 'message) exn))
 	   #f)
 	 ;; Is there a cheaper single line operation that will check for existance of a table