From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: X-Original-To: caml-list@yquem.inria.fr Delivered-To: caml-list@yquem.inria.fr Received: from mail3-relais-sop.national.inria.fr (mail3-relais-sop.national.inria.fr [192.134.164.104]) by yquem.inria.fr (Postfix) with ESMTP id 6B8D3BBAF for ; Thu, 3 Dec 2009 17:45:05 +0100 (CET) X-IronPort-Anti-Spam-Filtered: true X-IronPort-Anti-Spam-Result: AqsAAJ95F0uBrw8EmWdsb2JhbACEOIt2i2EBAQEBAQgLCgcTq0KQYIEvgixXBA X-IronPort-AV: E=Sophos;i="4.47,336,1257116400"; d="scan'208";a="39220533" Received: from ext.lri.fr ([129.175.15.4]) by mail3-smtp-sop.national.inria.fr with ESMTP/TLS/ADH-AES256-SHA; 03 Dec 2009 17:45:05 +0100 Received: from localhost (localhost [127.0.0.1]) by ext.lri.fr (Postfix) with ESMTP id E61C3A4402 for ; Thu, 3 Dec 2009 17:45:04 +0100 (CET) X-Virus-Scanned: Debian amavisd-new at lri.fr Received: from ext.lri.fr ([127.0.0.1]) by localhost (ext.lri.fr [127.0.0.1]) (amavisd-new, port 10024) with ESMTP id srgRlsZI+KUZ for ; Thu, 3 Dec 2009 17:45:04 +0100 (CET) Received: from lri4-139 (lri4-110 [129.175.4.110]) (using TLSv1 with cipher DHE-RSA-AES256-SHA (256/256 bits)) (No client certificate requested) by ext.lri.fr (Postfix) with ESMTP id CD54EA4284 for ; Thu, 3 Dec 2009 17:45:04 +0100 (CET) Content-Type: text/plain; charset=utf-8; format=flowed; delsp=yes To: "caml users" Subject: Re: [Caml-list] Random questions References: <91a3da520911180259s585b5ef5j311bd0448ed3c02f@mail.gmail.com> Date: Thu, 03 Dec 2009 17:45:04 +0100 MIME-Version: 1.0 Content-Transfer-Encoding: Quoted-Printable From: AUGER Organization: ProVal Message-ID: In-Reply-To: User-Agent: Opera Mail/10.00 (Linux) X-Spam: no; 0.00; lri:01 0100,:01 damien:01 damien:01 beginner's:01 ocaml:01 bug:01 paris-sud:01 lri:01 umr:01 orsay:01 2009:98 2009:98 doligez:01 doligez:01 Le Thu, 03 Dec 2009 17:01:18 +0100, Damien Doligez = a =C3=A9crit: > > On 2009-12-03, at 12:00, AUGER wrote: > >> (* preliminary function: negate_minus_1 : int -> int : n |-> -n-1 *) >> let negate_minus_1 =3D (lor) (-(max_int/2)-1) (* or inline the consta= nt *) > > You probably mean this: > > let negate_minus_1 =3D (lxor) (-1);; > > -- Damien You are right > > _______________________________________________ > Caml-list mailing list. Subscription management: > http://yquem.inria.fr/cgi-bin/mailman/listinfo/caml-list > Archives: http://caml.inria.fr > Beginner's list: http://groups.yahoo.com/group/ocaml_beginners > Bug reports: http://caml.inria.fr/bin/caml-bugs -- = C=C3=A9dric AUGER Univ Paris-Sud, Laboratoire LRI, UMR 8623, F-91405, Orsay