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=1.0 required=5.0 tests=AWL,SPF_NEUTRAL autolearn=disabled version=3.1.3 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 07D46BC6C for ; Sun, 27 Jan 2008 17:38:05 +0100 (CET) X-IronPort-Anti-Spam-Filtered: true X-IronPort-Anti-Spam-Result: AgAAADZCnEfAXQInh2dsb2JhbACQKAEBAQgKKZN5hgI X-IronPort-AV: E=Sophos;i="4.25,256,1199660400"; d="scan'208";a="8420303" Received: from concorde.inria.fr ([192.93.2.39]) by mail3-smtp-sop.national.inria.fr with ESMTP; 27 Jan 2008 17:38:04 +0100 Received: from mail3-relais-sop.national.inria.fr (mail3-relais-sop.national.inria.fr [192.134.164.104]) by concorde.inria.fr (8.13.6/8.13.6) with ESMTP id m0RGc3ZF025222 (version=TLSv1/SSLv3 cipher=RC4-SHA bits=128 verify=OK) for ; Sun, 27 Jan 2008 17:38:04 +0100 X-IronPort-Anti-Spam-Filtered: true X-IronPort-Anti-Spam-Result: AgAAADZCnEdIDtydemdsb2JhbACQKAEBCQgpk3uGAg X-IronPort-AV: E=Sophos;i="4.25,256,1199660400"; d="scan'208";a="8420301" Received: from fg-out-1718.google.com ([72.14.220.157]) by mail3-smtp-sop.national.inria.fr with ESMTP; 27 Jan 2008 17:38:03 +0100 Received: by fg-out-1718.google.com with SMTP id 22so1384259fge.25 for ; Sun, 27 Jan 2008 08:38:03 -0800 (PST) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=gamma; h=domainkey-signature:received:received:cc:message-id:from:to:in-reply-to:content-type:content-transfer-encoding:mime-version:subject:date:references:x-mailer; bh=2wgBT0pbp3M5Ttw4iyylSoRJHVhdDeYxAxwe9tEC9Vc=; b=ToMkn5nG4iS1M0Pqh288JCkVq5LGUF0lkF4oIqSKD4ciz1+HR6Z34eOfoTL6leQEG6xfI+/bZKz/8HxvrKz7hgpU6dV8sp5YrH0auNXxuM8M4O1wymtPwJ0qzCMNg1t6HrgKrP6ZglSUWGAtOknxJwMiyuek0upwA4lKspR3pFs= DomainKey-Signature: a=rsa-sha1; c=nofws; d=gmail.com; s=gamma; h=cc:message-id:from:to:in-reply-to:content-type:content-transfer-encoding:mime-version:subject:date:references:x-mailer; b=ZxyNh9cOX+NBigyt46iFIilfkNLjWohGwxxeQxE0cZ4PECPoqDsFSf7Pn23504uccUWrmvloFcVuR5CpxF4mcwiW58Q0500SCka0Rt9XTmIp1HPxu9PjDvncs+heXNbJgeAjhlR+1MHNLuhEmWgT+isBI6K3uZJLmRJj1249Rn8= Received: by 10.82.107.15 with SMTP id f15mr8065424buc.0.1201451883422; Sun, 27 Jan 2008 08:38:03 -0800 (PST) Received: from ?192.168.1.36? ( [79.145.11.219]) by mx.google.com with ESMTPS id q9sm5783622gve.10.2008.01.27.08.38.01 (version=SSLv3 cipher=OTHER); Sun, 27 Jan 2008 08:38:02 -0800 (PST) Cc: caml-list Message-Id: From: Joel Reymont To: "Nicolas Pouillard" In-Reply-To: <1201451422-sup-4208@ausone.local> Content-Type: text/plain; charset=US-ASCII; format=flowed; delsp=yes Content-Transfer-Encoding: 7bit Mime-Version: 1.0 (Apple Message framework v915) Subject: Re: [Caml-list] camlp4 Filters changed? Date: Sun, 27 Jan 2008 16:37:58 +0000 References: <1201438563-sup-8235@ausone.local> <1201451422-sup-4208@ausone.local> X-Mailer: Apple Mail (2.915) X-Miltered: at concorde with ID 479CB36B.000 by Joe's j-chkmail (http://j-chkmail . ensmp . fr)! X-Spam: no; 0.00; camlp:01 camlp:01 expr:01 expr:01 struct:01 token:01 token:01 wrote:01 caml-list:01 inherit:01 define:02 ast:02 ast:02 match:02 declaration:02 On Jan 27, 2008, at 4:32 PM, Nicolas Pouillard wrote: > That's certainly because you need to define your types as one big > definition (using "and"). > > type t1 = ... > and t2 = ... > and t3 = ... > > class map = Camlp4MapGenerator.generated; > > Because the generation declaration take only the last definition > group now. That's exactly what my AST looks like. Then I have (in a different ml file) open Easy_ast class map = Camlp4MapGenerator.generated;; let strip_token_loc = object inherit map as super method expr e = match super#expr e with | `TokenPos (a, _) -> a | e -> e end let strip_stmt x = strip_token_loc#statement x;; module Camlp4Trash = struct INCLUDE "easy_ast.ml";; end;; This used to work just fine before. Thanks, Joel -- http://wagerlabs.com