Megatest

Diff
Login

Differences From Artifact [dd887f94ec]:

To Artifact [ff050cf9d6]:


25
26
27
28
29
30
31
32
33
34
35
36
37
38
39

(declare (unit rpc-transport))

(declare (uses common))
(declare (uses db))
(declare (uses tests))
(declare (uses tasks)) ;; tasks are where stuff is maintained about what is running.

(include "common_records.scm")
(include "db_records.scm")

;; procstr is the name of the procedure to be called as a string
(define (rpc-transport:autoremote procstr params)
  (handle-exceptions
   exn







|







25
26
27
28
29
30
31
32
33
34
35
36
37
38
39

(declare (unit rpc-transport))

(declare (uses common))
(declare (uses db))
(declare (uses tests))
(declare (uses tasks)) ;; tasks are where stuff is maintained about what is running.
;; (use (prefix mtconfigf configf:))
(include "common_records.scm")
(include "db_records.scm")

;; procstr is the name of the procedure to be called as a string
(define (rpc-transport:autoremote procstr params)
  (handle-exceptions
   exn