From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: X-Spam-Checker-Version: SpamAssassin 3.1.3 (2006-06-01) on yquem.inria.fr X-Spam-Level: X-Spam-Status: No, score=0.8 required=5.0 tests=DNS_FROM_RFC_ABUSE, RCVD_IN_NJABL_PROXY autolearn=disabled version=3.1.3 X-Original-To: caml-list@yquem.inria.fr Delivered-To: caml-list@yquem.inria.fr Received: from concorde.inria.fr (concorde.inria.fr [192.93.2.39]) by yquem.inria.fr (Postfix) with ESMTP id 70C29BC69 for ; Fri, 30 Mar 2007 04:24:01 +0200 (CEST) Received: from web51609.mail.re2.yahoo.com (web51609.mail.re2.yahoo.com [206.190.38.214]) by concorde.inria.fr (8.13.6/8.13.6) with SMTP id l2U2O01j020690 for ; Fri, 30 Mar 2007 04:24:00 +0200 Received: (qmail 48412 invoked by uid 60001); 30 Mar 2007 02:23:59 -0000 DomainKey-Signature: a=rsa-sha1; q=dns; c=nofws; s=s1024; d=yahoo.com.br; h=X-YMail-OSG:Received:X-Mailer:Date:From:Subject:To:MIME-Version:Content-Type:Content-Transfer-Encoding:Message-ID; b=W1VTIl3ctzIoBd1DSYda21adSJUEIJHKDLKt1/I86cNKZaEXi6Xl+ZhCcisl6Da1smY1KUq/A9510pLbzF/642DXbBsUZinl1bj3b0JMl2Bi1vFtR99pakOYH4GxwRAGBetnHxoOi8I9lt26u7OE8Op4PMF6iSlX6T+T43SPrYw=; X-YMail-OSG: aua6jnMVM1kcQX_epgQrI0JCVxkdG3BSK2NdEY1p5hjvxZhmQukHxJKRvHeonun0eOeVwT2AwL2gceN.6LWw5pDhbA-- Received: from [200.233.231.1] by web51609.mail.re2.yahoo.com via HTTP; Thu, 29 Mar 2007 19:23:59 PDT X-Mailer: YahooMailRC/476 YahooMailWebService/0.7.41.8 Date: Thu, 29 Mar 2007 19:23:59 -0700 (PDT) From: Alexsandro Soares Subject: UDP client To: caml-list@inria.fr MIME-Version: 1.0 Content-Type: text/plain; charset=iso-8859-1 Content-Transfer-Encoding: quoted-printable Message-ID: <641576.48378.qm@web51609.mail.re2.yahoo.com> X-Miltered: at concorde with ID 460C74C0.000 by Joe's j-chkmail (http://j-chkmail . ensmp . fr)! X-Spam: no; 0.00; ocaml:01 sig:01 fcntl:01 getpid:01 val:01 fcntl:01 val:01 nonblock:01 seus:98 amigos:98 novo:98 behaviour:01 alex:03 null:05 i'm:09 Hi all,=0A=0A I'm working in an UDP client, but I can't figure out how to = get the same behaviour, in OCaml, such as the C code below:=0A=0A----------= ---------------------------------------------------------------------------= ----------=0A=0A sigset_t sigmask;=0A=0A sigemptyset(&sigmask);=0A sigad= dset(&sigmask, SIGIO); =0A sigprocmask(SIG_BLOCK, &sigmask, NULL);=0A= =0A /*=0A * Open UDP socket.=0A */=0A if( (sockfd =3D socket(AF_IN= ET, SOCK_DGRAM, 0)) < 0){=0A return sock ; /* Can't open socket. */= =0A }=0A =0A if (fcntl(sockfd, F_SETOWN, getpid()) =3D=3D -1) return soc= k;=0A=0A val =3D fcntl(sockfd, F_GETFL, 0) ;=0A=0A val |=3D O_NONBLOCK ;= =0A val |=3D FASYNC;=0A fcntl(sockfd, F_SETFL, val) ;=0A=0A--------------= ----------------------------------------------------------------------=0A= =0ACould anyone help me?=0A=0AThanks,=0A=0AAlex=0A=0A=0A=0A=0A_____________= _____________________________________=0AFale com seus amigos de gra=E7a co= m o novo Yahoo! Messenger =0Ahttp://br.messenger.yahoo.com/