Megatest

Diff
Login

Differences From Artifact [68692df2a4]:

To Artifact [207ddb413c]:


77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
		 0))

(if (args:get-arg "-h")
    (begin
      (print help)
      (exit)))

(if (not (setup-for-run))
    (begin
      (print "Failed to find megatest.config, exiting") 
      (exit 1)))

(define *db* #f) ;; (open-db))

(if (args:get-arg "-host")







|







77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
		 0))

(if (args:get-arg "-h")
    (begin
      (print help)
      (exit)))

(if (not (launch:setup-for-run))
    (begin
      (print "Failed to find megatest.config, exiting") 
      (exit 1)))

(define *db* #f) ;; (open-db))

(if (args:get-arg "-host")