diff options
| author | Xavier Leroy <xavier.leroy@inria.fr> | 1996-09-04 14:17:43 +0000 |
|---|---|---|
| committer | Xavier Leroy <xavier.leroy@inria.fr> | 1996-09-04 14:17:43 +0000 |
| commit | a0c8d7373311facda78d250751203371cc0487b2 (patch) | |
| tree | cfb65b4d0bff35f71cede7ae09e647433845236f /otherlibs/win32unix/socketaddr.h | |
| parent | ac9f8e8094ea19199a24fd5c67053718198ed172 (diff) | |
Merge du stage de Pascal Cuoq
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@952 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'otherlibs/win32unix/socketaddr.h')
| -rw-r--r-- | otherlibs/win32unix/socketaddr.h | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/otherlibs/win32unix/socketaddr.h b/otherlibs/win32unix/socketaddr.h new file mode 100644 index 000000000..0ce3b6709 --- /dev/null +++ b/otherlibs/win32unix/socketaddr.h @@ -0,0 +1,29 @@ +/***********************************************************************/ +/* */ +/* Objective Caml */ +/* */ +/* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ +/* */ +/* Copyright 1996 Institut National de Recherche en Informatique et */ +/* Automatique. Distributed only by permission. */ +/* */ +/***********************************************************************/ + +/* $Id$ */ + +#include <misc.h> +#include <sys/types.h> +#include <winsock.h> + +union { + struct sockaddr s_gen; + struct sockaddr_in s_inet; +} sock_addr; + +int sock_addr_len; + +void get_sockaddr P((value)); +value alloc_sockaddr P((void)); +value alloc_inet_addr P((unsigned int)); + +#define GET_INET_ADDR(v) (*((uint32 *) (v))) |