You are viewing a plain text version of this content. The canonical link for it is here.
Posted to embperl-cvs@perl.apache.org by ri...@apache.org on 2003/03/30 16:12:15 UTC
cvs commit: embperl Changes.pod Makefile.PL eputil.c
richter 2003/03/30 06:12:14
Modified: . Changes.pod Makefile.PL eputil.c
Log:
fix sigsegv on sparc
Revision Changes Path
1.205 +1 -0 embperl/Changes.pod
Index: Changes.pod
===================================================================
RCS file: /home/cvs/embperl/Changes.pod,v
retrieving revision 1.204
retrieving revision 1.205
diff -u -r1.204 -r1.205
--- Changes.pod 3 Mar 2003 18:38:46 -0000 1.204
+++ Changes.pod 30 Mar 2003 14:12:14 -0000 1.205
@@ -71,6 +71,7 @@
- Added tests for epform and subreq.
- Added patch from David Hull, which let you specify the status-code
when doing a redirect via %http_headers_out.
+ - Fix SIGSEGV on sparc in cleanup. Patch from Angus Lees.
=head1 2.0b8 (BETA) 25. Juni 2002
1.62 +2 -2 embperl/Makefile.PL
Index: Makefile.PL
===================================================================
RCS file: /home/cvs/embperl/Makefile.PL,v
retrieving revision 1.61
retrieving revision 1.62
diff -u -r1.61 -r1.62
--- Makefile.PL 27 Feb 2003 07:05:32 -0000 1.61
+++ Makefile.PL 30 Mar 2003 14:12:14 -0000 1.62
@@ -540,7 +540,7 @@
}
}
}
-else
+elsif ($apache_src ne '' && -X "\"$apache_src/bin/httpd\"")
{
my @vers = start ("\"$apache_src/bin/httpd\" -v") ;
1.34 +3 -1 embperl/eputil.c
Index: eputil.c
===================================================================
RCS file: /home/cvs/embperl/eputil.c,v
retrieving revision 1.33
retrieving revision 1.34
diff -u -r1.33 -r1.34
--- eputil.c 27 Feb 2003 07:48:08 -0000 1.33
+++ eputil.c 30 Mar 2003 14:12:14 -0000 1.34
@@ -1151,8 +1151,10 @@
pCV = perl_get_cv (s, 0) ;
if (pCV)
{
+ dSP ;
if (bDebug)
lprintf (r -> pApp, "[%d]CUP: Call &%s::CLEANUP\n", r -> pThread -> nPid, sPackage) ;
+ PUSHMARK(sp) ;
perl_call_sv ((SV *)pCV, G_EVAL | G_NOARGS | G_DISCARD) ;
pSVErr = ERRSV ;
if (SvTRUE (pSVErr))
---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-cvs-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-cvs-help@perl.apache.org