From: Andy Dougherty <doughera@lafayette.edu>
Date: Thu, 9 Apr 2009 15:41:34 +0000 (-0400)
Subject: Fix declaration-after-statement in ext/Socket/Socket.xs
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=5a8cf367090fb5d83d8e8e0ae381a3525a215928;p=p5sagit%2Fp5-mst-13.2.git

Fix declaration-after-statement in ext/Socket/Socket.xs

This trivial patch lets C89-ish compilers compile Socket.c again.

Signed-off-by: H.Merijn Brand <h.m.brand@xs4all.nl>
---

diff --git a/ext/Socket/Socket.xs b/ext/Socket/Socket.xs
index 064de2e..75d0f33 100644
--- a/ext/Socket/Socket.xs
+++ b/ext/Socket/Socket.xs
@@ -477,13 +477,14 @@ inet_pton(af, host)
         const char *  host
         CODE:
 #ifdef HAS_INETPTON
+        int ok;
         struct in6_addr ip_address;
         if(af != AF_INET && af != AF_INET6) {
            croak("Bad address family for %s, got %d, should be either AF_INET or AF_INET6",
                         "Socket::inet_pton",
                         af);
         }
-        int ok = (*host != '\0') && inet_pton(af, host, &ip_address);
+        ok = (*host != '\0') && inet_pton(af, host, &ip_address);
 
         ST(0) = sv_newmortal();
         if (ok) {