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=none autolearn=disabled version=3.1.3 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 925A3BC69 for ; Wed, 7 Feb 2007 03:29:31 +0100 (CET) Received: from yquem.inria.fr (yquem.inria.fr [128.93.8.37]) by concorde.inria.fr (8.13.6/8.13.6) with ESMTP id l172TVFl005552 for ; Wed, 7 Feb 2007 03:29:31 +0100 Received: by yquem.inria.fr (Postfix, from userid 25991) id 31F2FBC69; Wed, 7 Feb 2007 03:29:31 +0100 (CET) Date: Wed, 7 Feb 2007 03:29:31 +0100 From: Daniel de Rauglaudre To: caml-list@inria.fr Subject: Re: [Caml-list] Obj.t : Illegal instruction (and camlp4) Message-ID: <20070207022931.GA24805@yquem.inria.fr> References: <20070207014717.GA17319@pulp.rsise.anu.edu.au> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Disposition: inline In-Reply-To: <20070207014717.GA17319@pulp.rsise.anu.edu.au> User-Agent: Mutt/1.5.9i X-Miltered: at concorde with ID 45C9398B.001 by Joe's j-chkmail (http://j-chkmail . ensmp . fr)! X-Spam: no; 0.00; rauglaudre:01 rauglaudre:01 camlp:01 expr:01 expr:01 wrote:01 token:01 token:01 caml-list:01 semantic:02 parameters:02 loc:03 loc:03 let:03 let:03 Hi, On Wed, Feb 07, 2007 at 12:47:17PM +1100, Pietro Abate wrote: > let make_entry rt (token_list,action) = > let _loc = Token.dummy_loc in > let el = List.map (make_token rt) token_list in > let a = (fun _ _ -> <:expr< "dummy_action" >>) in > (el,Gramext.action (Obj.repr a)) > ;; Replace: let a = (fun _ _ -> <:expr< "dummy_action" >>) in by: let a = List.fold_left (fun a _ -> Obj.magic (fun _ a)) (Obj.magic (fun _loc -> <:expr< "dummy_action" >>)) token_list in The semantic action must have as many parameters as the length of the symbols list plus one (the last one being the location of the rule). -- Daniel de Rauglaudre http://pauillac.inria.fr/~ddr/