OpenCores
URL https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gdb-7.1/] [gdb/] [testsuite/] [gdb.base/] [store.c] - Rev 231

Go to most recent revision | Compare with Previous | Blame | View Log

/* Check that GDB can correctly update a value, living in a register,
   in the target.  This pretty much relies on the compiler taking heed
   of requests for values to be stored in registers.  */
 
/* NOTE: carlton/2002-12-05: These functions were all static, but for
   whatever reason that caused GCC 3.1 to optimize away some of the
   function calls within main even when no optimization flags were
   passed.  */
 
typedef signed char charest;
 
charest
add_charest (register charest u, register charest v)
{
  return u + v;
}
 
short
add_short (register short u, register short v)
{
  return u + v;
}
 
int
add_int (register int u, register int v)
{
  return u + v;
}
 
long
add_long (register long u, register long v)
{
  return u + v;
}
 
typedef long long longest;
 
longest
add_longest (register longest u, register longest v)
{
  return u + v;
}
 
float
add_float (register float u, register float v)
{
  return u + v;
}
 
double
add_double (register double u, register double v)
{
  return u + v;
}
 
typedef long double doublest;
 
doublest
add_doublest (register doublest u, register doublest v)
{
  return u + v;
}
 
/* */
 
charest
wack_charest (register charest u, register charest v)
{
  register charest l = u, r = v;
  l = add_charest (l, r);
  return l + r;
}
 
short
wack_short (register short u, register short v)
{
  register short l = u, r = v;
  l = add_short (l, r);
  return l + r;
}
 
int
wack_int (register int u, register int v)
{
  register int l = u, r = v;
  l = add_int (l, r);
  return l + r;
}
 
long
wack_long (register long u, register long v)
{
  register long l = u, r = v;
  l = add_long (l, r);
  return l + r;
}
 
long
wack_longest (register longest u, register longest v)
{
  register longest l = u, r = v;
  l = add_longest (l, r);
  return l + r;
}
 
float
wack_float (register float u, register float v)
{
  register float l = u, r = v;
  l = add_float (l, r);
  return l + r;
}
 
double
wack_double (register double u, register double v)
{
  register double l = u, r = v;
  l = add_double (l, r);
  return l + r;
}
 
doublest
wack_doublest (register doublest u, register doublest v)
{
  register doublest l = u, r = v;
  l = add_doublest (l, r);
  return l + r;
}
 
/* */
 
struct s_1 { short s[1]; } z_1, s_1;
struct s_2 { short s[2]; } z_2, s_2;
struct s_3 { short s[3]; } z_3, s_3;
struct s_4 { short s[4]; } z_4, s_4;
 
struct s_1
add_struct_1 (struct s_1 s)
{
  int i;
  for (i = 0; i < sizeof (s) / sizeof (s.s[0]); i++)
    {
      s.s[i] = s.s[i] + s.s[i];
    }
  return s;
}
 
struct s_2
add_struct_2 (struct s_2 s)
{
  int i;
  for (i = 0; i < sizeof (s) / sizeof (s.s[0]); i++)
    {
      s.s[i] = s.s[i] + s.s[i];
    }
  return s;
}
 
struct s_3
add_struct_3 (struct s_3 s)
{
  int i;
  for (i = 0; i < sizeof (s) / sizeof (s.s[0]); i++)
    {
      s.s[i] = s.s[i] + s.s[i];
    }
  return s;
}
 
struct s_4
add_struct_4 (struct s_4 s)
{
  int i;
  for (i = 0; i < sizeof (s) / sizeof (s.s[0]); i++)
    {
      s.s[i] = s.s[i] + s.s[i];
    }
  return s;
}
 
struct s_1
wack_struct_1 (void)
{
  int i; register struct s_1 u = z_1;
  for (i = 0; i < sizeof (s_1) / sizeof (s_1.s[0]); i++) { s_1.s[i] = i + 1; }
  u = add_struct_1 (u);
  return u;
}
 
struct s_2
wack_struct_2 (void)
{
  int i; register struct s_2 u = z_2;
  for (i = 0; i < sizeof (s_2) / sizeof (s_2.s[0]); i++) { s_2.s[i] = i + 1; }
  u = add_struct_2 (u);
  return u;
}
 
struct s_3
wack_struct_3 (void)
{
  int i; register struct s_3 u = z_3;
  for (i = 0; i < sizeof (s_3) / sizeof (s_3.s[0]); i++) { s_3.s[i] = i + 1; }
  u = add_struct_3 (u);
  return u;
}
 
struct s_4
wack_struct_4 (void)
{
  int i; register struct s_4 u = z_4;
  for (i = 0; i < sizeof (s_4) / sizeof (s_4.s[0]); i++) { s_4.s[i] = i + 1; }
  u = add_struct_4 (u);
  return u;
}
 
/* */
 
struct f_1 {unsigned i:1;unsigned j:1;unsigned k:1; } f_1 = {1,1,1}, F_1;
struct f_2 {unsigned i:2;unsigned j:2;unsigned k:2; } f_2 = {1,1,1}, F_2;
struct f_3 {unsigned i:3;unsigned j:3;unsigned k:3; } f_3 = {1,1,1}, F_3;
struct f_4 {unsigned i:4;unsigned j:4;unsigned k:4; } f_4 = {1,1,1}, F_4;
 
struct f_1
wack_field_1 (void)
{
  register struct f_1 u = f_1;
  return u;
}
 
struct f_2
wack_field_2 (void)
{
  register struct f_2 u = f_2;
  return u;
}
 
struct f_3
wack_field_3 (void)
{
  register struct f_3 u = f_3;
  return u;
}
 
struct f_4
wack_field_4 (void)
{
  register struct f_4 u = f_4;
  return u;
}
 
/* */
 
int
main ()
{
  /* These calls are for current frame test.  */
  wack_charest (-1, -2);
  wack_short (-1, -2);
  wack_int (-1, -2);
  wack_long (-1, -2);
  wack_longest (-1, -2);
  wack_float (-1, -2);
  wack_double (-1, -2);
  wack_doublest (-1, -2);
 
  /* These calls are for up frame.  */
  wack_charest (-1, -2);
  wack_short (-1, -2);
  wack_int (-1, -2);
  wack_long (-1, -2);
  wack_longest (-1, -2);
  wack_float (-1, -2);
  wack_double (-1, -2);
  wack_doublest (-1, -2);
 
  /* These calls are for current frame test.  */
  wack_struct_1 ();
  wack_struct_2 ();
  wack_struct_3 ();
  wack_struct_4 ();
 
  /* These calls are for up frame.  */
  wack_struct_1 ();
  wack_struct_2 ();
  wack_struct_3 ();
  wack_struct_4 ();
 
  wack_field_1 ();
  wack_field_2 ();
  wack_field_3 ();
  wack_field_4 ();
 
  return 0;
}
 

Go to most recent revision | Compare with Previous | Blame | View Log

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.