unikernel/duniverse/dune_/test/blackbox-tests/test-cases/dialects/good.t/dune

@@ -0,0 +1,9 @@
+(executable
+ (name main)
+ (public_name main)
+ (modules main))
+
+(executable
+ (name fmt)
+ (public_name fmt)
+ (modules fmt))

unikernel/duniverse/dune_/test/blackbox-tests/test-cases/dialects/good.t/dune-project

@@ -0,0 +1,11 @@
+(lang dune 1.11)
+(using fmt 1.2 (enabled_for mlfi))
+
+(dialect
+ (name mlfi)
+ (implementation
+  (extension mf)
+  (format (run fmt %{input-file})))
+ (interface
+  (extension mfi)
+  (format (run fmt %{input-file}))))

unikernel/duniverse/dune_/test/blackbox-tests/test-cases/dialects/good.t/fmt.ml

@@ -0,0 +1 @@
+prerr_endline ("Formatting " ^ Sys.argv.(1))

unikernel/duniverse/dune_/test/blackbox-tests/test-cases/dialects/good.t/run.t

@@ -0,0 +1,7 @@
+Test the (dialect ...) stanza inside the dune-project file.
+
+  $ dune exec ./main.exe
+
+  $ dune build @fmt
+  Formatting main.mf
+  Formatting main.mfi