76
77
78
79
80
81
82
83
84
85
86
87
88
89
|
;; MORE RUNS
(test "get runs" #t (let* ((runs (rmt:get-runs "%" #f #f '()))
(header (vector-ref runs 0))
(data (vector-ref runs 1)))
(and (list? header)
(list? data)
(vector? (car data)))))
(inmem-test 1 1)
;;======================================================================
;; D B
;;======================================================================
|
>
|
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
|
;; MORE RUNS
(test "get runs" #t (let* ((runs (rmt:get-runs "%" #f #f '()))
(header (vector-ref runs 0))
(data (vector-ref runs 1)))
(and (list? header)
(list? data)
(vector? (car data)))))
(inmem-test 1 1)
;;======================================================================
;; D B
;;======================================================================
|