We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 8cab2a5 commit a1aa566Copy full SHA for a1aa566
ReportBuildDict2Junit.tcl
@@ -155,13 +155,15 @@ proc CreateJunitTestSuiteSummaries {TestDict TestSuiteSummary } {
155
} else {
156
set ElapsedTime missing
157
}
158
- if { $TestStatus ne "ANALYZE_FAILED" } {
+ if { $TestStatus eq "ANALYZE_FAILED" } {
159
set TestStatus FAILED
160
161
if {[dict exists $TestCase Reason]} {
162
set Reason [dict exists $TestCase Reason]
163
+ } elseif {$TestStatus ne "PASSED"} { ; # SKIPPED has a reason
164
+ set Reason "Test Case Error"
165
- set Reason "Test Case Error"
166
+ set Reason "Test Case Passed" ; # does not print
167
168
169
set TestStatus "FAILED"
0 commit comments