Files
Arquivotheca.Solaris-2.5/lib/libbc/libc/sys/common/socket.c
seta75D 7c4988eac0 Init
2021-10-11 19:38:01 -03:00

20 lines
298 B
C
Executable File

#include <sys/types.h>
#include <sys/socket.h>
extern int errno;
int
socket(family, type, protocol)
register int family;
register int type;
register int protocol;
{
int a;
static int map[]={0,2,1,4,5,6};
if ((a = _socket(family, map[type], protocol)) == -1)
maperror(errno);
return(a);
}