Overview
| Comment: | Added loading of ~/.megatestrc if it exists. Intended use is debugging |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | refactor |
| Files: | files | file ages | folders |
| SHA1: |
63540eb98d69e0d5aacc27f4e38663f4 |
| User & Date: | matt on 2013-05-05 10:04:47 |
| Other Links: | branch diff | manifest | tags |
Context
|
2013-05-05
| ||
| 14:17 | First pass at refactoring keys handling. Support for :keyfield value on commandline removed check-in: 80a09c8cc4 user: matt tags: refactor | |
| 10:04 | Added loading of ~/.megatestrc if it exists. Intended use is debugging check-in: 63540eb98d user: matt tags: refactor | |
| 00:43 | Added MT_RUN_AREA_HOME for -show-runconfigs check-in: 2d38067787 user: matt tags: v1.54, v1.5421 | |
Changes
Modified megatest.scm from [e8e5a17f3e] to [d858326613].
| ︙ | ︙ | |||
29 30 31 32 33 34 35 36 37 38 39 40 41 42 | (define *db* #f) ;; this is only for the repl, do not use in general!!!! (include "common_records.scm") (include "key_records.scm") (include "db_records.scm") (include "megatest-fossil-hash.scm") ;; (use trace dot-locking) ;; (trace ;; tests:match ;; runs:run-tests) ;; db:teststep-set-status! ;; db:open-test-db-by-test-id | > > > > | 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 |
(define *db* #f) ;; this is only for the repl, do not use in general!!!!
(include "common_records.scm")
(include "key_records.scm")
(include "db_records.scm")
(include "megatest-fossil-hash.scm")
(let ((debugcontrolf (conc (get-environment-variable "HOME") "/.megatestrc")))
(if (file-exists? debugcontrolf)
(load debugcontrolf)))
;; (use trace dot-locking)
;; (trace
;; tests:match
;; runs:run-tests)
;; db:teststep-set-status!
;; db:open-test-db-by-test-id
|
| ︙ | ︙ |