unikernel/duniverse/dune_/test/blackbox-tests/test-cases/include-qualified/nested-lib-interface.t/dune

@@ -0,0 +1,3 @@
+(rule
+ (alias default)
+ (action (run ./exe/test.exe)))

unikernel/duniverse/dune_/test/blackbox-tests/test-cases/include-qualified/nested-lib-interface.t/dune-project

@@ -0,0 +1 @@
+(lang dune 3.7)

unikernel/duniverse/dune_/test/blackbox-tests/test-cases/include-qualified/nested-lib-interface.t/exe/dune

@@ -0,0 +1,3 @@
+(executable
+ (libraries foolib)
+ (name test))

unikernel/duniverse/dune_/test/blackbox-tests/test-cases/include-qualified/nested-lib-interface.t/exe/test.ml

@@ -0,0 +1,3 @@
+let () =
+  Foolib.Bar.Fake.run ();
+  Foolib.Bar.Baz.run ()

unikernel/duniverse/dune_/test/blackbox-tests/test-cases/include-qualified/nested-lib-interface.t/lib/bar/bar.ml

@@ -0,0 +1,5 @@
+module Fake = struct
+  let run () =
+    print_endline "defined in lib interface file"
+end
+module Baz = Baz

unikernel/duniverse/dune_/test/blackbox-tests/test-cases/include-qualified/nested-lib-interface.t/lib/bar/baz.ml

@@ -0,0 +1 @@
+let run () = print_endline "hello from baz"

unikernel/duniverse/dune_/test/blackbox-tests/test-cases/include-qualified/nested-lib-interface.t/lib/dune

@@ -0,0 +1,4 @@
+(include_subdirs qualified)
+
+(library
+ (name foolib))

unikernel/duniverse/dune_/test/blackbox-tests/test-cases/include-qualified/nested-lib-interface.t/lib/foolib.ml

@@ -0,0 +1 @@
+module Bar = Bar

unikernel/duniverse/dune_/test/blackbox-tests/test-cases/include-qualified/nested-lib-interface.t/run.t

@@ -0,0 +1,36 @@
+We are also allowed to write lib interface files at each level.
+  $ dune build
+  defined in lib interface file
+  hello from baz
+
+  $ find _build -iname "*.cmi" | sort
+  _build/default/exe/.test.eobjs/byte/dune__exe__Test.cmi
+  _build/default/lib/.foolib.objs/byte/foolib.cmi
+  _build/default/lib/.foolib.objs/byte/foolib__.cmi
+  _build/default/lib/.foolib.objs/byte/foolib__Bar.cmi
+  _build/default/lib/.foolib.objs/byte/foolib__Bar__.cmi
+  _build/default/lib/.foolib.objs/byte/foolib__Bar__Baz.cmi
+  _build/default/lib/.foolib.objs/byte/foolib__Private.cmi
+
+  $ find _build -iname "*.ml-gen" | sort | while read file; do echo "contents of $file"; cat $file; echo "--------"; done;
+  contents of _build/default/lib/foolib__.ml-gen
+  (* generated by dune *)
+  
+  (** @canonical Foolib.Bar *)
+  module Bar = Foolib__Bar
+  
+  (** @canonical Foolib.Private *)
+  module Private = Foolib__Private
+  
+  module Foolib__ = struct end
+  [@@deprecated "this module is shadowed"]
+  --------
+  contents of _build/default/lib/foolib__Bar__.ml-gen
+  (* generated by dune *)
+  
+  (** @canonical Foolib.Bar.Baz *)
+  module Baz = Foolib__Bar__Baz
+  
+  module Foolib__Bar__ = struct end
+  [@@deprecated "this module is shadowed"]
+  --------