Change 14948: Demand more before attempting socketpair().

[Jarkko Hietaniemi]

Change 14948 by jhi@alpha on 2002/03/02 17:55:48

        Demand more before attempting socketpair().

Affected files ...

.... //depot/perl/pp_sys.c#284 edit

Differences ...

==== //depot/perl/pp_sys.c#284 (text) ====
Index: perl/pp_sys.c
--- perl/pp_sys.c.~1~   Sat Mar  2 11:00:05 2002
+++ perl/pp_sys.c       Sat Mar  2 11:00:05 2002
@@ -2285,7 +2285,7 @@
 
 PP(pp_sockpair)
 {
-#if defined (HAS_SOCKETPAIR) || (defined (HAS_SOCKET) && defined(SOCK_DGRAM))
+#if defined (HAS_SOCKETPAIR) || (defined (HAS_SOCKET) && defined(SOCK_DGRAM) && 
+defined(AF_INET) && defined(PF_INET))
     dSP;
     GV *gv1;
     GV *gv2;
End of Patch.