diff options
Diffstat (limited to 'testsuite/tests/driver/multipleHomeUnits/target-file-path')
4 files changed, 12 insertions, 0 deletions
diff --git a/testsuite/tests/driver/multipleHomeUnits/target-file-path/all.T b/testsuite/tests/driver/multipleHomeUnits/target-file-path/all.T new file mode 100644 index 0000000000..74d9baf953 --- /dev/null +++ b/testsuite/tests/driver/multipleHomeUnits/target-file-path/all.T @@ -0,0 +1,6 @@ +# This test checks that getRootSummary doesn't cross package boundaries. +test('multipleHomeUnits_target-file-path' + , [extra_files([ 'p1/', 'unitP1']) + ] + , multiunit_compile + , [['unitP1'], '-fhide-source-paths']) diff --git a/testsuite/tests/driver/multipleHomeUnits/target-file-path/multipleHomeUnits_target-file-path.stderr b/testsuite/tests/driver/multipleHomeUnits/target-file-path/multipleHomeUnits_target-file-path.stderr new file mode 100644 index 0000000000..345d8d960f --- /dev/null +++ b/testsuite/tests/driver/multipleHomeUnits/target-file-path/multipleHomeUnits_target-file-path.stderr @@ -0,0 +1,2 @@ +[1 of 2] Compiling Main +[2 of 2] Linking p1/Main diff --git a/testsuite/tests/driver/multipleHomeUnits/target-file-path/p1/Main.hs b/testsuite/tests/driver/multipleHomeUnits/target-file-path/p1/Main.hs new file mode 100644 index 0000000000..de106fe48f --- /dev/null +++ b/testsuite/tests/driver/multipleHomeUnits/target-file-path/p1/Main.hs @@ -0,0 +1,3 @@ +module Main where + +main = return () diff --git a/testsuite/tests/driver/multipleHomeUnits/target-file-path/unitP1 b/testsuite/tests/driver/multipleHomeUnits/target-file-path/unitP1 new file mode 100644 index 0000000000..b221fb65c2 --- /dev/null +++ b/testsuite/tests/driver/multipleHomeUnits/target-file-path/unitP1 @@ -0,0 +1 @@ +-working-dir p1 Main.hs -this-unit-id p1-0 -this-package-name p1 |