Kaydet (Commit) ee02d6eb authored tarafından Stephan Bergmann's avatar Stephan Bergmann

Added more detailed information to smoketest failure result string.

üst 7d64f8ac
......@@ -448,7 +448,11 @@ Function RecordTestCaseStatus( nAction as Integer, bState as Boolean, sFailureAn
gErrorState (nStatusType, nAction) = nState
If ( nState = cLogFalse ) And ( sFailureAnnotation <> "" ) Then
gTestCaseAnnotations( nStatusType, nAction ) = gTestCaseAnnotations( nStatusType, nAction ) + sFailureAnnotation + chr(13)
if gTestCaseAnnotations(nStatusType, nAction) <> "" then
gTestCaseAnnotations(nStatusType, nAction) = _
gTestCaseAnnotations(nStatusType, nAction) & "; "
end if
gTestCaseAnnotations( nStatusType, nAction ) = gTestCaseAnnotations( nStatusType, nAction ) + sFailureAnnotation
End If
RecordTestCaseStatus = bState
......@@ -721,6 +725,10 @@ Function StartTestWithDefaultOptions
result = result & action(j)
end if
end if
if gTestCaseAnnotations(i, j) <> "" then
result = result & "(" & _
gTestCaseAnnotations(i, j) & ")"
end if
end if
next j
next i
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment