[commit: ghc] master: testsuite: add 16-byte case for T9329 (5295cd2)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/5295cd2b53cb2e9cf3df49274d25d3f72d618c2a/ghc

>---------------------------------------------------------------

commit 5295cd2b53cb2e9cf3df49274d25d3f72d618c2a
Author: Sergei Trofimovich <slyfox at gentoo.org>
Date:   Mon Aug 25 13:00:24 2014 +0300

    testsuite: add 16-byte case for T9329
    
    Exposes Issue #9512 on amd64
    
    Signed-off-by: Sergei Trofimovich <slyfox at gentoo.org>


>---------------------------------------------------------------

5295cd2b53cb2e9cf3df49274d25d3f72d618c2a
 testsuite/tests/codeGen/should_compile/T9329.cmm | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/testsuite/tests/codeGen/should_compile/T9329.cmm b/testsuite/tests/codeGen/should_compile/T9329.cmm
index da20069..cfdbb6e 100644
--- a/testsuite/tests/codeGen/should_compile/T9329.cmm
+++ b/testsuite/tests/codeGen/should_compile/T9329.cmm
@@ -1,5 +1,11 @@
 foo ()
 {
-  STK_CHK_GEN_N (8); /* panics */
+  STK_CHK_GEN_N (8); /* panics on i386 */
+  return (0);
+}
+
+bar ()
+{
+  STK_CHK_GEN_N (16); /* panics on amd64 */
   return (0);
 }