diff options
Diffstat (limited to 'ext/Socket/Socket.xs')
| -rw-r--r-- | ext/Socket/Socket.xs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/ext/Socket/Socket.xs b/ext/Socket/Socket.xs index 064de2ebbf..75d0f33870 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) { |