summaryrefslogtreecommitdiff
path: root/perlsdio.h
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>1999-08-13 22:48:40 +0000
committerJarkko Hietaniemi <jhi@iki.fi>1999-08-13 22:48:40 +0000
commitd9b3e12dc6d5d94bcf6692f9359e377c8a7dcdd6 (patch)
tree02fd6a0afe5f8a45764e5d35e16752db82d3a937 /perlsdio.h
parentcc4466b7484b22db3b089a085bc005d7a5460bed (diff)
downloadperl-d9b3e12dc6d5d94bcf6692f9359e377c8a7dcdd6.tar.gz
Jumbo Configure and large file support update.
Remove a lot of unneeded 64-bitness cruft; re-introduce BYTEORDER; update 64-bitness hints; lfs should now work in Solaris; long doubles in AIX. p4raw-id: //depot/cfgperl@3982
Diffstat (limited to 'perlsdio.h')
-rw-r--r--perlsdio.h6
1 files changed, 6 insertions, 0 deletions
diff --git a/perlsdio.h b/perlsdio.h
index 46a15de9fa..71a9e752cd 100644
--- a/perlsdio.h
+++ b/perlsdio.h
@@ -55,12 +55,18 @@
#define PerlIO_clearerr(f) clearerr(f)
#define PerlIO_flush(f) Fflush(f)
#define PerlIO_tell(f) ftell(f)
+#if defined(USE_64_BIT_STDIO) && defined(HAS_FTELLO) && !defined(USE_FTELL64)
+#define ftell ftello
+#endif
#if defined(VMS) && !defined(__DECC)
/* Old VAXC RTL doesn't reset EOF on seek; Perl folk seem to expect this */
# define PerlIO_seek(f,o,w) (((f) && (*f) && ((*f)->_flag &= ~_IOEOF)),fseek(f,o,w))
#else
# define PerlIO_seek(f,o,w) fseek(f,o,w)
#endif
+#if defined(USE_64_BIT_STDIO) && defined(HAS_FSEEKO) && !defined(USE_FSEEK64)
+#define fseek fseeko
+#endif
#ifdef HAS_FGETPOS
#define PerlIO_getpos(f,p) fgetpos(f,p)
#endif