EU::ParseXS: Silence undefined-value-in-addition warning
authorSteffen Mueller <smueller@cpan.org>
Tue, 13 Dec 2011 17:21:52 +0000 (18:21 +0100)
committerSteffen Mueller <smueller@cpan.org>
Tue, 13 Dec 2011 21:58:25 +0000 (22:58 +0100)
Nothing serious, just happened sometimes when reporting line numbers for
errors. But warning during build process.

dist/ExtUtils-ParseXS/lib/ExtUtils/ParseXS.pm

index 77b0978..f97f7c0 100644 (file)
@@ -1718,7 +1718,7 @@ sub fetch_para {
       my $tmapcode = join "", @tmaplines;
       my $tmap = ExtUtils::Typemaps->new(
         string => $tmapcode,
-        lineno_offset => $self->current_line_number()+1,
+        lineno_offset => ($self->current_line_number()||0)+1,
         fake_filename => $self->{filename},
       );
       $self->{typemap}->merge(typemap => $tmap, replace => 1);