gcc/testsuite/gcc.dg/tm/memopt-8.c

   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
   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" } } */