90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
|
;; (declare (uses keys))
;; (declare (uses ods))
;; (declare (uses client))
;; (declare (uses mt))
;;
;; (include "common_records.scm")
(include "db_records.scm")
(include "key_records.scm")
;; (include "run_records.scm")
(define *number-of-writes* 0)
(define *number-non-write-queries* 0)
;;======================================================================
|
|
|
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
|
;; (declare (uses keys))
;; (declare (uses ods))
;; (declare (uses client))
;; (declare (uses mt))
;;
;; (include "common_records.scm")
;; (include "db_records.scm")
(include "key_records.scm")
;; (include "run_records.scm")
(define *number-of-writes* 0)
(define *number-non-write-queries* 0)
;;======================================================================
|