diff options
author | Craig A. Berry <craigberry@mac.com> | 2010-11-10 21:23:48 -0600 |
---|---|---|
committer | Craig A. Berry <craigberry@mac.com> | 2010-11-10 21:23:48 -0600 |
commit | 1810cd7c230c5a59515b35da6bad19ff8c8a9d5b (patch) | |
tree | 534321755eb9ea7e59834356de2b9be28c117ba4 | |
parent | eff4c632969f3d8d396084e4721d5853867b0b3a (diff) | |
download | perl-1810cd7c230c5a59515b35da6bad19ff8c8a9d5b.tar.gz |
Rename PERLIO_BUFSIZ to PERLIOBUF_DEFAULT_BUFSIZ.
PERLIO_BUFSIZ was already in use by Encode::Unicode for the
PerlIOEncode_xxx layer, so it makes sense to specify that this
macro is for the PerlIOBuf_xxx layer and that it is a default
value that may eventually be settable at run-time.
-rw-r--r-- | perlio.c | 2 | ||||
-rw-r--r-- | perlio.h | 5 |
2 files changed, 4 insertions, 3 deletions
@@ -4120,7 +4120,7 @@ PerlIOBuf_get_base(pTHX_ PerlIO *f) if (!b->buf) { if (!b->bufsiz) - b->bufsiz = PERLIO_BUFSIZ; + b->bufsiz = PERLIOBUF_DEFAULT_BUFSIZ; Newxz(b->buf,b->bufsiz, STDCHAR); if (!b->buf) { b->buf = (STDCHAR *) & b->oneword; @@ -189,8 +189,9 @@ PERL_EXPORT_C void PerlIO_clone(pTHX_ PerlInterpreter *proto, #define BUFSIZ 1024 #endif -#ifndef PERLIO_BUFSIZ -#define PERLIO_BUFSIZ 4096 +/* The default buffer size for the perlio buffering layer */ +#ifndef PERLIOBUF_DEFAULT_BUFSIZ +#define PERLIOBUF_DEFAULT_BUFSIZ 4096 #endif #ifndef SEEK_SET |