old-cross-binutils/gdb/testsuite/gdb.base/store.c
Daniel Jacobowitz 3a871b371b * gdb.base/store.c (charest): New typedef.
(add_char): Rename to add_charest, update.
	(wack_char): Rename to wack_charest, update types.  Return l + r
	to keep r live across the call.
	(wack_short, wack_int, wack_long, wack_longest, wack_float)
	(wack_double, wack_doublest): Return l + r to keep r live across
	the call.
	* gdb.base/store.exp: Accomodate store.c changes.
2003-07-03 13:55:22 +00:00

295 lines
5.1 KiB
C

/* 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;
}