blob: d2c4da4296f95c041a5e473c756c0f7f7403bb30 [file] [log] [blame]
/* The testcase failed due to corrupted alias information.
During the crossjump analyzing step the mem alias info of the
st instructions are merged and get copied during basic block
reordering which leads to an insn with wrong alias info.
The scheduler afterwards exchanges the mvc and st instructions
not recognizing the anti dependence. */
/* { dg-do run { target s390-*-* } } */
/* { dg-options "-O3 -mtune=z990 -fno-inline" } */
extern void exit (int);
extern void abort (void);
int f;
int g;
int h;
int* x = &f;
int* p1 = &g;
int* p2 = &h;
int
foo(void)
{
if (*x == 0)
{
x = p1; /* mvc - memory to memory */
p1 = (int*)0; /* st - register to memory */
return 1;
}
if (*x == 5)
{
f = 1;
g = 2;
p2 = (int*)0; /* st */
return 1;
}
}
int
main (int argc, char** argv)
{
foo ();
/* If the scheduler has exchanged the mvc and st instructions,
x is 0. The expected result is &g. */
if (x == &g)
exit (0);
else
abort ();
}