URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc1/] [gcc/] [testsuite/] [gcc.dg/] [compat/] [vector-check.h] - Blame information for rev 338

Details | Compare with Previous | View Log


#define TEST(NUM,TMODE,VAL)                             \
extern v##NUM##TMODE g_v##NUM##TMODE;                   \
extern TMODE g_##TMODE;                                 \
                                                        \
extern void pass_v##NUM##TMODE (v##NUM##TMODE);         \
extern v##NUM##TMODE return_v##NUM##TMODE (void);       \
                                                        \
void                                                    \
checkp_##NUM##TMODE (TMODE *p)                          \
{                                                       \
  int i;                                                \
  for (i = 0; i < NUM; i++)                              \
    {                                                   \
      if (p[i] != g_##TMODE + i)                        \
        DEBUG_CHECK;                                    \
    }                                                   \
}                                                       \
                                                        \
void                                                    \
checkg_##NUM##TMODE (void)                              \
{                                                       \
  u##NUM##TMODE u;                                      \
  TMODE *p = u.a;                                       \
                                                        \
  u.v = g_v##NUM##TMODE;                                \
  checkp_##NUM##TMODE (p);                              \
}                                                       \
                                                        \
void                                                    \
init_##NUM##TMODE (void)                                \
{                                                       \
  int i;                                                \
  u##NUM##TMODE u;                                      \
  g_##TMODE = VAL;                                      \
  for (i = 0; i < NUM; i++)                              \
    u.a[i] = VAL + i;                                   \
  g_v##NUM##TMODE = u.v;                                \
}                                                       \
                                                        \
void                                                    \
test_v##NUM##TMODE (void)                               \
{                                                       \
  v##NUM##TMODE v;                                      \
  u##NUM##TMODE u;                                      \
  TMODE *p = u.a;                                       \
                                                        \
  DEBUG_FPUTS ("v" #NUM #TMODE);                        \
  DEBUG_NL;                                             \
  DEBUG_FPUTS ("  global variable:");                   \
  init_##NUM##TMODE ();                                 \
  checkg_##NUM##TMODE ();                               \
  DEBUG_NL;                                             \
  DEBUG_FPUTS ("  pass global variable:");              \
  pass_v##NUM##TMODE (g_v##NUM##TMODE);                 \
  DEBUG_NL;                                             \
  DEBUG_FPUTS ("  pass local variable:");               \
  v = g_v##NUM##TMODE;                                  \
  pass_v##NUM##TMODE (v);                               \
  DEBUG_NL;                                             \
  DEBUG_FPUTS ("  function return:");                   \
  u.v = return_v##NUM##TMODE ();                        \
  checkp_##NUM##TMODE (p);                              \
  DEBUG_NL;                                             \
}

Line No.	Rev	Author	Line
1	298	jeremybenn	`#define TEST(NUM,TMODE,VAL) \`
2			`extern v##NUM##TMODE g_v##NUM##TMODE; \`
3			`extern TMODE g_##TMODE; \`
4			`\`
5			`extern void pass_v##NUM##TMODE (v##NUM##TMODE); \`
6			`extern v##NUM##TMODE return_v##NUM##TMODE (void); \`
7			`\`
8			`void \`
9			`checkp_##NUM##TMODE (TMODE *p) \`
10			`{ \`
11			`int i; \`
12			`for (i = 0; i < NUM; i++) \`
13			`{ \`
14			`if (p[i] != g_##TMODE + i) \`
15			`DEBUG_CHECK; \`
16			`} \`
17			`} \`
18			`\`
19			`void \`
20			`checkg_##NUM##TMODE (void) \`
21			`{ \`
22			`u##NUM##TMODE u; \`
23			`TMODE *p = u.a; \`
24			`\`
25			`u.v = g_v##NUM##TMODE; \`
26			`checkp_##NUM##TMODE (p); \`
27			`} \`
28			`\`
29			`void \`
30			`init_##NUM##TMODE (void) \`
31			`{ \`
32			`int i; \`
33			`u##NUM##TMODE u; \`
34			`g_##TMODE = VAL; \`
35			`for (i = 0; i < NUM; i++) \`
36			`u.a[i] = VAL + i; \`
37			`g_v##NUM##TMODE = u.v; \`
38			`} \`
39			`\`
40			`void \`
41			`test_v##NUM##TMODE (void) \`
42			`{ \`
43			`v##NUM##TMODE v; \`
44			`u##NUM##TMODE u; \`
45			`TMODE *p = u.a; \`
46			`\`
47			`DEBUG_FPUTS ("v" #NUM #TMODE); \`
48			`DEBUG_NL; \`
49			`DEBUG_FPUTS (" global variable:"); \`
50			`init_##NUM##TMODE (); \`
51			`checkg_##NUM##TMODE (); \`
52			`DEBUG_NL; \`
53			`DEBUG_FPUTS (" pass global variable:"); \`
54			`pass_v##NUM##TMODE (g_v##NUM##TMODE); \`
55			`DEBUG_NL; \`
56			`DEBUG_FPUTS (" pass local variable:"); \`
57			`v = g_v##NUM##TMODE; \`
58			`pass_v##NUM##TMODE (v); \`
59			`DEBUG_NL; \`
60			`DEBUG_FPUTS (" function return:"); \`
61			`u.v = return_v##NUM##TMODE (); \`
62			`checkp_##NUM##TMODE (p); \`
63			`DEBUG_NL; \`
64			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc1/] [gcc/] [testsuite/] [gcc.dg/] [compat/] [vector-check.h] - Blame information for rev 338