diff options
Diffstat (limited to 'testsuite/tests')
6 files changed, 11 insertions, 0 deletions
diff --git a/testsuite/tests/driver/multipleHomeUnits/A.hs b/testsuite/tests/driver/multipleHomeUnits/A.hs new file mode 100644 index 0000000000..d843c00b78 --- /dev/null +++ b/testsuite/tests/driver/multipleHomeUnits/A.hs @@ -0,0 +1 @@ +module A where diff --git a/testsuite/tests/driver/multipleHomeUnits/all.T b/testsuite/tests/driver/multipleHomeUnits/all.T index ebee7b9f5d..d289a447a6 100644 --- a/testsuite/tests/driver/multipleHomeUnits/all.T +++ b/testsuite/tests/driver/multipleHomeUnits/all.T @@ -66,5 +66,10 @@ test('multipleHomeUnits_recomp', [copy_files,extra_files([ 'Recomp.hs', 'unitRec test('multipleHomeUnits_recomp_th', [filter_stdout_lines(r'.*Compiling.*'), copy_files, extra_files(['thRecomp.script', 'unitRecompTH', 'unitDep', 'RecompTH.hs', 'Dep.hs', '../../ghci/shell.hs']) , extra_run_opts('-v1 -unit @unitRecompTH -unit @unitDep')], ghci_script, ['thRecomp.script']) +test('multipleHomeUnits_shared', [extra_files([ 'A.hs', 'unitShared1', 'unitShared2'])], multiunit_compile, [['unitShared1', 'unitShared2'], '-fhide-source-paths']) + +test('multipleHomeUnits_shared_ghci', [extra_files([ 'shared.script', 'A.hs', 'unitShared1', 'unitShared2']), extra_run_opts('-unit @unitShared1 -unit @unitShared2')], ghci_script, ['shared.script']) + + diff --git a/testsuite/tests/driver/multipleHomeUnits/multipleHomeUnits_shared.stderr b/testsuite/tests/driver/multipleHomeUnits/multipleHomeUnits_shared.stderr new file mode 100644 index 0000000000..172ab096f1 --- /dev/null +++ b/testsuite/tests/driver/multipleHomeUnits/multipleHomeUnits_shared.stderr @@ -0,0 +1,2 @@ +[1 of 2] Compiling A[shared1] +[2 of 2] Compiling A[shared2] diff --git a/testsuite/tests/driver/multipleHomeUnits/shared.script b/testsuite/tests/driver/multipleHomeUnits/shared.script new file mode 100644 index 0000000000..38963a94f7 --- /dev/null +++ b/testsuite/tests/driver/multipleHomeUnits/shared.script @@ -0,0 +1 @@ +:r diff --git a/testsuite/tests/driver/multipleHomeUnits/unitShared1 b/testsuite/tests/driver/multipleHomeUnits/unitShared1 new file mode 100644 index 0000000000..3266a7c2a4 --- /dev/null +++ b/testsuite/tests/driver/multipleHomeUnits/unitShared1 @@ -0,0 +1 @@ +-i A -this-unit-id shared1 diff --git a/testsuite/tests/driver/multipleHomeUnits/unitShared2 b/testsuite/tests/driver/multipleHomeUnits/unitShared2 new file mode 100644 index 0000000000..75e32ae633 --- /dev/null +++ b/testsuite/tests/driver/multipleHomeUnits/unitShared2 @@ -0,0 +1 @@ +-i A -this-unit-id shared2 |