Overview
| Comment: | Check that xml junit stuff is there before opperating on the signature |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | v1.65 |
| Files: | files | file ages | folders |
| SHA1: |
136696768614ae0361367ca9b0a8814f |
| User & Date: | mrwellan on 2020-06-09 08:24:28 |
| Other Links: | branch diff | manifest | tags |
Context
|
2020-06-09
| ||
| 12:31 | Updated megatest version to 1.6552 check-in: 34682762d7 user: mmgraham tags: v1.65 | |
| 08:24 | Check that xml junit stuff is there before opperating on the signature check-in: 1366967686 user: mrwellan tags: v1.65 | |
|
2020-06-05
| ||
| 15:37 | changed megatest verion to 51 check-in: dac2533ee3 user: mmgraham tags: v1.65, v1.6551 | |
Changes
Modified runs.scm from [32b7aa1de8] to [87241d67d4].
| ︙ | ︙ | |||
2733 2734 2735 2736 2737 2738 2739 |
(define doc-template
'(*TOP*
(*PI* xml "version='1.0'")
(testsuite)))
(define (runs:update-junit-test-reporter-xml run-id)
(let* (
| | | | | | | | > > | 2733 2734 2735 2736 2737 2738 2739 2740 2741 2742 2743 2744 2745 2746 2747 2748 2749 2750 2751 2752 2753 2754 2755 2756 2757 2758 2759 |
(define doc-template
'(*TOP*
(*PI* xml "version='1.0'")
(testsuite)))
(define (runs:update-junit-test-reporter-xml run-id)
(let* (
(junit-test-reporter (configf:lookup *configdat* "runs" "junit-test-reporter-xml"))
(junit-test-report-dir (configf:lookup *configdat* "runs" "junit-test-report-dir"))
(xml-dir (if (and junit-test-reporter (equal? junit-test-reporter "yes" ))
(if junit-test-report-dir
junit-test-report-dir
(conc (getenv "MT_LINKTREE") "/" (getenv "MT_TARGET") "/" (getenv "MT_RUNNAME")))
#f))
(xml-ts-name (if xml-dir
(conc (getenv "MT_TESTSUITENAME")"."(string-translate (getenv "MT_TARGET") "/" ".") "." (getenv "MT_RUNNAME"))
#f))
(keyname (if xml-ts-name
(common:get-signature xml-ts-name)
#f))
(xml-path (if xml-dir
(conc xml-dir "/" keyname ".xml")
#f))
(test-data (if xml-dir
(rmt:get-tests-for-run run-id "%" '() '() ;; run-id testpatt states statuses
#f #f ;; offset limit
|
| ︙ | ︙ |