1 /* { dg-do compile } */
2 /* { dg-options "-fgnu-tm -O -fdump-tree-tmmark" } */
3 
4 extern int something(void) __attribute__((transaction_safe));
5 extern void *malloc (__SIZE_TYPE__) __attribute__((malloc,transaction_safe));
6 
f()7 int f()
8 {
9   int *p;
10 
11   p = malloc (sizeof (*p) * 100);
12 
13   __transaction_atomic {
14     /* p[5] is thread private, but not transaction local since the
15        malloc is outside of the transaction.  We can use the logging
16        functions for this.  */
17     p[5] = 123;
18 
19     if (something())
20       __transaction_cancel;
21   }
22   return p[5];
23 }
24 
25 /* { dg-final { scan-tree-dump-times "ITM_LU" 0 "tmmark" } } */
26 /* { dg-final { scan-tree-dump-times "ITM_WU" 0 "tmmark" } } */
27 /* { dg-final { scan-tree-dump-times "int tm_save" 1 "tmmark" } } */
28 /* { dg-final { cleanup-tree-dump "tmmark" } } */
29