Subversion Repositories openrisc

/* { dg-do compile } */ 
/* { dg-options "-O2 -fdump-tree-dom1-details" } */
extern void abort (void) __attribute__ ((__noreturn__));
union tree_node;
typedef union tree_node *tree;
enum tree_code
{
  VAR_DECL,
  SSA_NAME,
  MAX_TREE_CODES
};
extern unsigned char tree_contains_struct[MAX_TREE_CODES][64];
struct tree_base
{
  enum tree_code code:16;
};
enum tree_node_structure_enum
{
  TS_DECL_COMMON
};
struct tree_ssa_name
{
  tree var;
};
union tree_node
{
  struct tree_base base;
  struct tree_ssa_name ssa_name;
};
long
expand_one_var (tree var, unsigned char toplevel, unsigned char really_expand)
{
  tree origvar = var;
  var = var->ssa_name.var;
  if (((enum tree_code) (origvar)->base.code) == SSA_NAME
      && !((var->base.code != VAR_DECL)))
    abort ();
  if ((var->base.code) != VAR_DECL && ((origvar)->base.code) != SSA_NAME)
    ;
  else if (tree_contains_struct[(var->base.code)][(TS_DECL_COMMON)] != 1)
    abort ();
}
/* We should thread the jump, through an intermediate block.  */
/* { dg-final { scan-tree-dump-times "Threaded" 1 "dom1"} } */
/* { dg-final { scan-tree-dump-times "one or more intermediate" 1 "dom1"} } */
/* { dg-final { cleanup-tree-dump "dom1" } } */