+ elsif ($l =~ /: parser error :\s+(.*)$/) {
+ my $err = $1;
+ $errors{$err} = $errmsg;
+ if ($errmsg =~ /Entity\s+'([a-zA-Z0-9]+)'\s+not defined/) {
+ my $entity = $1;
+ if (! defined($entities{$entity})) {
+ $entities{$entity} = 1;
+ print "$errmsg\n";
+ }
+ }
+ else {
+ print "$l\n";
+ die("Unknown error $l");
+ }
+ }