diff options
| author | John Peacock <jpeacock@rowman.com> | 2001-12-25 01:02:12 -0500 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-12-25 15:56:49 +0000 |
| commit | 7c9e965c652c539b7064f0b192c92dbee8a21bcc (patch) | |
| tree | 8bec7dba8caa94efdcd93023f5c8266ea1dba311 /embed.h | |
| parent | 763acdb292c461fc4a4211ff9618bbb2633f83b9 (diff) | |
| download | perl-7c9e965c652c539b7064f0b192c92dbee8a21bcc.tar.gz | |
Re: Not OK 13881
Message-ID: <3C285CB4.8040006@rowman.com>
p4raw-id: //depot/perl@13883
Diffstat (limited to 'embed.h')
| -rw-r--r-- | embed.h | 6 |
1 files changed, 6 insertions, 0 deletions
@@ -1203,6 +1203,9 @@ #define sv_pvn_force_flags Perl_sv_pvn_force_flags #define sv_2pv_flags Perl_sv_2pv_flags #define my_atof2 Perl_my_atof2 +#if !defined(HAS_SOCKETPAIR) && defined(HAS_SOCKET) +#define my_socketpair Perl_my_socketpair +#endif #if defined(USE_PERLIO) && !defined(USE_SFIO) #define PerlIO_close Perl_PerlIO_close #define PerlIO_fill Perl_PerlIO_fill @@ -2741,6 +2744,9 @@ #define sv_pvn_force_flags(a,b,c) Perl_sv_pvn_force_flags(aTHX_ a,b,c) #define sv_2pv_flags(a,b,c) Perl_sv_2pv_flags(aTHX_ a,b,c) #define my_atof2(a,b) Perl_my_atof2(aTHX_ a,b) +#if !defined(HAS_SOCKETPAIR) && defined(HAS_SOCKET) +#define my_socketpair(a,b,c,d) Perl_my_socketpair(aTHX_ a,b,c,d) +#endif #if defined(USE_PERLIO) && !defined(USE_SFIO) #define PerlIO_close(a) Perl_PerlIO_close(aTHX_ a) #define PerlIO_fill(a) Perl_PerlIO_fill(aTHX_ a) |