Marc Slagle wrote: [...]
[...]Thanks for the reply. Unfortunately the patch didn't resolve the problem. The backtrace does look somewhat different, its making some new calls before the segfault that it wasn't before. Numbers 4-13 show differently:
I don't have a test to reproduce the segfault, so I'm just shooting in the dark based on the core trace that you've kindly provided. Please revert the previous patch and try the new one:
Index: src/modules/perl/Table.xs
===================================================================
RCS file: /home/cvs/modperl/src/modules/perl/Table.xs,v
retrieving revision 1.10
diff -u -r1.10 Table.xs
--- src/modules/perl/Table.xs 23 May 2000 15:56:12 -0000 1.10
+++ src/modules/perl/Table.xs 10 Nov 2003 22:33:09 -0000
@@ -114,9 +114,10 @@
Apache__Table tab; CODE:
- tab = (Apache__Table)hvrv2table(self);
- if(SvROK(self) && SvTYPE(SvRV(self)) == SVt_PVHV)
+ if(self && SvROK(self) && SvTYPE(SvRV(self)) == SVt_PVHV) {
+ tab = (Apache__Table)hvrv2table(self);
safefree(tab);
+ }void FETCH(self, key)
I wonder why SvROK(NULL) returns true. It doesn't make any sense.
__________________________________________________________________ Stas Bekman JAm_pH ------> Just Another mod_perl Hacker http://stason.org/ mod_perl Guide ---> http://perl.apache.org mailto:[EMAIL PROTECTED] http://use.perl.org http://apacheweek.com http://modperlbook.org http://apache.org http://ticketmaster.com
-- Reporting bugs: http://perl.apache.org/bugs/ Mail list info: http://perl.apache.org/maillist/modperl.html
