paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-12-03 03:08:10 +01:00
Code Issues Packages Projects Releases Wiki Activity

+ public property TXMLResultsWriter.Document

Browse Source 
git-svn-id: trunk@6311 -
This commit is contained in:
Vincent Snijders 2007-02-02 22:56:15 +00:00
parent 5ea26c5f5f
commit d1f8bcc26f
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
fcl/fpcunit/xmltestreport.pp
View File

@ -61,6 +61,8 @@ type
procedure StartTest(ATest: TTest); override;
procedure EndTest(ATest: TTest); override;
procedure WriteResult(aResult: TTestResult); override;
{ A public property to the internal XML document }
property Document: TXMLDocument read FDoc;
end;