From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: 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 7E4DCBC9F for ; Wed, 10 Aug 2005 08:22:35 +0200 (CEST) Received: from pauillac.inria.fr (pauillac.inria.fr [128.93.11.35]) by concorde.inria.fr (8.13.0/8.13.0) with ESMTP id j7A6MZdD018374 for ; Wed, 10 Aug 2005 08:22:35 +0200 Received: from nez-perce.inria.fr (nez-perce.inria.fr [192.93.2.78]) by pauillac.inria.fr (8.7.6/8.7.3) with ESMTP id IAA11910 for ; Wed, 10 Aug 2005 08:22:34 +0200 (MET DST) From: osiire@k8.dion.ne.jp Received: from kfep04.dion.ne.jp (kfep04.dion.ne.jp [203.181.105.166]) by nez-perce.inria.fr (8.13.0/8.13.0) with ESMTP id j7A6MW1V002588 for ; Wed, 10 Aug 2005 08:22:33 +0200 Received: from wednesday.myhome.local ([222.14.97.49]) by kfep04.dion.ne.jp with ESMTP id <20050810062230801.DVUJ@kfep04.dion.ne.jp>; Wed, 10 Aug 2005 15:22:30 +0900 Date: Wed, 10 Aug 2005 15:21:56 +0900 Message-ID: <873bpi2tx7.wl%osiire@k8.dion.ne.jp> To: caml-list@inria.fr Subject: Re: [Caml-list] right-associating infix application operator camlp4 extension In-Reply-To: <7B0AADBE-23D8-4C63-ABE7-75360C874E13@lrde.epita.fr> References: <7B0AADBE-23D8-4C63-ABE7-75360C874E13@lrde.epita.fr> User-Agent: Wanderlust/2.10.1 MIME-Version: 1.0 (generated by SEMI 1.14.6 - "Maruoka") Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: quoted-printable X-Miltered: at concorde with ID 42F99D2B.000 by Joe's j-chkmail (http://j-chkmail.ensmp.fr)! X-Miltered: at nez-perce with ID 42F99D28.000 by Joe's j-chkmail (http://j-chkmail.ensmp.fr)! X-Spam: no; 0.00; caml-list:01 infix:01 lrde:01 lrde:01 haskell-like:01 val:01 val:01 874:98 wrote:01 define:01 string:03 string:03 unit:03 unit:03 let:03 X-Spam-Checker-Version: SpamAssassin 3.0.3 (2005-04-27) on yquem.inria.fr X-Spam-Level: X-Spam-Status: No, score=0.2 required=5.0 tests=FORGED_RCVD_HELO,NO_REAL_NAME autolearn=disabled version=3.0.3 Hi. On Sat, 6 Aug 2005 16:03:55 -0700 In <7B0AADBE-23D8-4C63-ABE7-75360C874E13@lrde.epita.fr> Qu=F4c Peyrot wrote: > Is there any existing camlp4 extensions to define a $ haskell-like =20 > operator? Maybe "@" and "^" are right-associated. # let ( ^$ ) f x =3D f x;; val ( ^$ ) : ('a -> 'b) -> 'a -> 'b =3D # print_string ^$ List.fold_left (fun x sum -> sum ^ x) "" ^$ ["1";"2";"3"]= ;; 321- : unit =3D () # let ( @$ ) f x =3D f x;; val ( @$ ) : ('a -> 'b) -> 'a -> 'b =3D # print_string @$ List.fold_left (fun x sum -> sum ^ x) "" @$ ["1";"2";"3"= ];; 321- : unit =3D () --- osiire