mirror/gcc
2
0
Fork 0
mirror of git://gcc.gnu.org/git/gcc.git synced 2025-03-19 15:11:08 +08:00
Code Issues Packages Projects Releases Wiki Activity

re PR testsuite/36285 (gcc.dg/compat/struct-by-value-xxx improper test for AVR target)

Browse Source 
PR testsuite/36285
* gcc.dg/compat/struct-by-value-16_x.c: Move some tests to new file to reduce code size.
* gcc.dg/compat/struct-by-value-16_y.c: Ditto.
* gcc.dg/compat/struct-by-value-16a_main.c: New file.
* gcc.dg/compat/struct-by-value-16a_x.c: Ditto.
* gcc.dg/compat/struct-by-value-16a_y.c: Ditto.
* gcc.dg/compat/struct-by-value-17_x.c: Move some tests to new file to reduce code size.
* gcc.dg/compat/struct-by-value-17_y.c: Ditto.
* gcc.dg/compat/struct-by-value-17a_main.c: New file.
* gcc.dg/compat/struct-by-value-17a_x.c: Ditto.
* gcc.dg/compat/struct-by-value-17a_y.c: Ditto.
* gcc.dg/compat/struct-by-value-18_x.c: Move some tests to new file to reduce code size.
* gcc.dg/compat/struct-by-value-18_y.c: Ditto.
* gcc.dg/compat/struct-by-value-18a_main.c: New file.
* gcc.dg/compat/struct-by-value-18a_x.c: Ditto.
* gcc.dg/compat/struct-by-value-18a_y.c: Ditto.

From-SVN: r137396
This commit is contained in:
Andy Hutchinson 2008-07-02 22:31:11 +00:00 committed by Andy Hutchinson
parent d47a9a8e14
commit 5feeae18a7
16 changed files with 324 additions and 36 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
gcc/testsuite/ChangeLog
View File

@ -1,3 +1,26 @@
2008-07-02 Andy Hutchinson <hutchinsonandy@aim.com>
PR testsuite/36285
* gcc.dg/compat/struct-by-value-16_x.c: Move some tests to new file
to reduce code size.
* gcc.dg/compat/struct-by-value-16_y.c: Ditto.
* gcc.dg/compat/struct-by-value-16a_main.c: New file.
* gcc.dg/compat/struct-by-value-16a_x.c: Ditto.
* gcc.dg/compat/struct-by-value-16a_y.c: Ditto.
* gcc.dg/compat/struct-by-value-17_x.c: Move some tests to new file
to reduce code size.
* gcc.dg/compat/struct-by-value-17_y.c: Ditto.
* gcc.dg/compat/struct-by-value-17a_main.c: New file.
* gcc.dg/compat/struct-by-value-17a_x.c: Ditto.
* gcc.dg/compat/struct-by-value-17a_y.c: Ditto.
* gcc.dg/compat/struct-by-value-18_x.c: Move some tests to new file
to reduce code size.
* gcc.dg/compat/struct-by-value-18_y.c: Ditto.
* gcc.dg/compat/struct-by-value-18a_main.c: New file.
* gcc.dg/compat/struct-by-value-18a_x.c: Ditto.
* gcc.dg/compat/struct-by-value-18a_y.c: Ditto.
2008-07-02 Andy Hutchinson <hutchinsonandy@aim.com>
* gcc.dg/pr36227.c: Correct test for targets where long is

10
gcc/testsuite/gcc.dg/compat/struct-by-value-16_x.c
View File

@ -19,10 +19,7 @@ TEST(Scf9, _Complex float)
TEST(Scf10, _Complex float)
TEST(Scf11, _Complex float)
TEST(Scf12, _Complex float)
TEST(Scf13, _Complex float)
TEST(Scf14, _Complex float)
TEST(Scf15, _Complex float)
TEST(Scf16, _Complex float)
#undef T
@ -45,10 +42,7 @@ T(Scf9, _Complex float)
T(Scf10, _Complex float)
T(Scf11, _Complex float)
T(Scf12, _Complex float)
T(Scf13, _Complex float)
T(Scf14, _Complex float)
T(Scf15, _Complex float)
T(Scf16, _Complex float)
DEBUG_FINI

5
gcc/testsuite/gcc.dg/compat/struct-by-value-16_y.c
View File

@ -27,7 +27,4 @@ TEST(Scf9, _Complex float)
TEST(Scf10, _Complex float)
TEST(Scf11, _Complex float)
TEST(Scf12, _Complex float)
TEST(Scf13, _Complex float)
TEST(Scf14, _Complex float)
TEST(Scf15, _Complex float)
TEST(Scf16, _Complex float)

14
gcc/testsuite/gcc.dg/compat/struct-by-value-16a_main.c Normal file
View File

@ -0,0 +1,14 @@
/* Test structures passed by value, including to a function with a
variable-length argument lists. All struct members are of type
_Complex float. */
extern void struct_by_value_16_x (void);
extern void exit (int);
int fails;
int
main ()
{
struct_by_value_16a_x ();
exit (0);
}

37
gcc/testsuite/gcc.dg/compat/struct-by-value-16a_x.c Normal file
View File

@ -0,0 +1,37 @@
#include "compat-common.h"
#include "fp-struct-defs.h"
#include "fp-struct-check.h"
#include "fp-struct-test-by-value-x.h"
DEFS(cf, _Complex float)
CHECKS(cf, _Complex float)
TEST(Scf13, _Complex float)
TEST(Scf14, _Complex float)
TEST(Scf15, _Complex float)
TEST(Scf16, _Complex float)
#undef T
void
struct_by_value_16a_x ()
{
DEBUG_INIT
#define T(TYPE, MTYPE) testit##TYPE ();
T(Scf13, _Complex float)
T(Scf14, _Complex float)
T(Scf15, _Complex float)
T(Scf16, _Complex float)
DEBUG_FINI
if (fails != 0)
abort ();
#undef T
}

22
gcc/testsuite/gcc.dg/compat/struct-by-value-16a_y.c Normal file
View File

@ -0,0 +1,22 @@
#include <stdarg.h>
#include "compat-common.h"
#ifdef SKIP_VA
const int test_va = 0;
#else
const int test_va = 1;
#endif
#include "fp-struct-defs.h"
#include "fp-struct-init.h"
#include "fp-struct-test-by-value-y.h"
DEFS(cf,_Complex float)
INITS(cf, _Complex float)
TEST(Scf13, _Complex float)
TEST(Scf14, _Complex float)
TEST(Scf15, _Complex float)
TEST(Scf16, _Complex float)

10
gcc/testsuite/gcc.dg/compat/struct-by-value-17_x.c
View File

@ -19,10 +19,7 @@ TEST(Scd9, _Complex double)
TEST(Scd10, _Complex double)
TEST(Scd11, _Complex double)
TEST(Scd12, _Complex double)
TEST(Scd13, _Complex double)
TEST(Scd14, _Complex double)
TEST(Scd15, _Complex double)
TEST(Scd16, _Complex double)
#undef T
@ -45,10 +42,7 @@ T(Scd9, _Complex double)
T(Scd10, _Complex double)
T(Scd11, _Complex double)
T(Scd12, _Complex double)
T(Scd13, _Complex double)
T(Scd14, _Complex double)
T(Scd15, _Complex double)
T(Scd16, _Complex double)
DEBUG_FINI

5
gcc/testsuite/gcc.dg/compat/struct-by-value-17_y.c
View File

@ -27,7 +27,4 @@ TEST(Scd9, _Complex double)
TEST(Scd10, _Complex double)
TEST(Scd11, _Complex double)
TEST(Scd12, _Complex double)
TEST(Scd13, _Complex double)
TEST(Scd14, _Complex double)
TEST(Scd15, _Complex double)
TEST(Scd16, _Complex double)

28
gcc/testsuite/gcc.dg/compat/struct-by-value-17a_main.c Normal file
View File

@ -0,0 +1,28 @@
/* Test structures passed by value, including to a function with a
variable-length argument lists. All struct members are of type
_Complex double. */
extern void struct_by_value_17_x (void);
extern void exit (int);
int fails;
int
main ()
{
struct_by_value_17a_x ();
exit (0);
}
/* Test structures passed by value, including to a function with a
variable-length argument lists. All struct members are of type
_Complex double. */
extern void struct_by_value_17_x (void);
extern void exit (int);
int fails;
int
main ()
{
struct_by_value_17a_x ();
exit (0);
}

74
gcc/testsuite/gcc.dg/compat/struct-by-value-17a_x.c Normal file
View File

@ -0,0 +1,74 @@
#include "compat-common.h"
#include "fp-struct-defs.h"
#include "fp-struct-check.h"
#include "fp-struct-test-by-value-x.h"
DEFS(cd, _Complex double)
CHECKS(cd, _Complex double)
TEST(Scd13, _Complex double)
TEST(Scd14, _Complex double)
TEST(Scd15, _Complex double)
TEST(Scd16, _Complex double)
#undef T
void
struct_by_value_17a_x ()
{
DEBUG_INIT
#define T(TYPE, MTYPE) testit##TYPE ();
T(Scd13, _Complex double)
T(Scd14, _Complex double)
T(Scd15, _Complex double)
T(Scd16, _Complex double)
DEBUG_FINI
if (fails != 0)
abort ();
#undef T
}
#include "compat-common.h"
#include "fp-struct-defs.h"
#include "fp-struct-check.h"
#include "fp-struct-test-by-value-x.h"
DEFS(cd, _Complex double)
CHECKS(cd, _Complex double)
TEST(Scd13, _Complex double)
TEST(Scd14, _Complex double)
TEST(Scd15, _Complex double)
TEST(Scd16, _Complex double)
#undef T
void
struct_by_value_17a_x ()
{
DEBUG_INIT
#define T(TYPE, MTYPE) testit##TYPE ();
T(Scd13, _Complex double)
T(Scd14, _Complex double)
T(Scd15, _Complex double)
T(Scd16, _Complex double)
DEBUG_FINI
if (fails != 0)
abort ();
#undef T
}

44
gcc/testsuite/gcc.dg/compat/struct-by-value-17a_y.c Normal file
View File

@ -0,0 +1,44 @@
#include <stdarg.h>
#include "compat-common.h"
#ifdef SKIP_VA
const int test_va = 0;
#else
const int test_va = 1;
#endif
#include "fp-struct-defs.h"
#include "fp-struct-init.h"
#include "fp-struct-test-by-value-y.h"
DEFS(cd,_Complex double)
INITS(cd, _Complex double)
TEST(Scd13, _Complex double)
TEST(Scd14, _Complex double)
TEST(Scd15, _Complex double)
TEST(Scd16, _Complex double)
#include <stdarg.h>
#include "compat-common.h"
#ifdef SKIP_VA
const int test_va = 0;
#else
const int test_va = 1;
#endif
#include "fp-struct-defs.h"
#include "fp-struct-init.h"
#include "fp-struct-test-by-value-y.h"
DEFS(cd,_Complex double)
INITS(cd, _Complex double)
TEST(Scd13, _Complex double)
TEST(Scd14, _Complex double)
TEST(Scd15, _Complex double)
TEST(Scd16, _Complex double)

10
gcc/testsuite/gcc.dg/compat/struct-by-value-18_x.c
View File

@ -19,10 +19,7 @@ TEST(Scld9, _Complex long double)
TEST(Scld10, _Complex long double)
TEST(Scld11, _Complex long double)
TEST(Scld12, _Complex long double)
TEST(Scld13, _Complex long double)
TEST(Scld14, _Complex long double)
TEST(Scld15, _Complex long double)
TEST(Scld16, _Complex long double)
#undef T
@ -45,10 +42,7 @@ T(Scld9, _Complex long double)
T(Scld10, _Complex long double)
T(Scld11, _Complex long double)
T(Scld12, _Complex long double)
T(Scld13, _Complex long double)
T(Scld14, _Complex long double)
T(Scld15, _Complex long double)
T(Scld16, _Complex long double)
DEBUG_FINI

5
gcc/testsuite/gcc.dg/compat/struct-by-value-18_y.c
View File

@ -27,7 +27,4 @@ TEST(Scld9, _Complex long double)
TEST(Scld10, _Complex long double)
TEST(Scld11, _Complex long double)
TEST(Scld12, _Complex long double)
TEST(Scld13, _Complex long double)
TEST(Scld14, _Complex long double)
TEST(Scld15, _Complex long double)
TEST(Scld16, _Complex long double)

14
gcc/testsuite/gcc.dg/compat/struct-by-value-18a_main.c Normal file
View File

@ -0,0 +1,14 @@
/* Test structures passed by value, including to a function with a
variable-length argument lists. All struct members are of type
_Complex long double. */
extern void struct_by_value_18_x (void);
extern void exit (int);
int fails;
int
main ()
{
struct_by_value_18a_x ();
exit (0);
}

37
gcc/testsuite/gcc.dg/compat/struct-by-value-18a_x.c Normal file
View File

@ -0,0 +1,37 @@
#include "compat-common.h"
#include "fp-struct-defs.h"
#include "fp-struct-check.h"
#include "fp-struct-test-by-value-x.h"
DEFS(cld, _Complex long double)
CHECKS(cld, _Complex long double)
TEST(Scld13, _Complex long double)
TEST(Scld14, _Complex long double)
TEST(Scld15, _Complex long double)
TEST(Scld16, _Complex long double)
#undef T
void
struct_by_value_18a_x ()
{
DEBUG_INIT
#define T(TYPE, MTYPE) testit##TYPE ();
T(Scld13, _Complex long double)
T(Scld14, _Complex long double)
T(Scld15, _Complex long double)
T(Scld16, _Complex long double)
DEBUG_FINI
if (fails != 0)
abort ();
#undef T
}

22
gcc/testsuite/gcc.dg/compat/struct-by-value-18a_y.c Normal file
View File

@ -0,0 +1,22 @@
#include <stdarg.h>
#include "compat-common.h"
#ifdef SKIP_VA
const int test_va = 0;
#else
const int test_va = 1;
#endif
#include "fp-struct-defs.h"
#include "fp-struct-init.h"
#include "fp-struct-test-by-value-y.h"
DEFS(cld,_Complex long double)
INITS(cld, _Complex long double)
TEST(Scld13, _Complex long double)
TEST(Scld14, _Complex long double)
TEST(Scld15, _Complex long double)
TEST(Scld16, _Complex long double)