Source file `clang__command_line.ml`

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
let include_directory directory =
  "--include-directory=" ^ directory

let include_barrier = "--include-barrier"

let language_of_string lang =
  "--language=" ^ lang

let language lang =
  language_of_string (Clang__utils.string_of_language lang)

let standard_of_string std =
  "--std=" ^ std

let standard_of_clang std =
  standard_of_string (Clang__bindings.ext_lang_standard_get_name std)

let standard std =
  standard_of_clang (Standard.to_clang std)

let trigraphs = "-trigraphs"