blob: 09f2b4ca194b0e69da6a6bba059906d07b05c7c4 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
|
(************************************************************************)
(* v * The Coq Proof Assistant / The Coq Development Team *)
(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2017 *)
(* \VV/ **************************************************************)
(* // * This file is distributed under the terms of the *)
(* * GNU Lesser General Public License Version 2.1 *)
(************************************************************************)
(** This file provides a high-level interface to the environment variables
needed by Coq to run (such as coqlib). The values of these variables
may come from different sources (shell environment variables,
command line options, options set at the time Coq was build). *)
(** [expand_path_macros warn s] substitutes environment variables
in a string by their values. This function also takes care of
substituting path of the form '~X' by an absolute path.
Use [warn] as a message displayer. *)
val expand_path_macros : warn:(string -> unit) -> string -> string
(** [home warn] returns the root of the user directory, depending
on the OS. This information is usually stored in the $HOME
environment variable on POSIX shells. If no such variable
exists, then other common names are tried (HOMEDRIVE, HOMEPATH,
USERPROFILE). If all of them fail, [warn] is called. *)
val home : warn:(string -> unit) -> string
(** [coqlib] is the path to the Coq library. *)
val coqlib : unit -> string
(** [docdir] is the path to the installed documentation. *)
val docdir : unit -> string
(** [datadir] is the path to the installed data directory. *)
val datadir : unit -> string
(** [configdir] is the path to the installed config directory. *)
val configdir : unit -> string
(** [set_coqlib] must be runned once before any access to [coqlib] *)
val set_coqlib : fail:(string -> string) -> unit
(** [coqbin] is the name of the current executable. *)
val coqbin : string
(** [coqroot] is the path to [coqbin].
The following value only makes sense when executables are running from
source tree (e.g. during build or in local mode).
*)
val coqroot : string
(** [coqpath] is the standard path to coq.
Notice that coqpath is stored in reverse order, since that is
the order it gets added to the search path. *)
val coqpath : string list
(** [camlfind ()] is the path to the ocamlfind binary. *)
val ocamlfind : unit -> string
(** [camlp4bin ()] is the path to the camlp4 binary. *)
val camlp4bin : unit -> string
(** [camlp4lib ()] is the path to the camlp4 library. *)
val camlp4lib : unit -> string
(** [camlp4 ()] is the camlp4 utility. *)
val camlp4 : unit -> string
(** Coq tries to honor the XDG Base Directory Specification to access
the user's configuration files.
see [http://standards.freedesktop.org/basedir-spec/basedir-spec-latest.html]
*)
val xdg_config_home : (string -> unit) -> string
val xdg_data_home : (string -> unit) -> string
val xdg_data_dirs : (string -> unit) -> string list
val xdg_dirs : warn : (string -> unit) -> string list
(** {6 Prints the configuration information } *)
val print_config : ?prefix_var_name:string -> out_channel -> string list -> unit
|
