Subversion Repositories openrisc

/* { dg-do compile } */
/* { dg-options "-O1 -fstrict-aliasing -fdump-tree-fre" } */
 
__extension__ typedef __SIZE_TYPE__ size_t;
extern void *xmalloc (size_t) __attribute__ ((__malloc__));
struct edge_def
{
  struct basic_block_def *dest;
  int flags;
};
typedef struct edge_def *edge;
struct basic_block_def
{
  int flags;
};
typedef struct basic_block_def *basic_block;
extern int n_basic_blocks;
extern edge frob ();
basic_block *
find_unreachable_blocks (void)
{
  basic_block *tos, *worklist;
  tos = worklist = xmalloc (sizeof (basic_block) * n_basic_blocks);
  edge e = frob();
  if (!(e->dest->flags & 4))
    {
      e->dest->flags |= 4;
      *tos++ = e->dest;
    }
  return worklist;
}
 
/* If the aliasing code does its job properly, then we should be
   able to determine that modifying e->dest->flags does not
   modify e or e->dest if we can assert strict-aliasing rules.
   The net result is that we only need one load of e->dest.  */
/* { dg-final { scan-tree-dump-times "->dest" 1 "fre" } } */
/* { dg-final { cleanup-tree-dump "fre" } } */