Undo the SOCKS workarounds, instead start using PerlIO

[p5sagit/p5-mst-13.2.git] / perl.h

diff --git a/perl.h b/perl.h
index bb09602..eff0336 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -737,9 +737,6 @@ typedef struct perl_mstats perl_mstats_t;
 #       undef INCLUDE_PROTOTYPES
 #       undef PERL_SOCKS_NEED_PROTOTYPES
 #   endif
-#   ifdef USE_64_BIT_ALL
-#       define SOCKS_64BIT_BUG /* until proven otherwise */
-#   endif
 # endif 
 # ifdef I_NETDB
 #  include <netdb.h>
@@ -2819,16 +2816,6 @@ typedef void *Thread;
 #define PERL_CKDEF(s)  OP *s (pTHX_ OP *o);
 #define PERL_PPDEF(s)  OP *s (pTHX);
 
-#ifdef SOCKS_64BIT_BUG
-typedef struct __s64_iobuffer {
-    struct __s64_iobuffer *next, *last;                /* Queue pointer */
-    PerlIO *fp;                                        /* Assigned file pointer */
-    int cnt;                                   /* Buffer counter */
-    int size;                                  /* Buffer size */
-    int *buffer;                               /* The buffer */
-} S64_IOB;
-#endif
-
 #include "proto.h"
 
 #ifdef PERL_OBJECT