dougm 01/03/12 22:49:13
Modified: xs modperl_xs_util.h
xs/Apache/RequestIO Apache__RequestIO.h
Log:
move mpxs_write_loop to xs_util.h
Revision Changes Path
1.3 +12 -0 modperl-2.0/xs/modperl_xs_util.h
Index: modperl_xs_util.h
===================================================================
RCS file: /home/cvs/modperl-2.0/xs/modperl_xs_util.h,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- modperl_xs_util.h 2001/03/06 05:16:24 1.2
+++ modperl_xs_util.h 2001/03/13 06:49:12 1.3
@@ -56,4 +56,16 @@
mpxs_usage_va(2, obj, msg); \
arg = *MARK++
+#define mpxs_write_loop(func,obj) \
+ while (MARK <= SP) { \
+ apr_ssize_t wlen; \
+ char *buf = SvPV(*MARK, wlen); \
+ apr_status_t rv = func(obj, buf, &wlen); \
+ if (rv != APR_SUCCESS) { \
+ croak(modperl_apr_strerror(rv)); \
+ } \
+ bytes += wlen; \
+ MARK++; \
+ }
+
#endif /* MODPERL_XS_H */
1.2 +0 -12 modperl-2.0/xs/Apache/RequestIO/Apache__RequestIO.h
Index: Apache__RequestIO.h
===================================================================
RCS file: /home/cvs/modperl-2.0/xs/Apache/RequestIO/Apache__RequestIO.h,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- Apache__RequestIO.h 2001/03/05 03:54:18 1.1
+++ Apache__RequestIO.h 2001/03/13 06:49:13 1.2
@@ -1,15 +1,3 @@
-#define mpxs_write_loop(func,obj) \
- while (MARK <= SP) { \
- apr_ssize_t wlen; \
- char *buf = SvPV(*MARK, wlen); \
- apr_status_t rv = func(obj, buf, &wlen); \
- if (rv != APR_SUCCESS) { \
- croak(modperl_apr_strerror(rv)); \
- } \
- bytes += wlen; \
- MARK++; \
- }
-
#if 0
#define MP_USE_AP_RWRITE
#endif
