unikernel/duniverse/dune_/test/blackbox-tests/test-cases/dirs-with-subdir.t/dune-project

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

unikernel/duniverse/dune_/test/blackbox-tests/test-cases/dirs-with-subdir.t/run.t

@@ -0,0 +1,54 @@
+Testing the usage of the (dirs ...) stanza in the presence of a sub-directory
+
+Building as usual should work.
+  $ cat > dune << EOF
+  > (dirs :standard)
+  > EOF
+
+  $ dune build A/a
+  $ dune build B/b
+  $ dune build A/C/c
+
+If we exclude A/, dune should complain it does not know how to build it and it's
+children.
+  $ cat > dune << EOF
+  > (dirs :standard \ A)
+  > EOF
+
+  $ dune build A/a
+  Error: Don't know how to build A/a
+  [1]
+  $ dune build B/b
+  $ dune build A/C/c
+  Error: Don't know how to build A/C/c
+  [1]
+
+Same for the other directory.
+  $ cat > dune << EOF
+  > (dirs :standard \ B)
+  > EOF
+
+  $ dune build A/a
+  $ dune build B/b
+  Error: Don't know how to build B/b
+  [1]
+  $ dune build A/C/c
+
+If we wish to exclude a subdirectory of A/, the following should error and Dune
+should suggest the correct course of action.
+  $ cat > dune << EOF
+  > (dirs :standard \ A/C)
+  > EOF
+
+  $ dune build A/a
+
+This should now only fail for the excluded directory.
+  $ cat > dune << EOF
+  > (subdir A (dirs :standard \ C))
+  > EOF
+
+  $ dune build A/a
+  $ dune build B/b
+  $ dune build A/C/c
+  Error: Don't know how to build A/C/c
+  [1]