Overview
| Comment: | Adjusted date format to match TeamCity requirements |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | v1.64 |
| Files: | files | file ages | folders |
| SHA1: |
ee77e3a1b46b3bdf27462c4423c59c0a |
| User & Date: | mrwellan on 2017-08-08 13:36:46 |
| Other Links: | branch diff | manifest | tags |
Context
|
2017-08-08
| ||
| 16:59 | Use process-pid for flowId for teamcity, fall back to testname check-in: 2890f3b693 user: mrwellan tags: v1.64 | |
| 13:36 | Adjusted date format to match TeamCity requirements check-in: ee77e3a1b4 user: mrwellan tags: v1.64 | |
| 10:28 | Typo fix check-in: c5d3ea8ae6 user: mrwellan tags: v1.64 | |
Changes
Modified tcmt.scm from [0a9f62fa41] to [d2f01548ef].
| ︙ | ︙ | |||
79 80 81 82 83 84 85 | (startp (testdat-start-printed tdat)) (endp (testdat-end-printed tdat)) (etime (testdat-event-time tdat)) (overall (case state ((RUNNING) state) ((COMPLETED) state) (else 'UNK))) | | | 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 |
(startp (testdat-start-printed tdat))
(endp (testdat-end-printed tdat))
(etime (testdat-event-time tdat))
(overall (case state
((RUNNING) state)
((COMPLETED) state)
(else 'UNK)))
(tstmp (conc " timestamp='" (time->string (seconds->local-time etime) "%FT%T.000") "'")))
(case overall
((RUNNING)
(if (not startp)
(begin
(print "##teamcity[testStarted " tcname flowid tstmp "]")
(testdat-start-printed-set! tdat #t))))
((COMPLETED)
|
| ︙ | ︙ |