diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-01-16 00:32:27 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-01-16 00:32:27 +0000 |
| commit | f780604f6351b73ad1ca2ee1f53f3cb5a7de6904 (patch) | |
| tree | b45906b6536da715457860a7aead872a5340b516 /ext/Socket | |
| parent | 76555ca36e45bbec899cfa02b3b906b3689f2d74 (diff) | |
| download | perl-f780604f6351b73ad1ca2ee1f53f3cb5a7de6904.tar.gz | |
s/SvPV/SvPVbyte/g, as suggested by Gisle Aas.
p4raw-id: //depot/perl@14293
Diffstat (limited to 'ext/Socket')
| -rw-r--r-- | ext/Socket/Socket.xs | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/ext/Socket/Socket.xs b/ext/Socket/Socket.xs index 1c3c239b3e..b302eaa85b 100644 --- a/ext/Socket/Socket.xs +++ b/ext/Socket/Socket.xs @@ -248,7 +248,7 @@ inet_ntoa(ip_address_sv) char * ip_address; if (DO_UTF8(ip_address_sv) && !sv_utf8_downgrade(ip_address_sv, 1)) croak("Wide character in Socket::inet_ntoa"); - ip_address = SvPV(ip_address_sv, addrlen); + ip_address = SvPVbyte(ip_address_sv, addrlen); if (addrlen == sizeof(addr) || addrlen == 4) addr.s_addr = (ip_address[0] & 0xFF) << 24 | @@ -277,7 +277,7 @@ sockaddr_family(sockaddr) SV * sockaddr PREINIT: STRLEN sockaddr_len; - char *sockaddr_pv = SvPV(sockaddr, sockaddr_len); + char *sockaddr_pv = SvPVbyte(sockaddr, sockaddr_len); CODE: if (sockaddr_len < offsetof(struct sockaddr, sa_data)) { croak("Bad arg length for %s, length is %d, should be at least %d", @@ -341,7 +341,7 @@ unpack_sockaddr_un(sun_sv) #ifdef I_SYS_UN struct sockaddr_un addr; STRLEN sockaddrlen; - char * sun_ad = SvPV(sun_sv,sockaddrlen); + char * sun_ad = SvPVbyte(sun_sv,sockaddrlen); char * e; # ifndef __linux__ /* On Linux sockaddrlen on sockets returned by accept, recvfrom, @@ -382,7 +382,7 @@ pack_sockaddr_in(port, ip_address_sv) char * ip_address; if (DO_UTF8(ip_address_sv) && !sv_utf8_downgrade(ip_address_sv, 1)) croak("Wide character in Socket::pack_sockaddr_in"); - ip_address = SvPV(ip_address_sv, addrlen); + ip_address = SvPVbyte(ip_address_sv, addrlen); if (addrlen == sizeof(addr) || addrlen == 4) addr.s_addr = (ip_address[0] & 0xFF) << 24 | @@ -409,7 +409,7 @@ unpack_sockaddr_in(sin_sv) struct sockaddr_in addr; unsigned short port; struct in_addr ip_address; - char * sin = SvPV(sin_sv,sockaddrlen); + char * sin = SvPVbyte(sin_sv,sockaddrlen); if (sockaddrlen != sizeof(addr)) { croak("Bad arg length for %s, length is %d, should be %d", "Socket::unpack_sockaddr_in", |