ftp.nice.ch/Attic/openStep/implementation/gnustep/sources/alpha-snapshots/pthreads.0.9.2.tgz#/pthreads-0.9.2/socklib/socket.c

This is socket.c in view mode; [Download] [Up]

#include "pthread_socket.h"
#include "pthread_io_delay.h"

static inline
_syscall2(long,socketcall,int,call,unsigned long *,args);

/*--------------------------------------------------------------------------
 * @@          S O C K E T
 *-------------------------------------------------------------------------*/
int 
socket( int domain, int type, int protocol )
{
   int ret;

   unsigned long args[3];

   args[0] = (unsigned long) domain;
   args[1] = (unsigned long) type;
   args[2] = (unsigned long) protocol;

   LOCK_ON

       ret = socketcall( SYS_SOCKET, args );

   LOCK_OFF

   return( ret );
}

These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.