matthieu
/
dune
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Merge branch 'master' into remove-extra-conversion

This commit is contained in:
Rudi Grinberg 2018-05-25 19:17:38 +07:00 committed by GitHub
parent f0e0bf5156 e27077b86b
commit 15ce5211b8
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/odoc.ml
View File

@ -411,7 +411,7 @@ module Gen (S : sig val sctx : SC.t end) = struct
|> List.sort ~compare:(fun (x, _) (y, _) ->
String.compare (Lib.name x) (Lib.name y))
|> List.iter ~f:(fun (lib, modules) ->
Printf.bprintf b "{1 Library %s}\n" (Lib.name lib);
Printf.bprintf b "{2 Library %s}\n" (Lib.name lib);
Buffer.add_string b (
match modules with
| [ x ] ->
@ -421,7 +421,7 @@ module Gen (S : sig val sctx : SC.t end) = struct
| _ ->
sprintf
"This library exposes the following toplevel modules:\n\
{!modules:%s}.\n"
{!modules:%s}\n"
(modules
|> List.sort ~compare:(fun x y ->
Module.Name.compare (Module.name x) (Module.name y))

8
test/blackbox-tests/test-cases/odoc/run.t
View File

@ -41,14 +41,14 @@
</html>
$ dune build @foo-mld --display short
{1 Library foo}
{2 Library foo}
This library exposes the following toplevel modules:
{!modules:Foo Foo2}.
{1 Library foo.byte}
{!modules:Foo Foo2}
{2 Library foo.byte}
The entry point of this library is the module:
{!module-Foo_byte}.
$ dune build @bar-mld --display short
{1 Library bar}
{2 Library bar}
The entry point of this library is the module:
{!module-Bar}.