Front page | perl.perl5.porters |
Postings from November 2000
The generated boot_* headers are wrong. Pickier compiler, such as KAI
C++ will refuse to compile the resulting perlmain.
Here is a patch:
*** minimod.pl 2000/09/05 16:13:26 5.1
--- minimod.pl 2000/11/09 09:57:54 5.1.4.1
***************
*** 59,65 ****
my($mname, $cname);
($mname = $pname) =~ s!/!::!g;
($cname = $pname) =~ s!/!__!g;
! print "EXTERN_C void boot_${cname} (CV* cv);\n";
}
my ($tail1,$tail2) = ( $tail =~ /\A(.*\n)(\s*\}.*)\Z/s );
--- 59,65 ----
my($mname, $cname);
($mname = $pname) =~ s!/!::!g;
($cname = $pname) =~ s!/!__!g;
! print "EXTERN_C void boot_${cname} (pTHX_ CV* cv);\n";
}
my ($tail1,$tail2) = ( $tail =~ /\A(.*\n)(\s*\}.*)\Z/s
);
Thread Next