From: Dave Mitchell <davem@fdisolutions.com>
Date: Sun, 10 Jul 2005 23:04:26 +0000 (+0000)
Subject: no code before declarations!
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=c3c5fad70e191a22d614f56433b4aaeeb0a035da;p=p5sagit%2Fp5-mst-13.2.git

no code before declarations!

p4raw-id: //depot/perl@25110
---

diff --git a/doio.c b/doio.c
index 0ecfe7d..b105845 100644
--- a/doio.c
+++ b/doio.c
@@ -1456,9 +1456,10 @@ Perl_do_aexec5(pTHX_ SV *really, register SV **mark, register SV **sp,
     Perl_croak(aTHX_ "exec? I'm not *that* kind of operating system");
 #else
     if (sp > mark) {
-	Newx(PL_Argv, sp - mark + 1, char*);
-	char **a = PL_Argv;
+	char **a;
 	const char *tmps = Nullch;
+	Newx(PL_Argv, sp - mark + 1, char*);
+	a = PL_Argv;
 
 	while (++mark <= sp) {
 	    if (*mark)