summaryrefslogtreecommitdiff
path: root/perlio.c
diff options
context:
space:
mode:
authorCraig A. Berry <craigberry@mac.com>2012-05-24 17:13:13 -0500
committerCraig A. Berry <craigberry@mac.com>2012-05-24 17:13:13 -0500
commit25bbd8263003a49c3f7afdc1cd082f6f66e76ce4 (patch)
treec8bd69cd71d0f5095fc9e90ce045107b75df879b /perlio.c
parent929df5ffc08c253ffd629a57e960a554868f4551 (diff)
downloadperl-25bbd8263003a49c3f7afdc1cd082f6f66e76ce4.tar.gz
File scope for VMS-specific #includes.
C++ requires #include directives to be at file scope, but we've been lazy and haven't been doing that.
Diffstat (limited to 'perlio.c')
-rw-r--r--perlio.c5
1 files changed, 4 insertions, 1 deletions
diff --git a/perlio.c b/perlio.c
index 7782728f61..7dac9be33b 100644
--- a/perlio.c
+++ b/perlio.c
@@ -70,6 +70,10 @@
int mkstemp(char*);
#endif
+#ifdef VMS
+#include <rms.h>
+#endif
+
#define PerlIO_lockcnt(f) (((PerlIOl*)(f))->head->flags)
/* Call the callback or PerlIOBase, and return failure. */
@@ -3895,7 +3899,6 @@ PerlIOBuf_open(pTHX_ PerlIO_funcs *self, PerlIO_list_t *layers,
PerlLIO_setmode(fd, O_BINARY);
#endif
#ifdef VMS
-#include <rms.h>
/* Enable line buffering with record-oriented regular files
* so we don't introduce an extraneous record boundary when
* the buffer fills up.