Differences From Artifact [0be6593524]:
- File dashboard.scm — part of check-in [2c8647e6a0] at 2012-02-25 22:32:12 on branch trunk — Most db: routines enabled for rpc (user: matt, size: 23979) [annotate] [blame] [check-ins using]
To Artifact [4b685b7cb0]:
- File dashboard.scm — part of check-in [35d5a09470] at 2012-02-26 07:47:52 on branch trunk — Broke connection to server out of open-db (user: matt, size: 24006) [annotate] [blame] [check-ins using]
| ︙ | |||
74 75 76 77 78 79 80 81 82 83 84 85 86 87 | 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 | + |
(if (not (setup-for-run))
(begin
(print "Failed to find megatest.config, exiting")
(exit 1)))
(define *db* (open-db))
(server:client-setup *db*)
(define toplevel #f)
(define dlg #f)
(define max-test-num 0)
(define *keys* (rdb:get-keys *db*))
(define *dbkeys* (map (lambda (x)(vector-ref x 0))
(append *keys* (list (vector "runname" "blah")))))
|
| ︙ |