Formatting tweaks
Signed-off-by: Rudi Grinberg <rudi.grinberg@gmail.com>
This commit is contained in:
parent
f121a1546e
commit
7fbe0bc172
|
@ -326,21 +326,23 @@ module Dep_conf = struct
|
||||||
open Sexp
|
open Sexp
|
||||||
let sexp_of_t = function
|
let sexp_of_t = function
|
||||||
| File t ->
|
| File t ->
|
||||||
List [Sexp.unsafe_atom_of_string "file" ; String_with_vars.sexp_of_t t]
|
List [ Sexp.unsafe_atom_of_string "file"
|
||||||
|
; String_with_vars.sexp_of_t t ]
|
||||||
| Alias t ->
|
| Alias t ->
|
||||||
List [Sexp.unsafe_atom_of_string "alias" ; String_with_vars.sexp_of_t t]
|
List [ Sexp.unsafe_atom_of_string "alias"
|
||||||
|
; String_with_vars.sexp_of_t t ]
|
||||||
| Alias_rec t ->
|
| Alias_rec t ->
|
||||||
List [Sexp.unsafe_atom_of_string "alias_rec" ;
|
List [ Sexp.unsafe_atom_of_string "alias_rec"
|
||||||
String_with_vars.sexp_of_t t]
|
; String_with_vars.sexp_of_t t ]
|
||||||
| Glob_files t ->
|
| Glob_files t ->
|
||||||
List [Sexp.unsafe_atom_of_string "glob_files" ;
|
List [ Sexp.unsafe_atom_of_string "glob_files"
|
||||||
String_with_vars.sexp_of_t t]
|
; String_with_vars.sexp_of_t t ]
|
||||||
| Source_tree t ->
|
| Source_tree t ->
|
||||||
List [Sexp.unsafe_atom_of_string "files_recursively_in" ;
|
List [ Sexp.unsafe_atom_of_string "files_recursively_in"
|
||||||
String_with_vars.sexp_of_t t]
|
; String_with_vars.sexp_of_t t ]
|
||||||
| Package t ->
|
| Package t ->
|
||||||
List [Sexp.unsafe_atom_of_string "package" ;
|
List [ Sexp.unsafe_atom_of_string "package"
|
||||||
String_with_vars.sexp_of_t t]
|
; String_with_vars.sexp_of_t t]
|
||||||
| Universe ->
|
| Universe ->
|
||||||
Sexp.unsafe_atom_of_string "universe"
|
Sexp.unsafe_atom_of_string "universe"
|
||||||
end
|
end
|
||||||
|
|
Loading…
Reference in New Issue