URL
https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk
Only display areas with differences |
Details |
Blame |
View Log
| Rev 298 |
Rev 384 |
/* { dg-do compile } */
|
/* { dg-do compile } */
|
/* { dg-options "-O1 -fdump-tree-dom2" } */
|
/* { dg-options "-O1 -fdump-tree-dom2" } */
|
|
|
extern void abort (void);
|
extern void abort (void);
|
union tree_node;
|
union tree_node;
|
typedef union tree_node *tree;
|
typedef union tree_node *tree;
|
enum tree_code
|
enum tree_code
|
{
|
{
|
LAST_AND_UNUSED_TREE_CODE
|
LAST_AND_UNUSED_TREE_CODE
|
};
|
};
|
extern const char tree_code_type[];
|
extern const char tree_code_type[];
|
struct tree_common
|
struct tree_common
|
{
|
{
|
enum tree_code code:8;
|
enum tree_code code:8;
|
};
|
};
|
struct tree_type
|
struct tree_type
|
{
|
{
|
double alias_set;
|
double alias_set;
|
};
|
};
|
union tree_node
|
union tree_node
|
{
|
{
|
struct tree_common common;
|
struct tree_common common;
|
struct tree_type type;
|
struct tree_type type;
|
};
|
};
|
long
|
long
|
foo (t, set)
|
foo (t, set)
|
tree t;
|
tree t;
|
double set;
|
double set;
|
{
|
{
|
if (tree_code_type[t->common.code] != 't')
|
if (tree_code_type[t->common.code] != 't')
|
abort ();
|
abort ();
|
|
|
t->type.alias_set = set;
|
t->type.alias_set = set;
|
|
|
if (t->common.code == 42)
|
if (t->common.code == 42)
|
return 1;
|
return 1;
|
else
|
else
|
return 0;
|
return 0;
|
}
|
}
|
/* There should be precisely one load of common.code. If there is
|
/* There should be precisely one load of common.code. If there is
|
more than one, then the dominator optimizations failed. */
|
more than one, then the dominator optimizations failed. */
|
/* ??? Will fail until we properly distinguish member stores. At
|
/* ??? Will fail until we properly distinguish member stores. At
|
present the write to type.alias_set kills the previous load. */
|
present the write to type.alias_set kills the previous load. */
|
/* { dg-final { scan-tree-dump-times "common.code" 1 "dom2" { xfail *-*-* } } } */
|
/* { dg-final { scan-tree-dump-times "common.code" 1 "dom2" { xfail *-*-* } } } */
|
/* { dg-final { cleanup-tree-dump "dom2" } } */
|
/* { dg-final { cleanup-tree-dump "dom2" } } */
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.