Subversion Repositories openrisc

/* { dg-do compile } */

/* { dg-options "-fgnu-tm -O" } */

/* Since the non TM version of new_node() gets optimized away, it

   shouldn't appear in the clone table either.  */

/* { dg-final { scan-assembler-not "tm_clone_table" { target { ! *-*-darwin*  } } } } */

/* { dg-final { scan-assembler-not "__DATA,__tm_clone_table" { target *-*-darwin*  } } } */

#define NULL 0

extern void *malloc (__SIZE_TYPE__);

__attribute__((transaction_pure))

void exit(int status);

typedef struct node {

} node_t;

__attribute__((transaction_safe))

static node_t *new_node(node_t *next)

{

  node_t *node;

  node = (node_t *)malloc(sizeof(node_t));

  if (node == NULL) {

    exit(1);

  }

  return NULL;

}

static node_t *set_new()

{

  node_t *min, *max;

  __transaction_atomic {

    max = new_node(NULL);

    min = new_node(max);

  }

  return min;

}

int main(int argc, char **argv)

{

  set_new();

  return 0;

}