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=AWL autolearn=disabled version=3.1.3 X-Original-To: caml-list@yquem.inria.fr Delivered-To: caml-list@yquem.inria.fr Received: from mail2-relais-roc.national.inria.fr (mail2-relais-roc.national.inria.fr [192.134.164.83]) by yquem.inria.fr (Postfix) with ESMTP id E3BBDBB84 for ; Thu, 11 Sep 2008 12:16:41 +0200 (CEST) X-IronPort-Anti-Spam-Filtered: true X-IronPort-Anti-Spam-Result: AiUCAHONyEjAXQIniGdsb2JhbACSYwEBAQ8gpSyBZA X-IronPort-AV: E=Sophos;i="4.32,378,1217800800"; d="scan'208";a="14821988" Received: from concorde.inria.fr ([192.93.2.39]) by mail2-smtp-roc.national.inria.fr with ESMTP; 11 Sep 2008 12:16:36 +0200 Received: from mail1-relais-roc.national.inria.fr (mail1-relais-roc.national.inria.fr [192.134.164.82]) by concorde.inria.fr (8.13.6/8.13.6) with ESMTP id m8BAGZ1D025663 (version=TLSv1/SSLv3 cipher=RC4-SHA bits=128 verify=OK) for ; Thu, 11 Sep 2008 12:16:35 +0200 X-IronPort-Anti-Spam-Filtered: true X-IronPort-Anti-Spam-Result: ApoEAMeMyEhREHR+/2dsb2JhbAC4QYFk X-IronPort-AV: E=Sophos;i="4.32,378,1217800800"; d="scan'208";a="17123330" Received: from unknown (HELO office.stork.ru) ([81.16.116.126]) by mail1-smtp-roc.national.inria.fr with ESMTP/TLS/DHE-RSA-AES256-SHA; 11 Sep 2008 12:16:35 +0200 Received: from [192.168.21.130] (serp [192.168.21.130]) by office.stork.ru (8.13.5/8.13.5) with ESMTP id m8BAGRkG004601 for ; Thu, 11 Sep 2008 14:16:33 +0400 Subject: Camlp4. print variable value to target source. From: =?UTF-8?Q?=D0=A1=D0=B5=D1=80=D0=B3=D0=B5=D0=B9_?= =?UTF-8?Q?=D0=9F=D0=BB=D0=B0=D0=BA=D1=81=D0=B8=D0=BD?= To: Caml List Content-Type: text/plain Date: Thu, 11 Sep 2008 14:16:26 +0400 Message-Id: <1221128186.15737.10.camel@serphost.localdomain> Mime-Version: 1.0 X-Mailer: Evolution 2.22.3.1 Content-Transfer-Encoding: 7bit X-Miltered: at concorde with ID 48C8F003.000 by Joe's j-chkmail (http://j-chkmail . ensmp . fr)! X-Spam: no; 0.00; camlp:01 camlp:01 parser:01 ctyp:01 ctyp:01 W12:98 W14:98 int:01 int:01 ast:02 ast:02 loc:03 loc:03 let:03 let:03 Sorry for my bad english. I'am write camlp4 parser. Correct code: ----- <:str_item>>> ---- this will be converted to: ---- let a = Ast.TyId (_loc, Ast.IdLid (_loc, "int")); ------- Exitst any way to do such things? ------ let t = <:ctyp> in <:str_item> ---- || ----- let t = Ast.TyId (_loc, Ast.IdLid (_loc, "int")); -----