use Test::More tests => 1;
use XML::Parser;
my $count = 0;
$parser = XML::Parser->new(ErrorContext => 2);
$parser->setHandlers(Comment => sub {$count++;});
$parser->parsefile('samples/REC-xml-19980210.xml');
is($count, 37);
use Test::More tests => 1;
use XML::Parser;
my $count = 0;
$parser = XML::Parser->new(ErrorContext => 2);
$parser->setHandlers(Comment => sub {$count++;});
$parser->parsefile('samples/REC-xml-19980210.xml');
is($count, 37);