Overview
| Comment: | fixed problem where megatest stack dumped when megatest.config is not found |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | v1.64 |
| Files: | files | file ages | folders |
| SHA1: |
d23960bc33afa500aa515fbdebe612fd |
| User & Date: | bjbarcla on 2017-04-24 18:25:26 |
| Other Links: | branch diff | manifest | tags |
Context
|
2017-04-25
| ||
| 00:12 | configf - keep reference to empty sections. NOTE: This breaks several tests but is still correct behavior check-in: 3129220de0 user: matt tags: v1.64, config-section-fix | |
|
2017-04-24
| ||
| 22:00 | Quick hacks to make dashboard layout more efficient check-in: 61826e149f user: matt tags: v1.64-dashboard | |
| 18:25 | fixed problem where megatest stack dumped when megatest.config is not found check-in: d23960bc33 user: bjbarcla tags: v1.64 | |
|
2017-04-19
| ||
| 16:59 | merged potential fix for signature 12 problem (1 in 200 issue with test crashing <this should not happen> where *configdat* is broken after (launch:setup) ) check-in: dd090afbe4 user: bjbarcla tags: v1.64, v1.6407 | |
Changes
Modified launch.scm from [f64b41effe] to [a8ba6b6a12].
| ︙ | ︙ | |||
929 930 931 932 933 934 935 |
(else
;;(BB> "launch:setup-body -- cond branch 3 - else")
(let* ((cfgdat (find-and-read-config
(or (args:get-arg "-config") "megatest.config")
environ-patt: "env-override"
given-toppath: (get-environment-variable "MT_RUN_AREA_HOME")
pathenvvar: "MT_RUN_AREA_HOME")))
| | > | 929 930 931 932 933 934 935 936 937 938 939 940 941 942 943 944 |
(else
;;(BB> "launch:setup-body -- cond branch 3 - else")
(let* ((cfgdat (find-and-read-config
(or (args:get-arg "-config") "megatest.config")
environ-patt: "env-override"
given-toppath: (get-environment-variable "MT_RUN_AREA_HOME")
pathenvvar: "MT_RUN_AREA_HOME")))
(if (and cfgdat (list? cfgdat) (> (length cfgdat) 0) (hash-table? (car cfgdat)))
(let* ((toppath (or (get-environment-variable "MT_RUN_AREA_HOME")(cadr cfgdat)))
(rdat (read-config (conc toppath ;; convert this to use runconfig:read!
"/runconfigs.config") *runconfigdat* #t sections: sections)))
(set! *configinfo* cfgdat)
(set! *configdat* (car cfgdat))
(set! *runconfigdat* rdat)
(set! *toppath* toppath)
|
| ︙ | ︙ |