diff --git a/runtime.pl b/runtime.pl index 36a2e5475..0e77174b3 100644 --- a/runtime.pl +++ b/runtime.pl @@ -164,15 +164,15 @@ sub c_params { my $autogenerated= "/***** Autogenerated from $prefix.in; changes will be overwritten *****/\n\n"; -my $base_source_line = 1; +my $basesource_line = 1; my $source_line = 1; print $autogenerated; -print "#line $base_source_line \"$srcTemplateDir/runtimebase.in\"\n"; +print "#line $basesource_line \"$srcTemplateDir/runtimebase.in\"\n"; my $baseheader = ; print $baseheader; -my $basesource_line += ($baseheader =~ tr/\n//);; +$basesource_line += ($baseheader =~ tr/\n//);; my $basesource_type_line = $basesource_line; print "#line $source_line \"$srcTemplateDir/$prefix.in\"\n"; @@ -187,7 +187,7 @@ sub c_params { my $types = <>; $source_line += ($types =~ tr/\n//);; -print "#line $base_source_line \"$srcTemplateDir/runtimebase.in\"\n"; +print "#line $basesource_line \"$srcTemplateDir/runtimebase.in\"\n"; $baseheader = ; print $baseheader; $basesource_line += ($baseheader =~ tr/\n//);;