modules_without_implementation suggestion uses old (pre-dune) syntax
Signed-off-by: Frédéric Bour <def@fb.com> Signed-off-by: Rudi Grinberg <rudi.grinberg@gmail.com>
This commit is contained in:
parent
58bfe376e1
commit
b4d8d4b355
|
@ -91,11 +91,12 @@ end = struct
|
|||
\nThis will become an error in the future."
|
||||
(let tag = Sexp.unsafe_atom_of_string
|
||||
"modules_without_implementation" in
|
||||
Sexp.to_string ~syntax:Dune
|
||||
(List [ tag
|
||||
; Sexp.To_sexp.(list string)
|
||||
(uncapitalized should_be_listed)
|
||||
]))
|
||||
let modules =
|
||||
should_be_listed
|
||||
|> uncapitalized
|
||||
|> List.map ~f:Sexp.To_sexp.string
|
||||
in
|
||||
Sexp.to_string ~syntax:Dune (List (tag :: modules)))
|
||||
| Some loc ->
|
||||
let list_modules l =
|
||||
uncapitalized l
|
||||
|
|
|
@ -27,7 +27,7 @@ Errors:
|
|||
Warning: Some modules don't have an implementation.
|
||||
You need to add the following field to this stanza:
|
||||
|
||||
(modules_without_implementation (x y))
|
||||
(modules_without_implementation x y)
|
||||
|
||||
This will become an error in the future.
|
||||
ocamlc .foo.objs/foo.{cmi,cmo,cmt}
|
||||
|
|
Loading…
Reference in New Issue