1(**************************************************************************)
2(*                                                                        *)
3(*                                 OCaml                                  *)
4(*                                                                        *)
5(*             Xavier Leroy, projet Cristal, INRIA Rocquencourt           *)
6(*                                                                        *)
7(*   Copyright 1996 Institut National de Recherche en Informatique et     *)
8(*     en Automatique.                                                    *)
9(*                                                                        *)
10(*   All rights reserved.  This file is distributed under the terms of    *)
11(*   the GNU Lesser General Public License version 2.1, with the          *)
12(*   special exception on linking described in the file LICENSE.          *)
13(*                                                                        *)
14(**************************************************************************)
15
16let () = let module M = Schedgen in () (* to create a dependency *)
17
18(* Scheduling is turned off because our model does not fit the 486
19   nor the Pentium very well. In particular, it messes up with the
20   float reg stack. The Pentiums Pro / II / III / etc schedule
21   at run-time much better than what we could do. *)
22
23let fundecl f = f
24