diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-01-04 20:24:59 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-01-04 20:24:59 +0000 |
| commit | 48ea76d1a0d7a73dd36de7c610ebe86ecefa20f7 (patch) | |
| tree | 55230b904e7d16b788a4667ec1f55b4722c825f1 /embed.h | |
| parent | c406981e00deead8e4a58424b87a96ede9af2f23 (diff) | |
| download | perl-48ea76d1a0d7a73dd36de7c610ebe86ecefa20f7.tar.gz | |
If we do have socketpair(), make my_socketpair()
just call the real socketpair(). This way we always
have real code behind my_socketpair() and a symbol
corresponding to the my_socketpair in global.sym.
p4raw-id: //depot/perl@14068
Diffstat (limited to 'embed.h')
| -rw-r--r-- | embed.h | 4 |
1 files changed, 0 insertions, 4 deletions
@@ -1203,9 +1203,7 @@ #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 @@ -2744,9 +2742,7 @@ #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 Perl_my_socketpair -#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) |