Mailing list for all users of the OCaml language and system.
 help / color / mirror / Atom feed
From: "Nicolas Pouillard" <nicolas.pouillard@gmail.com>
To: joelr1 <joelr1@gmail.com>
Cc: caml-list <caml-list@inria.fr>
Subject: Re: [Caml-list] camlp4 Filters changed?
Date: Sun, 27 Jan 2008 18:24:08 +0100	[thread overview]
Message-ID: <1201454527-sup-5193@ausone.local> (raw)
In-Reply-To: <EF3C6979-3CC2-401B-BB61-FA2F910B0516@gmail.com>

Excerpts from joelr1's message of Sun Jan 27 17:37:58 +0100 2008:
> 
> 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
> 

Move it there
> module Camlp4Trash = struct
>    INCLUDE "easy_ast.ml";;
> end;;

> 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;;
> 
> 
> This used to work just fine before.

The  generator  works  on  the  last  defined  types  before  the "class map =
Camlp4MapGenerator.generated;;".

-- 
Nicolas Pouillard aka Ertai


      reply	other threads:[~2008-01-27 17:25 UTC|newest]

Thread overview: 6+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2008-01-26  0:34 Joel Reymont
2008-01-27 12:58 ` [Caml-list] " Nicolas Pouillard
2008-01-27 16:07   ` Joel Reymont
2008-01-27 16:32     ` Nicolas Pouillard
2008-01-27 16:37       ` Joel Reymont
2008-01-27 17:24         ` Nicolas Pouillard [this message]

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=1201454527-sup-5193@ausone.local \
    --to=nicolas.pouillard@gmail.com \
    --cc=caml-list@inria.fr \
    --cc=joelr1@gmail.com \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox