You are viewing a plain text version of this content. The canonical link for it is here.
Posted to dev@perl.apache.org by Gerald Richter <ri...@ecos.de> on 2002/12/24 06:45:21 UTC
PATCH: mod_perl_mark_where crashs with Perl 5.8.0 in mod_perl 1.27
Hi,
while testing EMbperl with Perl 5.8.0 I had some trouble with
mod_perl_makr_where function. It fails sometimes and Apache terminates with
a segfault. Here is a patch against mod_perl 1.x cvs version that fixes the
problem.
Gerald
--- src/modules/perl/perl_util.c 2002-12-23 21:28:35.000000000 +0100
+++ /usr/psrc/build/mod_perl-1.27/src/modules/perl/perl_util.c 2002-12-23
21:27:03.000000000 +0100
@@ -852,7 +852,10 @@
name = perl_sv_name(sub);
sv_setpv(GvSV(CopFILEGV(curcop)), "");
- sv_catpvf(GvSV(CopFILEGV(curcop)), "%s subroutine `%_'", where, name);
+ if (name)
+ sv_catpvf(GvSV(CopFILEGV(curcop)), "%s subroutine `%_'", where,
name);
+ else
+ sv_catpvf(GvSV(CopFILEGV(curcop)), "%s subroutine <unknown>", where);
CopLINE_set(curcop, 1);
if(name)
-------------------------------------------------------------
Gerald Richter ecos electronic communication services gmbh
Internetconnect * Webserver/-design/-datenbanken * Consulting
Post: Tulpenstrasse 5 D-55276 Dienheim b. Mainz
E-Mail: richter@ecos.de Voice: +49 6133 925131
WWW: http://www.ecos.de Fax: +49 6133 925152
-------------------------------------------------------------
-------------------------------------------------------------
Gerald Richter ecos electronic communication services gmbh
Internetconnect * Webserver/-design/-datenbanken * Consulting
Post: Tulpenstrasse 5 D-55276 Dienheim b. Mainz
E-Mail: richter@ecos.de Voice: +49 6133 925131
WWW: http://www.ecos.de Fax: +49 6133 925152
-------------------------------------------------------------
---------------------------------------------------------------------
To unsubscribe, e-mail: dev-unsubscribe@perl.apache.org
For additional commands, e-mail: dev-help@perl.apache.org
Re: PATCH: mod_perl_mark_where crashs with Perl 5.8.0 in mod_perl
1.27
Posted by Stas Bekman <st...@stason.org>.
Gerald Richter wrote:
> Hi,
>
> while testing EMbperl with Perl 5.8.0 I had some trouble with
> mod_perl_makr_where function. It fails sometimes and Apache terminates with
> a segfault. Here is a patch against mod_perl 1.x cvs version that fixes the
> problem.
Thanks Gerald, applied with a small tweak.
__________________________________________________________________
Stas Bekman JAm_pH ------> Just Another mod_perl Hacker
http://stason.org/ mod_perl Guide ---> http://perl.apache.org
mailto:stas@stason.org http://use.perl.org http://apacheweek.com
http://modperlbook.org http://apache.org http://ticketmaster.com
---------------------------------------------------------------------
To unsubscribe, e-mail: dev-unsubscribe@perl.apache.org
For additional commands, e-mail: dev-help@perl.apache.org