Mercurial > hg > CbC > CbC_gcc
comparison gcc/testsuite/gcc.dg/tm/20100615.c @ 111:04ced10e8804
gcc 7
author | kono |
---|---|
date | Fri, 27 Oct 2017 22:46:09 +0900 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
68:561a7518be6b | 111:04ced10e8804 |
---|---|
1 /* { dg-do compile } */ | |
2 /* { dg-options "-fgnu-tm -O" } */ | |
3 | |
4 /* Since the non TM version of new_node() gets optimized away, it | |
5 shouldn't appear in the clone table either. */ | |
6 /* { dg-final { scan-assembler-not "tm_clone_table" { target { ! *-*-darwin* } } } } */ | |
7 /* { dg-final { scan-assembler-not "__DATA,__tm_clone_table" { target *-*-darwin* } } } */ | |
8 | |
9 #define NULL 0 | |
10 extern void *malloc (__SIZE_TYPE__); | |
11 | |
12 __attribute__((transaction_pure)) | |
13 void exit(int status); | |
14 | |
15 typedef struct node { | |
16 } node_t; | |
17 | |
18 __attribute__((transaction_safe)) | |
19 static node_t *new_node(node_t *next) | |
20 { | |
21 node_t *node; | |
22 node = (node_t *)malloc(sizeof(node_t)); | |
23 if (node == NULL) { | |
24 exit(1); | |
25 } | |
26 return NULL; | |
27 } | |
28 | |
29 static node_t *set_new() | |
30 { | |
31 node_t *min, *max; | |
32 __transaction_atomic { | |
33 max = new_node(NULL); | |
34 min = new_node(max); | |
35 } | |
36 return min; | |
37 } | |
38 | |
39 int main(int argc, char **argv) | |
40 { | |
41 set_new(); | |
42 return 0; | |
43 } |