Index: http-transport.scm
==================================================================
--- http-transport.scm
+++ http-transport.scm
@@ -466,38 +466,39 @@
 	    ;;
 	    (loop 0 server-state))
 	  (http-transport:server-shutdown server-id port)))))
 
 (define (http-transport:server-shutdown server-id port)
-  (debug:print-info 0 "Starting to shutdown the server.")
-  ;; need to delete only *my* server entry (future use)
-  (set! *time-to-exit* #t)
-  (if *inmemdb* (db:sync-touched *inmemdb* *run-id* force-sync: #t))
-  ;;
-  ;; start_shutdown
-  ;;
-  (tasks:server-set-state! (db:delay-if-busy tdbdat) server-id "shutting-down")
-  (portlogger:open-run-close portlogger:set-port port "released")
-  (thread-sleep! 5)
-  (debug:print-info 0 "Max cached queries was    " *max-cache-size*)
-  (debug:print-info 0 "Number of cached writes   " *number-of-writes*)
-  (debug:print-info 0 "Average cached write time "
-		    (if (eq? *number-of-writes* 0)
-			"n/a (no writes)"
-			(/ *writes-total-delay*
-			   *number-of-writes*))
-		    " ms")
-  (debug:print-info 0 "Number non-cached queries "  *number-non-write-queries*)
-  (debug:print-info 0 "Average non-cached time   "
-		    (if (eq? *number-non-write-queries* 0)
-			"n/a (no queries)"
-			(/ *total-non-write-delay* 
-			   *number-non-write-queries*))
-		    " ms")
-  (debug:print-info 0 "Server shutdown complete. Exiting")
-  (tasks:server-delete-record (db:delay-if-busy tdbdat) server-id " http-transport:keep-running")
-  (exit))
+  (let ((tdbdat (tasks:open-db)))
+    (debug:print-info 0 "Starting to shutdown the server.")
+    ;; need to delete only *my* server entry (future use)
+    (set! *time-to-exit* #t)
+    (if *inmemdb* (db:sync-touched *inmemdb* *run-id* force-sync: #t))
+    ;;
+    ;; start_shutdown
+    ;;
+    (tasks:server-set-state! (db:delay-if-busy tdbdat) server-id "shutting-down")
+    (portlogger:open-run-close portlogger:set-port port "released")
+    (thread-sleep! 5)
+    (debug:print-info 0 "Max cached queries was    " *max-cache-size*)
+    (debug:print-info 0 "Number of cached writes   " *number-of-writes*)
+    (debug:print-info 0 "Average cached write time "
+		      (if (eq? *number-of-writes* 0)
+			  "n/a (no writes)"
+			  (/ *writes-total-delay*
+			     *number-of-writes*))
+		      " ms")
+    (debug:print-info 0 "Number non-cached queries "  *number-non-write-queries*)
+    (debug:print-info 0 "Average non-cached time   "
+		      (if (eq? *number-non-write-queries* 0)
+			  "n/a (no queries)"
+			  (/ *total-non-write-delay* 
+			     *number-non-write-queries*))
+		      " ms")
+    (debug:print-info 0 "Server shutdown complete. Exiting")
+    (tasks:server-delete-record (db:delay-if-busy tdbdat) server-id " http-transport:keep-running")
+    (exit)))
 
 ;; all routes though here end in exit ...
 ;;
 ;; start_server? 
 ;;

Index: megatest.scm
==================================================================
--- megatest.scm
+++ megatest.scm
@@ -325,17 +325,18 @@
 (define (std-exit-procedure)
   (rmt:print-db-stats)
   (let ((run-ids (hash-table-keys *db-local-sync*)))
     (if (not (null? run-ids))
 	(db:multi-db-sync run-ids 'new2old)))
-  (if *dbstruct-db* (db:close-all *dbstruct-db*))
-  (if *megatest-db* (begin
-		      (sqlite3:interrupt! *megatest-db*)
-		      (sqlite3:finalize! *megatest-db* #t)))
-  (if *task-db*     (let ((db (vector-ref *task-db* 0)))
-		      (sqlite3:interrupt! db)
-		      (sqlite3:finalize! db #t))))
+  ;; (if *dbstruct-db* (db:close-all *dbstruct-db*))
+  ;; (if *megatest-db* (begin
+  ;;       	      (sqlite3:interrupt! *megatest-db*)
+  ;;       	      (sqlite3:finalize! *megatest-db* #t)))
+  ;; (if *task-db*     (let ((db (vector-ref *task-db* 0)))
+  ;;       	      (sqlite3:interrupt! db)
+  ;;       	      (sqlite3:finalize! db #t))))
+  )
 
 (define (std-signal-handler signum)
   (signal-mask! signum)
   (debug:print 0 "ERROR: Received signal " signum " exiting promptly")
   (std-exit-procedure)

Index: tests/fullrun/megatest.config
==================================================================
--- tests/fullrun/megatest.config
+++ tests/fullrun/megatest.config
@@ -61,11 +61,11 @@
 # or for hard links
 
 # testcopycmd cp --remove-destination -rlv TEST_SRC_PATH/. TEST_TARG_PATH/.
 
 # FULL or 2, NORMAL or 1, OFF or 0
-synchronous 2
+synchronous 0
 # Throttle roughly scales the db access milliseconds to seconds delay
 throttle 0.2
 # Max retries allows megatest to re-check that a tests status has changed
 # as tests can have transient FAIL status occasionally
 maxretries 20