30 lines
1.5 KiB
OCaml
30 lines
1.5 KiB
OCaml
|
(****************************************************************************)
|
||
|
|
(* *)
|
||
|
|
(* Objective Caml *)
|
||
|
|
(* *)
|
||
|
|
(* INRIA Rocquencourt *)
|
||
|
|
(* *)
|
||
|
|
(* Copyright 2006 Institut National de Recherche en Informatique et *)
|
||
|
|
(* en Automatique. All rights reserved. This file is distributed under *)
|
||
|
|
(* the terms of the GNU Library General Public License, with the special *)
|
||
|
|
(* exception on linking described in LICENSE at the top of the Objective *)
|
||
|
|
(* Caml source tree. *)
|
||
|
|
(* *)
|
||
|
|
(****************************************************************************)
|
||
|
|
|
||
|
|
(* Authors:
|
||
|
|
* - Nicolas Pouillard: initial version
|
||
|
|
*)
|
||
|
|
|
||
|
|
(** Base class for map traversal, it includes some builtin types. *)
|
||
|
|
class c : object
|
||
|
|
method string : string -> string;
|
||
|
|
method int : int -> int;
|
||
|
|
method float : float -> float;
|
||
|
|
method bool : bool -> bool;
|
||
|
|
method list : ! 'a 'b . ('a -> 'b) -> list 'a -> list 'b;
|
||
|
|
method option : ! 'a 'b . ('a -> 'b) -> option 'a -> option 'b;
|
||
|
|
method array : ! 'a 'b . ('a -> 'b) -> array 'a -> array 'b;
|
||
|
|
method ref : ! 'a 'b . ('a -> 'b) -> ref 'a -> ref 'b;
|
||
|
|
end;
|