From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: 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 3420DBC8E for ; Thu, 17 Mar 2005 11:20:09 +0100 (CET) Received: from first.in-berlin.de (dialin-145-254-054-177.arcor-ip.net [145.254.54.177]) by concorde.inria.fr (8.13.0/8.13.0) with ESMTP id j2HAK74o001859 for ; Thu, 17 Mar 2005 11:20:07 +0100 Received: by first.in-berlin.de (Postfix, from userid 501) id CD30DBC4BA; Thu, 17 Mar 2005 03:45:12 +0100 (CET) Date: Thu, 17 Mar 2005 03:45:12 +0100 From: Oliver Bandel To: caml-list@yquem.inria.fr Subject: Re: [Caml-list] OCaml mentioned in BraveGNUWorld Message-ID: <20050317024512.GA710@first.in-berlin.de> References: <20050315082053.GM321@first.in-berlin.de> <20050316212544.GA21821@pegasos> <20050317015537.GF439@first.in-berlin.de> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Disposition: inline In-Reply-To: <20050317015537.GF439@first.in-berlin.de> User-Agent: Mutt/1.5.6i X-Miltered: at concorde with ID 423959D7.000 by Joe's j-chkmail (http://j-chkmail.ensmp.fr)! X-Spam: no; 0.00; oliver:01 bandel:01 oliver:01 in-berlin:01 caml-list:01 ocaml:01 bandel:01 regexp:01 ocaml:01 ...:98 ...:98 wrote:01 experimental:01 match:02 partition:02 X-Spam-Checker-Version: SpamAssassin 3.0.2 (2004-11-16) on yquem.inria.fr X-Spam-Status: No, score=0.3 required=5.0 tests=DATE_IN_PAST_06_12, FORGED_RCVD_HELO autolearn=disabled version=3.0.2 X-Spam-Level: On Thu, Mar 17, 2005 at 02:55:37AM +0100, Oliver Bandel wrote: [...] > Examples of usage: > > let filename = "sent-mail.experimental" in (* set mbox-filename *) > let input_mbox = Mbox.read filename in (* reading mbox-file *) > let rematcher = Mbox.match_body_regexp ".*ocaml" Mbox.NoCase (* create matcher-function *) > in > (* next line: splitting the mbox into matching/nonmatching mails *) > let result = Mbox.partition_rename rematcher mb2 "OCAML-matched" "OCAML-NON-MATCHED" in ^^^ \--- "input_mbox" (copy/paste/change error) Or I should have written: let mb2 = Mbox.read filename in (* reading mbox-file *) in the above code... Ciao, Oliver