Megatest

Differences From Artifact [50a75d414c]:

• File tests/simplerun/thebeginning.scm — part of check-in [b34c691e5f] at 2022-04-18 12:48:42 on branch v1.7001-multi-db-rb01 — avoided locking db when read-only, changed db:get-keys to use keys:config-get-fields, corrected formatting in list-servers (user: mmgraham, size: 2058) [annotate] [blame] [check-ins using]

To Artifact [33fade09b9]:

• File tests/simplerun/thebeginning.scm — part of check-in [7e90cd0862] at 2022-05-07 20:14:26 on branch v1.7001-multi-db-unknown — unknown changes (user: matt, size: 2058) [annotate] [blame] [check-ins using] [more...]

51
52
53
54
55
56
57
58
59

;; *************** db.scm tests ****************


(define thisdbdat (db:open-db dbstruct #f))
(test #f #t (dbr:dbdat? thisdbdat))

(test #f #t (dbr:dbdat? (db:get-db dbstruct #f)))
(test #f #t (dbr:dbdat? (db:get-db dbstruct 1)))

|
|

51
52
53
54
55
56
57
58
59

;; *************** db.scm tests ****************


(define thisdbdat (db:open-db dbstruct #f))
(test #f #t (dbr:dbdat? thisdbdat))

(test #f #t (dbr:subdb? (db:get-db dbstruct #f)))
(test #f #t (dbr:subdb? (db:get-db dbstruct 1)))