blackbox tests for tests stanza

Signed-off-by: Rudi Grinberg <rudi.grinberg@gmail.com>
ocaml · Jul 4, 2018 · 5ff63c8 · 5ff63c8
1 parent 91077f4
commit 5ff63c8
Show file tree

Hide file tree

Showing 5 changed files with 19 additions and 0 deletions.
diff --git a/test/blackbox-tests/dune.inc b/test/blackbox-tests/dune.inc
@@ -571,6 +571,14 @@
    test-cases/syntax-versioning
    (progn (run %{exe:cram.exe} -test run.t) (diff? run.t run.t.corrected)))))
 
+(alias
+ (name tests-stanza)
+ (deps (package dune) (source_tree test-cases/tests-stanza))
+ (action
+  (chdir
+   test-cases/tests-stanza
+   (progn (run %{exe:cram.exe} -test run.t) (diff? run.t run.t.corrected)))))
+
 (alias
  (name use-meta)
  (deps (package dune) (source_tree test-cases/use-meta))
@@ -672,6 +680,7 @@
   (alias scope-ppx-bug)
   (alias select)
   (alias syntax-versioning)
+  (alias tests-stanza)
   (alias use-meta)
   (alias utop)
   (alias windows-diff)
@@ -738,6 +747,7 @@
   (alias scope-ppx-bug)
   (alias select)
   (alias syntax-versioning)
+  (alias tests-stanza)
   (alias use-meta)
   (alias windows-diff)
   (alias workspaces)))

diff --git a/test/blackbox-tests/test-cases/tests-stanza/bar.ml b/test/blackbox-tests/test-cases/tests-stanza/bar.ml
@@ -0,0 +1 @@
+let () = print_endline "test bar"
diff --git a/test/blackbox-tests/test-cases/tests-stanza/dune b/test/blackbox-tests/test-cases/tests-stanza/dune
@@ -0,0 +1,2 @@
+(tests
+ ((names (bar foo))))
diff --git a/test/blackbox-tests/test-cases/tests-stanza/foo.ml b/test/blackbox-tests/test-cases/tests-stanza/foo.ml
@@ -0,0 +1 @@
+let () = print_endline "test foo"
diff --git a/test/blackbox-tests/test-cases/tests-stanza/run.t b/test/blackbox-tests/test-cases/tests-stanza/run.t
@@ -0,0 +1,5 @@
+  $ dune runtest
+           foo alias runtest
+  test foo
+           bar alias runtest
+  test bar