Index: src/modules/perl/modperl_bucket.c
===================================================================
RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_bucket.c,v
retrieving revision 1.5
diff -u -r1.5 modperl_bucket.c
--- src/modules/perl/modperl_bucket.c 2001/08/21 16:46:56 1.5
+++ src/modules/perl/modperl_bucket.c 2001/08/27 08:30:45
@@ -88,7 +88,7 @@
MP_TRACE_f(MP_FUNC, "sv=0x%lx, refcnt=%d\n",
(unsigned long)sv, SvREFCNT(sv));
- bucket->free = modperl_bucket_sv_free;
+ bucket->sms = modperl_bucket_sv_free;
bucket->type = &modperl_bucket_sv_type;
now 'make' completes.
I'm not sure about modperl_bucket_sv_free() still calling Safefree, for
example:
% cvs diff -r 1.113 -r 1.115 ./srclib/apr-util/include/apr_buckets.h
...
/* ***** Bucket Brigade Functions ***** */
@@ -822,7 +829,7 @@
*/
#define apr_bucket_destroy(e) do { \
(e)->type->destroy((e)->data); \
- (e)->free(e); \
+ apr_sms_free((e)->sms, (e)); \
} while (0)
/**
shouldn't we also call apr_sms_free?
_____________________________________________________________________
Stas Bekman JAm_pH -- Just Another mod_perl Hacker
http://stason.org/ mod_perl Guide http://perl.apache.org/guide
mailto:[EMAIL PROTECTED] http://localhost/ http://eXtropia.com/
http://singlesheaven.com http://perl.apache.org http://perlmonth.com/
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
