[fpc-pascal] writing xml to output crashes

[Vincent Snijders]

Hi,

The following program crashes if compiled with fpc 2.0.4. It works correctly if fpc 
2.1.1 is used. Should I create a bug report or is the 2.0.x series not maintained 
anymore?

program xmloutput;

{$mode objfpc}{$H+}

uses
   xmlwrite, dom
   { add your units here };

var
   XMLDoc : TXMLDocument;

begin
   XMLDoc := TXMLDocument.Create;
   WriteXMLFile(XMLDoc, output);
   XMLDoc.Free;
end.

An unhandled exception occurred at $00404369 :
EAccessViolation : Access violation
   $00404369  SMALLFORWARDMOVE_3,  line 160 of D:/lazarus/source/fpc/2.0/rtl/i386
/fastmove.inc
   $00407DEC  TTEXTXMLWRITER__WRITE,  line 116 of XMLWrite.pp
   $00407F7B  TXMLWRITER__WRTSTR,  line 147 of XMLWrite.pp
   $00408786  TXMLWRITER__VISITDOCUMENT,  line 363 of XMLWrite.pp
   $00407F24  TXMLWRITER__WRITENODE,  line 247 of XMLWrite.pp
   $00407D80  TTEXTXMLWRITER__WRITEXML,  line 431 of XMLWrite.pp
   $00407D33  WRITEXMLFILE,  line 456 of XMLWrite.pp
   $00401070  main,  line 14 of xmloutput.pas


Vincent