diff --git a/test/blackbox-tests/dune.inc b/test/blackbox-tests/dune.inc index 6fdafb7b..c3d357ce 100644 --- a/test/blackbox-tests/dune.inc +++ b/test/blackbox-tests/dune.inc @@ -200,6 +200,14 @@ test-cases/gen-opam-install-file (progn (run %{exe:cram.exe} -test run.t) (diff? run.t run.t.corrected))))) +(alias + (name github1019) + (deps (package dune) (source_tree test-cases/github1019)) + (action + (chdir + test-cases/github1019 + (progn (run %{exe:cram.exe} -test run.t) (diff? run.t run.t.corrected))))) + (alias (name github20) (deps (package dune) (source_tree test-cases/github20)) @@ -743,6 +751,7 @@ (alias findlib-error) (alias force-test) (alias gen-opam-install-file) + (alias github1019) (alias github20) (alias github24) (alias github25) @@ -832,6 +841,7 @@ (alias findlib-error) (alias force-test) (alias gen-opam-install-file) + (alias github1019) (alias github20) (alias github24) (alias github25) diff --git a/test/blackbox-tests/test-cases/github1019/dune b/test/blackbox-tests/test-cases/github1019/dune new file mode 100644 index 00000000..b1e70d55 --- /dev/null +++ b/test/blackbox-tests/test-cases/github1019/dune @@ -0,0 +1,5 @@ +(library (name foo)) + +(alias + (name default) + (echo %{lib:foo:foo.ml})) diff --git a/test/blackbox-tests/test-cases/github1019/dune-project b/test/blackbox-tests/test-cases/github1019/dune-project new file mode 100644 index 00000000..b2559fa0 --- /dev/null +++ b/test/blackbox-tests/test-cases/github1019/dune-project @@ -0,0 +1 @@ +(lang dune 1.0) \ No newline at end of file diff --git a/test/blackbox-tests/test-cases/github1019/foo.ml b/test/blackbox-tests/test-cases/github1019/foo.ml new file mode 100644 index 00000000..0547b3d0 --- /dev/null +++ b/test/blackbox-tests/test-cases/github1019/foo.ml @@ -0,0 +1 @@ +let x = 1 diff --git a/test/blackbox-tests/test-cases/github1019/run.t b/test/blackbox-tests/test-cases/github1019/run.t new file mode 100644 index 00000000..c31fc32a --- /dev/null +++ b/test/blackbox-tests/test-cases/github1019/run.t @@ -0,0 +1,6 @@ +Regression test for #1019 + + $ dune build + File "dune", line 5, characters 9-10: + Error: This character is not allowed inside %{...} forms + [1]