Megatest

Check-in [37d16ef457]
Login
Overview
Comment:Add fix to start server after 15 attempts
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | v1.65 | v1.6543 | v1.6544
Files: files | file ages | folders
SHA1: 37d16ef457b144b699e5d0456a8110e697b0e892
User & Date: jmoon18 on 2020-03-02 09:17:26
Other Links: branch diff | manifest | tags
Context
2020-03-03
13:25
Added full example testconfig with ezsteps, scripts section etc. check-in: 0193399945 user: mrwellan tags: v1.65
2020-03-02
13:00
Sync'd with v1.65 check-in: 462317ce59 user: mrwellan tags: v1.65-newview
09:17
Add fix to start server after 15 attempts check-in: 37d16ef457 user: jmoon18 tags: v1.65, v1.6543, v1.6544
2020-02-28
16:34
Speculative fix for zero cpus problem. check-in: 9529e99c78 user: mrwellan tags: v1.65
Changes

Modified rmt.scm from [8c67a7dcdf] to [63fb23d391].

68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
      (debug:print 0 *default-log-port* "INFO: attemptnum in rmt:send-receive is " attemptnum))
    
  (cond
   ((> attemptnum 2) (thread-sleep! 0.05))
   ((> attemptnum 10) (thread-sleep! 0.5))
   ((> attemptnum 20) (thread-sleep! 1)))
  (if (and (> attemptnum 5) (= 0 (modulo attemptnum 15)))  
    (begin (rmt:start-server rid) (thread-sleep! 3))) 
  
  
  ;;DOT digraph megatest_state_status {
  ;;DOT   ranksep=0;
  ;;DOT   // rankdir=LR;
  ;;DOT   node [shape="box"];
  ;;DOT "rmt:send-receive" -> MUTEXLOCK;







|







68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
      (debug:print 0 *default-log-port* "INFO: attemptnum in rmt:send-receive is " attemptnum))
    
  (cond
   ((> attemptnum 2) (thread-sleep! 0.05))
   ((> attemptnum 10) (thread-sleep! 0.5))
   ((> attemptnum 20) (thread-sleep! 1)))
  (if (and (> attemptnum 5) (= 0 (modulo attemptnum 15)))  
    (begin (server:run *toppath*) (thread-sleep! 3))) 
  
  
  ;;DOT digraph megatest_state_status {
  ;;DOT   ranksep=0;
  ;;DOT   // rankdir=LR;
  ;;DOT   node [shape="box"];
  ;;DOT "rmt:send-receive" -> MUTEXLOCK;