diff options
Diffstat (limited to 'testsuite/tests')
-rw-r--r-- | testsuite/tests/generics/T5884.hs | 5 | ||||
-rw-r--r-- | testsuite/tests/generics/T5884Other.hs | 3 | ||||
-rw-r--r-- | testsuite/tests/generics/all.T | 3 |
3 files changed, 7 insertions, 4 deletions
diff --git a/testsuite/tests/generics/T5884.hs b/testsuite/tests/generics/T5884.hs index 6dfad25581..92b5087967 100644 --- a/testsuite/tests/generics/T5884.hs +++ b/testsuite/tests/generics/T5884.hs @@ -3,7 +3,6 @@ module T5884 where import GHC.Generics +import T5884Other -import Data.Complex - -deriving instance Generic (Complex v) +deriving instance Generic (Pair a) diff --git a/testsuite/tests/generics/T5884Other.hs b/testsuite/tests/generics/T5884Other.hs new file mode 100644 index 0000000000..2cf8250162 --- /dev/null +++ b/testsuite/tests/generics/T5884Other.hs @@ -0,0 +1,3 @@ +module T5884Other where + +data Pair a = Pair a a diff --git a/testsuite/tests/generics/all.T b/testsuite/tests/generics/all.T index c51de18a9c..98116ec519 100644 --- a/testsuite/tests/generics/all.T +++ b/testsuite/tests/generics/all.T @@ -26,7 +26,8 @@ test('T5462Yes2', extra_clean(['T5462Yes2/GFunctor.hi']) test('T5462No1', extra_clean(['T5462No1/GFunctor.hi']) , multimod_compile_fail, ['T5462No1', '-iGFunctor -outputdir=T5462No1']) -test('T5884', normal, compile, ['']) +test('T5884', extra_clean(['T5884Other.o', 'T5884Other.hi']) + , multimod_compile, ['T5884Other', '-v0']) test('GenNewtype', normal, compile_and_run, ['']) test('GenDerivOutput1_0', normal, compile, ['-dsuppress-uniques']) |