Index: megatest-version.scm
==================================================================
--- megatest-version.scm
+++ megatest-version.scm
@@ -18,6 +18,6 @@
 ;; Always use two or four digit decimal
 ;; 1.01, 1.02...1.10,1.11,1.1101 ... 1.99,2.00..
 
 (declare (unit megatest-version))
 
-(define megatest-version 1.6542)
+(define megatest-version 1.6543)

Index: rmt.scm
==================================================================
--- rmt.scm
+++ rmt.scm
@@ -69,10 +69,12 @@
     
   (cond
    ((> attemptnum 2) (thread-sleep! 0.05))
    ((> attemptnum 10) (thread-sleep! 0.5))
    ((> attemptnum 20) (thread-sleep! 1)))
+  (if (and (> attemptnum 5) (= 0 (moduleo attemptnum 15)))  
+    (begin (rmt:start-server rid) (thread-sleep! 3))) 
   
   
   ;;DOT digraph megatest_state_status {
   ;;DOT   ranksep=0;
   ;;DOT   // rankdir=LR;
@@ -114,11 +116,11 @@
     (cond
      ;;DOT EXIT;
      ;;DOT MUTEXLOCK -> EXIT [label="> 15 attempts"]; {rank=same "case 1" "EXIT" }
      ;; give up if more than 150 attempts
      ((> attemptnum 150)
-      (debug:print 0 *default-log-port* "ERROR: 15 tries to start/connect to server. Giving up.")
+      (debug:print 0 *default-log-port* "ERROR: 150 tries to start/connect to server. Giving up.")
       (exit 1))
 
      ;;DOT CASE2 [label="local\nreadonly\nquery"];
      ;;DOT MUTEXLOCK -> CASE2; {rank=same "case 2" CASE2}
      ;;DOT CASE2 -> "rmt:open-qry-close-locally";