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 C8F89BC69 for ; Mon, 30 Apr 2007 17:29:46 +0200 (CEST) Received: from ug-out-1314.google.com (ug-out-1314.google.com [66.249.92.168]) by discorde.inria.fr (8.13.6/8.13.6) with ESMTP id l3UFTkan001275 for ; Mon, 30 Apr 2007 17:29:46 +0200 Received: by ug-out-1314.google.com with SMTP id k3so1054392ugf for ; Mon, 30 Apr 2007 08:29:46 -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=bTfISRPBjXSvomXQtvcne5wiOhfZSd1lNXVUU0OT65aUWpAHMO9eBAn0TDU1WX0JygkgQaQPs1e5R64gWPUBrWDQ1VtAn5S6aZcLu2dAS5kfljZ/JRlSUHJGxqd3G1bycBJFszaTT7FhBh0fNqMU+qDjcAvliHskixGHLNc6Ft0= 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=T+OuwoZ5OONaw21xN1tmP8QAoS7Yh5x/hiUCyUKrC/j9Hx2UfiKLdmod9V2Ci1yV52mdC9RkVVrnnK8XDtFKtSPx6FPG103+64RP/C8BpCxxR6pyxsm0TqeL0SeE7zhcyeRHW5HEqpKxViHtJHgedwYXGqpX5G4x+wN3QdroSKs= Received: by 10.82.188.15 with SMTP id l15mr12390556buf.1177946985878; Mon, 30 Apr 2007 08:29:45 -0700 (PDT) Received: from ?192.168.1.34? ( [83.52.237.136]) by mx.google.com with ESMTP id c25sm1147203ika.2007.04.30.08.29.43; Mon, 30 Apr 2007 08:29:45 -0700 (PDT) In-Reply-To: References: <220DCCF0-FD2D-4116-8E30-992C1AD3FE95@gmail.com> Mime-Version: 1.0 (Apple Message framework v752.3) Content-Type: text/plain; charset=US-ASCII; delsp=yes; format=flowed Message-Id: <72EB1952-F2C8-44AC-B1A6-7D8CE5F4A157@gmail.com> Cc: "Caml List" Content-Transfer-Encoding: 7bit From: Joel Reymont Subject: Re: Upgrading sexplib-2.7.0 to camlp4 3.10 Date: Mon, 30 Apr 2007 16:29:39 +0100 To: "Nicolas Pouillard" X-Mailer: Apple Mail (2.752.3) X-j-chkmail-Score: MSGID : 46360B6A.000 on discorde : j-chkmail score : XXX : 5/20 1 0.000 -> 3 X-Miltered: at discorde with ID 46360B6A.000 by Joe's j-chkmail (http://j-chkmail . ensmp . fr)! X-Spam: no; 0.00; camlp:01 syntax:01 pcaml:01 pcaml:01 decl:01 idl:01 lident:01 idl:01 decl:01 vals:01 defs:01 vals:01 sexp:01 rec:01 deprecated:01 One last chunk in that huge file... --- Parse error: Deprecated syntax, the grammar module is expected Preprocessor error --- This points at "str" in Pcaml.str_item in DELETE_RULE. How do I fix? Also, would you have any comments on the code in EXTEND? Thanks, Joel --- DELETE_RULE Pcaml.str_item: "type"; LIST1 Pcaml.type_declaration SEP "and" END EXTEND GLOBAL: Pcaml.str_item; with_decl: [[ td = Pcaml.type_declaration; "with"; idl = LIST1 LIDENT SEP "," -> td, idl | td = Pcaml.type_declaration -> td, [] ]]; Pcaml.str_item: [[ "type"; twdl = LIST1 with_decl SEP "and" -> let tys = List.map fst twdl in let der_vals, der_tys = both List.concat List.concat (List.split (List.map gen_derived_defs twdl)) in let tydef = <:str_item< type $list:tys @ der_tys$ >> in let valdef = <:str_item< value rec $list:der_vals$ >> in match der_vals with | [] -> tydef | _ -> <:str_item< declare $tydef$; $valdef$; end >> ]]; Pcaml.str_item: [[ "SEXP_CONV_PATH"; conv_path = STRING -> set_conv_path conv_path; StDcl (_loc, []) ]]; END -- http://wagerlabs.com/