@@ -250,11 +250,13 @@
               (debug:print-info 0 "Starting to shutdown the server.")
               ;; need to delete only *my* server entry (future use)
               (set! *time-to-exit* #t)
               (tasks:server-deregister-self tdb (get-host-name))
               (thread-sleep! 1)
-              (debug:print-info 0 "Max cached queries was " *max-cache-size*)
+              (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 " (/ *writes-total-delay* *number-of-writes*) " ms")
               (debug:print-info 0 "Server shutdown complete. Exiting")
               (exit)))))))
 
 ;; all routes though here end in exit ...
 (define (http-transport:launch)