From 0faef845a8964324cf7fed51ac8fc5dab0096efc Mon Sep 17 00:00:00 2001
From: "Craig A. Berry" <craigberry@mac.com>
Date: Fri, 8 Sep 2006 02:07:30 +0000
Subject: [PATCH] declaration after code nit in vms/vms.c (from Martin
 Vorlaender)

p4raw-id: //depot/perl@28806
---
 vms/vms.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/vms/vms.c b/vms/vms.c
index dc97685..e4fe676 100644
--- a/vms/vms.c
+++ b/vms/vms.c
@@ -1357,8 +1357,9 @@ prime_env_iter(void)
          */
         char lnm[LNM$C_NAMLENGTH+1];
         char eqv[MAX_DCL_SYMBOL+1];
+        int trnlen;
         strncpy(lnm, key, keylen);
-        int trnlen = vmstrnenv(lnm, eqv, 0, fildev, 0);
+        trnlen = vmstrnenv(lnm, eqv, 0, fildev, 0);
         sv = newSVpvn(eqv, strlen(eqv));
       }
       else {
-- 
2.7.4