1 /* { dg-do compile } */
2 /* { dg-options "-fgnu-tm -O -fdump-tree-tmmark" } */
3 
4 extern int something(void) __attribute__((transaction_safe));
5 extern int escape(int *) __attribute__((transaction_safe));
6 extern void *malloc (__SIZE_TYPE__) __attribute__((malloc,transaction_safe));
7 
f()8 int f()
9 {
10   int *p;
11 
12   __transaction_atomic {
13     p = malloc (sizeof (*p) * 100);
14     escape (p);
15 
16     /* This should be instrumented because P escapes.  */
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_WU" 1 "tmmark" } } */
26 /* { dg-final { cleanup-tree-dump "tmmark" } } */
27