Index: launch.scm
==================================================================
--- launch.scm
+++ launch.scm
@@ -813,15 +813,24 @@
 	      (if (not (equal? item-path ""))
 		  (tests:summarize-items run-id test-id test-name #f))
 	      (tests:summarize-test run-id test-id)  ;; don't force - just update if no
 	      (rmt:update-run-stats run-id (rmt:get-raw-run-stats run-id)))
 	    (mutex-unlock! m)
+
+            (launch:end-of-run-check run-id)
+
+            
 	    (debug:print 2 *default-log-port* "Output from running " fullrunscript ", pid " (launch:einf-pid exit-info) " in work area " 
 			 work-area ":\n====\n exit code " (launch:einf-exit-code exit-info) "\n" "====\n")
 	    (if (not (launch:einf-exit-status exit-info))
 		(exit 4))))
         )))
+
+(define (launch:end-of-run-check run-id)
+  (debug:print 0 *default-log-port* "end-of-run-check would go here for run-id="run-id)
+  #f)
+
 
 ;; DO NOT USE - caching of configs is handled in launch:setup now.
 ;;
 (define (launch:cache-config)
   ;; if we have a linktree and -runtests and -target and the directory exists dump the config