20000605-2.c: New test.

* gcc.c-torture/execute/20000605-2.c: New test.
        * gcc.c-torture/execute/20000605-3.c: New test.

From-SVN: r34437
This commit is contained in:
Richard Henderson 2000-06-06 13:54:30 -07:00 committed by Richard Henderson
parent 54fa741538
commit 80e08b3052
3 changed files with 41 additions and 0 deletions

View File

@ -1,3 +1,8 @@
2000-06-05 Richard Henderson <rth@cygnus.com>
* gcc.c-torture/execute/20000605-2.c: New test.
* gcc.c-torture/execute/20000605-3.c: New test.
2000-06-06 David Billinghurst <David Billinghurst@riotinto.com.au> 2000-06-06 David Billinghurst <David Billinghurst@riotinto.com.au>
* g77.f-torture/execute/20000503-1.x: New file. * g77.f-torture/execute/20000503-1.x: New file.

View File

@ -0,0 +1,18 @@
struct F { int i; };
void f1(struct F *x, struct F *y)
{
int timeout = 0;
for (; ((const struct F*)x)->i < y->i ; x->i++)
if (++timeout > 5)
abort ();
}
main()
{
struct F x, y;
x.i = 0;
y.i = 1;
f1 (&x, &y);
exit (0);
}

View File

@ -0,0 +1,18 @@
struct F { int x; int y; };
int main()
{
int timeout = 0;
int x = 0;
while (1)
{
const struct F i = { x++, };
if (i.x > 0)
break;
if (++timeout > 5)
goto die;
}
return 0;
die:
abort ();
}