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 X-Original-To: caml-list@yquem.inria.fr Delivered-To: caml-list@yquem.inria.fr Received: from discorde.inria.fr (discorde.inria.fr [192.93.2.38]) by yquem.inria.fr (Postfix) with ESMTP id 67527BC6B for ; Fri, 1 Jun 2007 00:16:11 +0200 (CEST) Received: from an-out-0708.google.com (an-out-0708.google.com [209.85.132.248]) by discorde.inria.fr (8.13.6/8.13.6) with ESMTP id l4VMG9gj018231 for ; Fri, 1 Jun 2007 00:16:10 +0200 Received: by an-out-0708.google.com with SMTP id c24so129495ana for ; Thu, 31 May 2007 15:16:09 -0700 (PDT) DKIM-Signature: a=rsa-sha1; c=relaxed/relaxed; d=gmail.com; s=beta; h=domainkey-signature:received:received:in-reply-to:references:mime-version:content-type:message-id:cc:content-transfer-encoding:from:subject:date:to:x-mailer; b=BDpu7D2XPpl06jHfa3AP3TeJIYzWPKtQOoMxwudLDMbAC/zuaaYIjZ2qQPaSJs/W8NNxl5YKh1xYAVzjMcs44ixTY4FyHMsTQTSpHOfOAT/G+RJnn1LIf+Tu3Iz0H1J+BeOXx+vNK6WZRHPakgJk2Zh44Wn+PzqloPdCwXNrDRY= DomainKey-Signature: a=rsa-sha1; c=nofws; d=gmail.com; s=beta; h=received:in-reply-to:references:mime-version:content-type:message-id:cc:content-transfer-encoding:from:subject:date:to:x-mailer; b=qOuQ0yck4JkL4YFy5JNNbEOOKEsG1abFwY7U4Xpim9jA7CtmsCDUvaj4zMgC4T7o3byKyZaFIZhYDyflnlvrV6K8rPINbk9XRqsUfnqf4O0OjqW1NINRQ4xmS3gRir32d1w1KRGEuqPDvsiCsn3nyLZkmZy9oVZOyIS6L4Ni7dk= Received: by 10.78.147.6 with SMTP id u6mr721505hud.1180649768589; Thu, 31 May 2007 15:16:08 -0700 (PDT) Received: from ?192.168.1.33? ( [81.32.170.248]) by mx.google.com with ESMTP id 6sm185601nfv.2007.05.31.15.16.07; Thu, 31 May 2007 15:16:07 -0700 (PDT) In-Reply-To: References: <5F8F1647-A4A8-4C71-9958-9370C44ECB84@gmail.com> <979C8DFA-180A-4AA2-8D5A-63083BDDAEE7@gmail.com> Mime-Version: 1.0 (Apple Message framework v752.3) Content-Type: text/plain; charset=US-ASCII; delsp=yes; format=flowed Message-Id: <54A13A07-94F8-426D-8900-4685C259CE54@gmail.com> Cc: "OCaml List" Content-Transfer-Encoding: 7bit From: Joel Reymont Subject: Re: GenerateFold Date: Thu, 31 May 2007 23:16:12 +0100 To: "Nicolas Pouillard" X-Mailer: Apple Mail (2.752.3) X-j-chkmail-Score: MSGID : 465F4929.003 on discorde : j-chkmail score : XXX : 5/20 1 0.000 -> 3 X-Miltered: at discorde with ID 465F4929.003 by Joe's j-chkmail (http://j-chkmail . ensmp . fr)! X-Spam: no; 0.00; camlp:01 val:01 decl:01 decl:01 camlp:01 struct:01 blog:98 inherit:01 ast:02 match:02 arg:03 arg:03 module:03 let:03 let:03 Nicolas, Could there be some other reason for this error? I comment out everything but the "fold" and still get it. Thanks, Joel --- class fold = Camlp4Filters.GenerateFold.generated;; (* let is_fun_arg = object (self) inherit fold as super val found = false method found = found method input_decl x = match super#input_decl x with | `FunArgDecl _ -> {< found = true >} | _ -> self end let is_fun x = (is_fun_arg#statement x)#found;; *) module Camlp4Trash = struct INCLUDE "easy_ast.ml";; end;; -- http://topdog.cc - EasyLanguage to C# translator http://wagerlabs.com - Blog