summaryrefslogtreecommitdiff
path: root/testsuite/tests/codeGen/should_compile/all.T
diff options
context:
space:
mode:
authorBartosz Nitka <niteria@gmail.com>2018-05-03 12:37:00 -0400
committerBen Gamari <ben@smart-cactus.org>2018-05-03 12:37:18 -0400
commit6132d7c5e6404936ef281a6f3be333fea780906e (patch)
tree653db073c3273e343ae60a062c43c210fff05e87 /testsuite/tests/codeGen/should_compile/all.T
parent75361b119c609f0ab98f3d12a15690aae4ce42a1 (diff)
downloadhaskell-6132d7c5e6404936ef281a6f3be333fea780906e.tar.gz
Correctly add unwinding info in manifestSp and makeFixupBlocks
In `manifestSp` the unwind info was before the relevant instruction, not after. I added some notes to establish semantics. Also removes redundant annotation in stg_catch_frame. For `makeFixupBlocks` it looks like we were off by `wORD_SIZE dflags`. I'm not sure why, but it lines up with `manifestSp`. In fact it lines up so well so that I can consolidate the Sp unwind logic in `maybeAddUnwind`. I detected the problems with `makeFixupBlocks` by running T14779b after patching D4559. Test Plan: added a new test Reviewers: bgamari, scpmw, simonmar, erikd Reviewed By: bgamari Subscribers: thomie, carter GHC Trac Issues: #14999 Differential Revision: https://phabricator.haskell.org/D4606
Diffstat (limited to 'testsuite/tests/codeGen/should_compile/all.T')
-rw-r--r--testsuite/tests/codeGen/should_compile/all.T5
1 files changed, 5 insertions, 0 deletions
diff --git a/testsuite/tests/codeGen/should_compile/all.T b/testsuite/tests/codeGen/should_compile/all.T
index fb813a497a..9118b6c23b 100644
--- a/testsuite/tests/codeGen/should_compile/all.T
+++ b/testsuite/tests/codeGen/should_compile/all.T
@@ -38,3 +38,8 @@ test('T12355', normal, compile, [''])
test('T14626',
normal,
run_command, ['$MAKE -s --no-print-directory T14626'])
+test('T14999',
+ [when((arch('powerpc64') or arch('powerpc64le')), expect_broken(11261)),
+ unless(opsys('linux') and arch('x86_64') and have_gdb() and
+ have_readelf(), skip)],
+ run_command, ['$MAKE -s --no-print-directory T14999'])