(root)/
gcc-13.2.0/
gcc/
testsuite/
c-c++-common/
tm/
cancel-1.c
       1  /* { dg-do compile } */
       2  /* { dg-options "-fgnu-tm" } */
       3  
       4  void unsafe(void) __attribute__((transaction_unsafe));
       5  
       6  void
       7  f(void)
       8  {
       9    int a;
      10    __transaction_atomic {
      11      a = 1;
      12      __transaction_atomic {
      13        __transaction_cancel;
      14      }
      15    }
      16    unsafe();
      17  }