Skip to content
Open
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
8 changes: 7 additions & 1 deletion DFUnit/AppSrc/DFUnit/Reporting/Reporters/XMLReporter.pkg
Original file line number Diff line number Diff line change
Expand Up @@ -63,7 +63,7 @@ Class cDFUnitXMLReporter is a cDFUnitResultCollector_Mixin

Move (SizeOfArray(oTestResult.aFailedAssertions) - 1) to iMaxIndex
For iIterator from 0 to iMaxIndex
Move (oTestResult.aFailedAssertions[iMaxIndex].sAssertMessage + XML_NEWLINE_REPLACE) to sMessage
Move (oTestResult.aFailedAssertions[iIterator].sAssertMessage + XML_NEWLINE_REPLACE) to sMessage

Move oTestResult.aFailedAssertions[iIterator].asMessages to asMessages
Move (SizeOfArray(asMessages) - 1) to iMaxMessageIndex
Expand Down Expand Up @@ -129,6 +129,12 @@ Class cDFUnitXMLReporter is a cDFUnitResultCollector_Mixin
Send Write '</testsuites>'

Close_Output channel iChannel
Send Seq_Release_Channel iChannel
// Restore the current output channel to the default (channel 1). After
// Close_Output the global "current output channel" still points at the
// channel we just released; when a console run exits via ExitProcess the
// runtime dereferences that dangling pointer and intermittently crashes.
Append_Output Channel 1
Set piChannel to -1
End_Procedure

Expand Down