1 (*************************************************************************)
3 (* Objective Caml LablTk library *)
5 (* Jacques Garrigue, Kyoto University RIMS *)
7 (* Copyright 1999 Institut National de Recherche en Informatique et *)
8 (* en Automatique and Kyoto University. All rights reserved. *)
9 (* This file is distributed under the terms of the GNU Library *)
10 (* General Public License, with the special exception on linking *)
11 (* described in file ../../../LICENSE. *)
13 (*************************************************************************)
15 (* $Id: jg_memo.mli 4144 2001-12-07 13:41:02Z xleroy $ *)
17 val fast : f:('a -> 'b) -> 'a -> 'b
18 (* "fast" memoizer: uses a List.assq like function *)
19 (* Good for a smallish number of keys, phisically equal *)