Overview
| Comment: | Create the .testconfig files - so often needed for debug. However create them at the time the test starts to execute so that it is clear that all needed vars are available. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | v1.65 |
| Files: | files | file ages | folders |
| SHA1: |
52d24fd4b2ee1236eb33e6f58ebba63f |
| User & Date: | matt on 2017-11-12 22:50:47 |
| Other Links: | branch diff | manifest | tags |
Context
|
2017-11-13
| ||
| 21:45 | Added subrun launch dashboard button support using testconfig.subrun check-in: b2ea6646eb user: matt tags: v1.65 | |
|
2017-11-12
| ||
| 22:50 | Create the .testconfig files - so often needed for debug. However create them at the time the test starts to execute so that it is clear that all needed vars are available. check-in: 52d24fd4b2 user: matt tags: v1.65 | |
|
2017-11-08
| ||
| 14:07 | v1.6504 check-in: 244e676ac0 user: bjbarcla tags: v1.65, v1.6504 | |
Changes
Modified launch.scm from [be385d92a5] to [31b2766204].
| ︙ | ︙ | |||
769 770 771 772 773 774 775 776 777 778 779 780 781 782 | (not (file-execute-access? fullrunscript))) (system (conc "chmod ug+x " fullrunscript)))) ;; We are about to actually kick off the test ;; so this is a good place to remove the records for ;; any previous runs ;; (db:test-remove-steps db run-id testname itemdat) ;; (let* ((m (make-mutex)) (kill-job? #f) (exit-info (make-launch:einf pid: #t exit-status: #t exit-code: #t rollup-status: 0)) ;; pid exit-status exit-code (i.e. process was successfully run) rollup-status (job-thread #f) ;; (keep-going #t) (misc-flags (let ((ht (make-hash-table))) | > > > > > > | 769 770 771 772 773 774 775 776 777 778 779 780 781 782 783 784 785 786 787 788 | (not (file-execute-access? fullrunscript))) (system (conc "chmod ug+x " fullrunscript)))) ;; We are about to actually kick off the test ;; so this is a good place to remove the records for ;; any previous runs ;; (db:test-remove-steps db run-id testname itemdat) ;; now is also a good time to write the .testconfig file (let* ((tconfig-fname (conc work-area "/.testconfig")) (tconfig-tmpfile (conc tconfig-fname ".tmp")) (tconfig (tests:get-testconfig test-name item-path tconfigreg #t force-create: #t))) ;; 'return-procs))) (configf:write-alist tconfig tconfig-tmpfile) (file-move tconfig-tmpfile tconfig-fname #t)) ;; (let* ((m (make-mutex)) (kill-job? #f) (exit-info (make-launch:einf pid: #t exit-status: #t exit-code: #t rollup-status: 0)) ;; pid exit-status exit-code (i.e. process was successfully run) rollup-status (job-thread #f) ;; (keep-going #t) (misc-flags (let ((ht (make-hash-table))) |
| ︙ | ︙ |