Source file `Dune_project.ml`

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
[@@@ocaml.text "/*"]

(** Copyright 2021-2025, Kakadu. *)

(** SPDX-License-Identifier: LGPL-3.0-or-later *)

[@@@ocaml.text "/*"]

let string_of_sexp = Base.string_of_sexp
let sexp_of_string = Base.sexp_of_string
let option_of_sexp = Base.option_of_sexp
let sexp_of_option = Base.sexp_of_option
let list_of_sexp = Base.list_of_sexp
let sexp_of_list = Base.sexp_of_list
let bool_of_sexp = Base.bool_of_sexp
let sexp_of_bool = Base.sexp_of_bool

type module_ =
  { name : string
  ; impl : string option
  ; intf : string option
  ; cmt : string option
  ; cmti : string option
  }
[@@deriving sexp]

let module_ ?cmt ?cmti name = { name; cmt; cmti; impl = None; intf = None }

type executables =
  { names : string list
  ; modules : module_ list
  ; requires : string list
  ; include_dirs : string list
  }
[@@deriving of_sexp]

module Library = struct
  type t =
    { name : string
    ; uid : string
    ; local : bool
    ; requires : string list
    ; source_dir : string
    ; modules : module_ list
    ; include_dirs : string list
    }
  [@@deriving of_sexp]
end

type t =
  | Executables of executables
  | Library of Library.t
  | Root of string
  | Build_context of string
[@@deriving of_sexp]