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 (file)
--- 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) {