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.4 required=5.0 tests=AWL,DATE_IN_PAST_06_12, SPF_FAIL autolearn=disabled version=3.1.3 X-Original-To: caml-list@yquem.inria.fr Delivered-To: caml-list@yquem.inria.fr Received: from mail4-relais-sop.national.inria.fr (mail4-relais-sop.national.inria.fr [192.134.164.105]) by yquem.inria.fr (Postfix) with ESMTP id 7144CBBCA for ; Tue, 26 Feb 2008 08:15:07 +0100 (CET) X-IronPort-Anti-Spam-Filtered: true X-IronPort-Anti-Spam-Result: AgAAAAdLw0fVpUAUmWdsb2JhbABCkBwBAQEBAQYEBgkIFptH X-IronPort-AV: E=Sophos;i="4.25,405,1199660400"; d="scan'208";a="23044498" Received: from mail.gmx.net ([213.165.64.20]) by mail4-smtp-sop.national.inria.fr with SMTP; 26 Feb 2008 08:15:07 +0100 Received: (qmail invoked by alias); 26 Feb 2008 07:15:05 -0000 Received: from dialin-145-254-247-231.pools.arcor-ip.net (EHLO dialin-145-254-247-231.pools.arcor-ip.net) [145.254.247.231] by mail.gmx.net (mp044) with SMTP; 26 Feb 2008 08:15:05 +0100 X-Authenticated: #11134691 X-Provags-ID: V01U2FsdGVkX1/mXaQFbEXmqS7eDQHU5V+m1fzGsiKF04sccCYZY0 pfdx3oPxSd51AY Received: from dirk by feanor.private-host.de with local (masqmail 0.2.20) id 1JTmMT-1nU-00 for ; Tue, 26 Feb 2008 00:03:53 +0100 Date: Tue, 26 Feb 2008 00:03:53 +0100 To: caml-list@yquem.inria.fr Subject: Re: [Caml-list] OO programming Message-ID: <20080225230353.GA6894@feanor> References: <47BD44FE.3050001@irisa.fr> <20080224163308.GA3459@feanor> <47C288FD.8070602@free.fr> <47C2E369.9080206@gmail.com> <47C2E68E.2020401@exalead.com> <20080225201201.GB5414@feanor> <47C32A42.3050606@free.fr> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Disposition: inline In-Reply-To: <47C32A42.3050606@free.fr> User-Agent: Mutt/1.5.6+20040523i From: Dirk Thierbach X-Y-GMX-Trusted: 0 X-Spam: no; 0.00; 0100,:01 char:01 wrote:01 caml-list:01 int:01 int:01 string:02 programming:03 let:03 let:03 feb:08 object:09 end:12 methods:12 think:13 On Mon, Feb 25, 2008 at 09:51:14PM +0100, Tiphaine.Turpin wrote: > I get the idea. Would the following satisfy your needs (you may place > the code and the type in any order) ? > > let _ = object (self) > > method init n f = > let s = make n (f 0) in > for i=1 to n-1 do > set s i (f i); > done; > s > > method virtual init : int -> (int -> char) -> string > > end Yes, cool. Didn't think of virtual methods. Thanks. - Dirk