File: GenericSock.c

package info (click to toggle)
mlton 20070826-1
  • links: PTS
  • area: main
  • in suites: lenny
  • size: 33,184 kB
  • ctags: 70,419
  • sloc: ansic: 16,154; lisp: 2,727; makefile: 1,635; sh: 1,234; pascal: 256; asm: 97
file content (13 lines) | stat: -rw-r--r-- 390 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
 
#include "platform.h"

C_Errno_t(C_Int_t) 
Socket_GenericSock_socket (C_Int_t domain, C_Int_t type, C_Int_t protocol) {
  MLton_initSockets ();
  return socket (domain, type, protocol);
}

C_Errno_t(C_Int_t)
Socket_GenericSock_socketPair (C_Int_t domain, C_Int_t type, C_Int_t protocol, Array(C_Int_t) sv) {
  MLton_initSockets ();
  return socketpair (domain, type, protocol, (int*)sv);
}