The last line of the following script gives a segfault:

-- snip --
#!/usr/bin/perl -w

use XML::Xerces::DOMParse;

my $impl = XML::Xerces::DOM_DOMImplementation::getImplementation();
my $dataType = $impl->createDocumentType('foo', 'publicid.dtd', 'systemid.dtd');
my $doc = $impl->createDocument('', 'foo', $dataType);
$top = $doc->getDocumentElement;

$a = $doc->createTextNode('a');
$top->appendChild($a);
$top->replaceChild($a, undef);
-- snip --

Platform:
XML::Xerces version 1.7.0-1
Xerces-C++ version 1_7_0-linux7.2
Perl v5.6.1 from Redhat 7.3
GCC 2.96-110 from Redhat 7.3

Btw, the email address at XML-Xerces-1.7.0-1/docs/dtd/entities.ent is out of
date.


---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to