gcc/testsuite/gcc.dg/tm/20091013.c

/* { dg-do compile } */
/* { dg-options "-fgnu-tm -O2" } */

extern long ringo(long int);
int g,i;

void
f()
{
  __transaction_relaxed {
    for (i=0; i < 10; ++i)
      ringo(g);
  }
}