summaryrefslogtreecommitdiff
path: root/util.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 /util.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 'util.c')
-rw-r--r--util.c5
1 files changed, 4 insertions, 1 deletions
diff --git a/util.c b/util.c
index 171456f3c2..378ffe05bf 100644
--- a/util.c
+++ b/util.c
@@ -5727,6 +5727,10 @@ Perl_parse_unicode_opts(pTHX_ const char **popt)
return opt;
}
+#ifdef VMS
+# include <starlet.h>
+#endif
+
U32
Perl_seed(pTHX)
{
@@ -5758,7 +5762,6 @@ Perl_seed(pTHX)
#endif
U32 u;
#ifdef VMS
-# include <starlet.h>
/* when[] = (low 32 bits, high 32 bits) of time since epoch
* in 100-ns units, typically incremented ever 10 ms. */
unsigned int when[2];