dougm 01/12/17 22:00:14
Modified: xs/APR/PerlIO apr_perlio.c
Log:
#include "modperl_largefiles.h" to fix PerlIOAPR_tell issue where Off_t
is a different size (32 bit inside apache, 64 inside perl)
Revision Changes Path
1.5 +1 -2 modperl-2.0/xs/APR/PerlIO/apr_perlio.c
Index: apr_perlio.c
===================================================================
RCS file: /home/cvs/modperl-2.0/xs/APR/PerlIO/apr_perlio.c,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -r1.4 -r1.5
--- apr_perlio.c 2001/12/18 01:13:15 1.4
+++ apr_perlio.c 2001/12/18 06:00:14 1.5
@@ -1,3 +1,4 @@
+#include "modperl_largefiles.h"
#include "mod_perl.h"
#include "apr_perlio.h"
@@ -194,8 +195,6 @@
apr_off_t offset = 0;
apr_status_t rc;
- /* this is broken, for some reason it returns 6e17 */
-
rc = apr_file_seek(st->file, APR_CUR, &offset);
if (rc == APR_SUCCESS) {
return (Off_t) offset;