diff options
| author | CarrieMY <carrie.xmy@gmail.com> | 2021-11-19 23:33:34 +0800 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-11-25 01:05:11 -0500 |
| commit | 7c65687e5b14eb2f496c25198ddf761546bc4675 (patch) | |
| tree | c9f2e6b5247b57489130eb4ae472fb5e4d3d737c /testsuite/tests/deriving | |
| parent | 3639ad8ffbf0bfc2cb600ba138d6bfda2ccd29fe (diff) | |
| download | haskell-7c65687e5b14eb2f496c25198ddf761546bc4675.tar.gz | |
Enable UnboxedTuples in `genInst`, Fixes #20524
Diffstat (limited to 'testsuite/tests/deriving')
| -rw-r--r-- | testsuite/tests/deriving/should_compile/T15073.hs (renamed from testsuite/tests/deriving/should_fail/T15073.hs) | 0 | ||||
| -rw-r--r-- | testsuite/tests/deriving/should_compile/T15073a.hs (renamed from testsuite/tests/deriving/should_fail/T15073a.hs) | 0 | ||||
| -rw-r--r-- | testsuite/tests/deriving/should_compile/all.T | 2 | ||||
| -rw-r--r-- | testsuite/tests/deriving/should_fail/T15073.stderr | 9 | ||||
| -rw-r--r-- | testsuite/tests/deriving/should_fail/all.T | 2 |
5 files changed, 2 insertions, 11 deletions
diff --git a/testsuite/tests/deriving/should_fail/T15073.hs b/testsuite/tests/deriving/should_compile/T15073.hs index b1da4bb701..b1da4bb701 100644 --- a/testsuite/tests/deriving/should_fail/T15073.hs +++ b/testsuite/tests/deriving/should_compile/T15073.hs diff --git a/testsuite/tests/deriving/should_fail/T15073a.hs b/testsuite/tests/deriving/should_compile/T15073a.hs index 87e7571f50..87e7571f50 100644 --- a/testsuite/tests/deriving/should_fail/T15073a.hs +++ b/testsuite/tests/deriving/should_compile/T15073a.hs diff --git a/testsuite/tests/deriving/should_compile/all.T b/testsuite/tests/deriving/should_compile/all.T index e2680a8f9d..64925923ba 100644 --- a/testsuite/tests/deriving/should_compile/all.T +++ b/testsuite/tests/deriving/should_compile/all.T @@ -113,6 +113,8 @@ test('T14682', normal, compile, ['-ddump-deriv -dsuppress-uniques']) test('T14883', normal, compile, ['']) test('T14932', normal, compile, ['']) test('T14933', normal, compile, ['']) +test('T15073', [extra_files(['T15073a.hs'])], multimod_compile, + ['T15073', '-v0']) test('T15290c', normal, compile, ['']) test('T15290d', normal, compile, ['']) test('T15398', normal, compile, ['']) diff --git a/testsuite/tests/deriving/should_fail/T15073.stderr b/testsuite/tests/deriving/should_fail/T15073.stderr deleted file mode 100644 index 79d3a10cdc..0000000000 --- a/testsuite/tests/deriving/should_fail/T15073.stderr +++ /dev/null @@ -1,9 +0,0 @@ - -T15073.hs:8:12: error: - • Illegal unboxed tuple type as function argument: (# Foo a #) - • In the type signature: p :: Foo a -> (# Foo a #) - When typechecking the code for ‘p’ - in a derived instance for ‘P (Foo a)’: - To see the code I am typechecking, use -ddump-deriv - In the instance declaration for ‘P (Foo a)’ - Suggested fix: Perhaps you intended to use UnboxedTuples
\ No newline at end of file diff --git a/testsuite/tests/deriving/should_fail/all.T b/testsuite/tests/deriving/should_fail/all.T index 4743d3530d..70bd0f9dbe 100644 --- a/testsuite/tests/deriving/should_fail/all.T +++ b/testsuite/tests/deriving/should_fail/all.T @@ -72,8 +72,6 @@ test('T14365', [extra_files(['T14365B.hs','T14365B.hs-boot'])], test('T14728a', normal, compile_fail, ['']) test('T14728b', normal, compile_fail, ['']) test('T14916', normal, compile_fail, ['']) -test('T15073', [extra_files(['T15073a.hs'])], multimod_compile_fail, - ['T15073', '-v0']) test('T16181', normal, compile_fail, ['']) test('T16923', normal, compile_fail, ['']) test('T18127b', normal, compile_fail, ['']) |