diff options
author | Simon Peyton Jones <simon.peytonjones@gmail.com> | 2023-04-28 00:29:04 +0100 |
---|---|---|
committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2023-05-13 14:58:34 -0400 |
commit | 902f0730b4c50f39b7767a346be324c98bf7a8a6 (patch) | |
tree | f811093f39fa207770c6f24e97f76bbf4e68e588 /testsuite/tests/simplCore/should_compile/all.T | |
parent | 8a0d45f7d846e92cf4b6641fd8c67606412cdb3a (diff) | |
download | haskell-902f0730b4c50f39b7767a346be324c98bf7a8a6.tar.gz |
Make GHC.Types.Id.Make.shouldUnpackTy a bit more clever
As #23307, GHC.Types.Id.Make.shouldUnpackTy was leaving money on the
table, failing to unpack arguments that are perfectly unpackable.
The fix is pretty easy; see Note [Recursive unboxing]
Diffstat (limited to 'testsuite/tests/simplCore/should_compile/all.T')
-rw-r--r-- | testsuite/tests/simplCore/should_compile/all.T | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/testsuite/tests/simplCore/should_compile/all.T b/testsuite/tests/simplCore/should_compile/all.T index a472aa05d9..b1ec7473ff 100644 --- a/testsuite/tests/simplCore/should_compile/all.T +++ b/testsuite/tests/simplCore/should_compile/all.T @@ -479,3 +479,8 @@ test('T23024', normal, multimod_compile, ['T23024', '-O -v0']) test('T23026', normal, compile, ['-O']) test('T23267', [expect_broken(23267), only_ways(['ghci']), extra_hc_opts('-fno-unoptimized-core-for-interpreter -fspec-constr')], ghci_script, ['T23267.script']) test('T23362', normal, compile, ['-O']) +test('T23307', normal, compile, ['-O -ddump-simpl -dno-typeable-binds -dsuppress-uniques']) +test('T23307a', normal, compile, ['-O -ddump-simpl -dno-typeable-binds -dsuppress-uniques']) +test('T23307b', normal, compile, ['-O']) +test('T23307c', normal, compile, ['-O']) + |