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.0 required=5.0 tests=none autolearn=disabled version=3.1.3 X-Original-To: caml-list@yquem.inria.fr Delivered-To: caml-list@yquem.inria.fr Received: from mail1-relais-roc.national.inria.fr (mail1-relais-roc.national.inria.fr [192.134.164.82]) by yquem.inria.fr (Postfix) with ESMTP id D570BBB84 for ; Tue, 1 Jul 2008 16:59:58 +0200 (CEST) X-IronPort-Anti-Spam-Filtered: true X-IronPort-Anti-Spam-Result: ApoEANjiaUjAXQIn/2dsb2JhbACyHQ X-IronPort-AV: E=Sophos;i="4.27,732,1204498800"; d="scan'208";a="14638904" Received: from concorde.inria.fr ([192.93.2.39]) by mail1-smtp-roc.national.inria.fr with ESMTP; 01 Jul 2008 16:59:58 +0200 Received: from mail2-relais-roc.national.inria.fr (mail2-relais-roc.national.inria.fr [192.134.164.83]) by concorde.inria.fr (8.13.6/8.13.6) with ESMTP id m61Exujr031134 (version=TLSv1/SSLv3 cipher=RC4-SHA bits=128 verify=OK) for ; Tue, 1 Jul 2008 16:59:58 +0200 X-IronPort-Anti-Spam-Filtered: true X-IronPort-Anti-Spam-Result: AkQAABLjaUhCm3xrnWdsb2JhbACSLgEBAQEBCA0Hn1A X-IronPort-AV: E=Sophos;i="4.27,732,1204498800"; d="scan'208";a="12718932" Received: from janestcapital.com (HELO smtp.janestcapital.com) ([66.155.124.107]) by mail2-smtp-roc.national.inria.fr with ESMTP; 01 Jul 2008 16:59:55 +0200 Received: from qsmtp.delacy.com [38.105.200.250] by janestcapital.com with ESMTP (SMTPD-9.10) id A66A04E4; Tue, 01 Jul 2008 10:59:54 -0400 Received: from nyc-qws-011.delacy.com ([172.25.131.111] helo=nyc-qws-011) by qsmtp.delacy.com with smtp (Exim 4.62) (envelope-from ) id 1KDhKi-00033H-O3; Tue, 01 Jul 2008 10:59:53 -0400 Received: by nyc-qws-011 (sSMTP sendmail emulation); Tue, 1 Jul 2008 10:59:52 -0400 From: "Mark Shinwell" Date: Tue, 1 Jul 2008 10:59:52 -0400 To: Robert Fischer Cc: caml-list@inria.fr Subject: Re: [Caml-list] file_desc Message-ID: <20080701145952.GA22140@janestcapital.com> References: <486A40C9.2020807@smokejumperit.com> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Disposition: inline In-Reply-To: <486A40C9.2020807@smokejumperit.com> User-Agent: Mutt/1.4.2.1i X-Miltered: at concorde with ID 486A466C.000 by Joe's j-chkmail (http://j-chkmail . ensmp . fr)! X-Spam: no; 0.00; shinwell:01 desc:01 ocaml:01 ocaml:01 node:01 stdin:01 wrote:01 unix:01 unix:01 abstract:01 assert:01 assert:01 caml-list:01 int:01 int:01 On Tue, Jul 01, 2008 at 09:35:53AM -0500, Robert Fischer wrote: > Is there a way to convert a file_descr to/from an int in OCaml? The type is > abstract, and there doesn't seem to be an obvious answer. > > Alternatively, is there a way to get at an inherited file_descr from a > process I execv'd into? Not in the default standard library, I don't think. Jane Street's core library contains such a function, however. It is implemented as: external file_descr_of_int : int -> file_descr = "%identity" Another approach is to write something like: let file_descr_of_int fd = assert (fd >= 0); assert (Obj.is_int (Obj.repr Unix.stdin)); ((Obj.magic fd) : Unix.file_descr) Mark