setup.ml

   1 (* setup.ml generated for the first time by OASIS v0.4.4 *)
   2
   3 (* OASIS_START *)
   4 (* DO NOT EDIT (digest: a426e2d026defb34183b787d31fbdcff) *)
   5 (******************************************************************************)
   6 (* OASIS: architecture for building OCaml libraries and applications          *)
   7 (*                                                                            *)
   8 (* Copyright (C) 2011-2016, Sylvain Le Gall                                   *)
   9 (* Copyright (C) 2008-2011, OCamlCore SARL                                    *)
  10 (*                                                                            *)
  11 (* This library is free software; you can redistribute it and/or modify it    *)
  12 (* under the terms of the GNU Lesser General Public License as published by   *)
  13 (* the Free Software Foundation; either version 2.1 of the License, or (at    *)
  14 (* your option) any later version, with the OCaml static compilation          *)
  15 (* exception.                                                                 *)
  16 (*                                                                            *)
  17 (* This library is distributed in the hope that it will be useful, but        *)
  18 (* WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY *)
  19 (* or FITNESS FOR A PARTICULAR PURPOSE. See the file COPYING for more         *)
  20 (* details.                                                                   *)
  21 (*                                                                            *)
  22 (* You should have received a copy of the GNU Lesser General Public License   *)
  23 (* along with this library; if not, write to the Free Software Foundation,    *)
  24 (* Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA              *)
  25 (******************************************************************************)
  26
  27 let () =
  28   try
  29     Topdirs.dir_directory (Sys.getenv "OCAML_TOPLEVEL_PATH")
  30   with Not_found -> ()
  31 ;;
  32 #use "topfind";;
  33 #require "oasis.dynrun";;
  34 open OASISDynRun;;
  35
  36 let setup_t = BaseCompat.Compat_0_4.adapt_setup_t setup_t
  37 open BaseCompat.Compat_0_4
  38 (* OASIS_STOP *)
  39 let () = setup ();;