freebsd-ports/lang/modula-3-socks/files/socket.c
John Polstra 61ce7c4a22 This package implements SOCKS support for Modula-3 applications. It
will be used to support SOCKS operation in the soon-to-be-released next
version of CVSup.

A tip of the hat to:  Darryl Okahata, who developed the patches
necessary to make the SOCKS library work with Modula-3's multithreaded
I/O system.
1996-11-01 02:37:35 +00:00

15 lines
230 B
C

#include "wrap.h"
#include <sys/types.h>
#include <sys/socket.h>
int
m3_socket(int domain, int type, int protocol)
{
int result;
ENTER_CRITICAL;
result = socket(domain, type, protocol);
EXIT_CRITICAL;
return result;
}