joes 2004/07/06 23:47:03
Modified: glue/perl/xsbuilder apreq_xs_tables.h
Log:
Remove extraneous notes.
Revision Changes Path
1.4 +0 -15 httpd-apreq-2/glue/perl/xsbuilder/apreq_xs_tables.h
Index: apreq_xs_tables.h
===================================================================
RCS file: /home/cvs/httpd-apreq-2/glue/perl/xsbuilder/apreq_xs_tables.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- apreq_xs_tables.h 7 Jul 2004 06:41:16 -0000 1.3
+++ apreq_xs_tables.h 7 Jul 2004 06:47:03 -0000 1.4
@@ -20,23 +20,8 @@
/* backward compatibility macros support */
#include "ppport.h"
-/* Need to override unsafe methods from APR:
- * make set, add, STORE
- * don't bother supporting merge, overlap, compress
- */
#define apreq_xs_sv2table(sv) ((apr_table_t *) SvIVX(SvRV(sv)))
-/*
-APR_INLINE
-static apr_table_t * apreq_xs_sv2table(pTHX_ SV *sv)
-{
- MAGIC *mg = mg_find(SvRV(sv), PERL_MAGIC_tied);
- if (mg == NULL || !SvROK(mg->mg_obj))
- Perl_croak(aTHX_ "Can't find tied table");
-
- return (apr_table_t *) SvIVX(SvRV(mg->mg_obj));
-}
-*/
#define apreq_xs_table2sv(t,class,parent) \
apreq_xs_table_c2perl(aTHX_ t, env, class, parent)
