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 concorde.inria.fr (concorde.inria.fr [192.93.2.39]) by yquem.inria.fr (Postfix) with ESMTP id 94B37BB9A for ; Tue, 8 Nov 2005 19:40:09 +0100 (CET) Received: from smtp006.mail.ukl.yahoo.com (smtp006.mail.ukl.yahoo.com [217.12.11.95]) by concorde.inria.fr (8.13.0/8.13.0) with SMTP id jA8Ie9ZS012180 for ; Tue, 8 Nov 2005 19:40:09 +0100 Received: (qmail 75132 invoked from network); 8 Nov 2005 18:35:27 -0000 DomainKey-Signature: a=rsa-sha1; q=dns; c=nofws; s=s1024; d=yahoo.fr; h=Received:Message-ID:Date:From:User-Agent:X-Accept-Language:MIME-Version:CC:Subject:References:In-Reply-To:Content-Type:Content-Transfer-Encoding; b=Ega1xzNprQva2iNpqRG3jOz50WT//PFvxVU633JQu5km6FmUgSgPHnXOJj5fAkRd93DWRKOE2/GrIK11JYa9Q2rfi9lUWjJCBEA6p0XK2FITTPdpSekI0Q2zrp3h7+xOZqLMDP+XTmQ+tZ52P+L/kD2C1FVRCZUQ7+yLzL20gAc= ; Received: from unknown (HELO ?84.102.56.136?) (sejourne?kevin@84.102.56.136 with plain) by smtp006.mail.ukl.yahoo.com with SMTP; 8 Nov 2005 18:35:27 -0000 Message-ID: <4370F170.6050008@yahoo.fr> Date: Tue, 08 Nov 2005 19:41:52 +0100 From: sejourne_kevin User-Agent: Mozilla Thunderbird 1.0.7 (X11/20051017) X-Accept-Language: fr, en MIME-Version: 1.0 Cc: caml-list@yquem.inria.fr Subject: Re: [Caml-list] A feature wish on Toplevel directives. References: <4367987D.3030905@yahoo.fr> <84F5D2B8-064B-4BE6-9954-443C72DE270B@itkinetix.com> In-Reply-To: <84F5D2B8-064B-4BE6-9954-443C72DE270B@itkinetix.com> Content-Type: text/plain; charset=ISO-8859-1; format=flowed Content-Transfer-Encoding: 8bit X-Miltered: at concorde with ID 4370F109.000 by Joe's j-chkmail (http://j-chkmail.ensmp.fr)! X-Spam: no; 0.00; caml-list:01 toplevel:01 lexing:01 toploop:01 toplevel:01 toploop:01 sprintf:01 telechargez:98 assert:01 parse:02 string:03 let:03 let:03 ecrit:04 formatter:05 X-Spam-Checker-Version: SpamAssassin 3.0.3 (2005-04-27) on yquem.inria.fr X-Spam-Level: X-Spam-Status: No, score=0.0 required=5.0 tests=none autolearn=disabled version=3.0.3 Eric Stokes a écrit : > Try this, > > let eval s = > let l = Lexing.from_string s in > let ph = !Toploop.parse_toplevel_phrase l in > assert(Toploop.execute_phrase false Format.err_formatter ph) > ;; > > eval (sprintf "#use \"%s\";;" p);; > Thanks very mush ! Kévin. ___________________________________________________________________________ Appel audio GRATUIT partout dans le monde avec le nouveau Yahoo! Messenger Téléchargez cette version sur http://fr.messenger.yahoo.com