freebsd-ports/lang/modula-3-socks/files/recv.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

16 lines
253 B
C

#include "wrap.h"
#include <sys/types.h>
#include <sys/socket.h>
ssize_t
m3_recv(int s, void *buf, size_t len, int flags)
{
int result;
ENTER_CRITICAL;
MAKE_WRITABLE(buf);
result = recv(s, buf, len, flags);
EXIT_CRITICAL;
return result;
}