1  /* { dg-do compile } */
       2  /* { dg-options "-fgnu-tm -O -fdump-tree-tmmark" } */
       3  
       4  /* Test that the call to george() doesn't end up inside the transaction.  */
       5  
       6  void george (void);
       7  int trxn;
       8  
       9  void set_remove(int * val)
      10  {
      11    __transaction_atomic {
      12        trxn = 5;
      13    }
      14    george();
      15  }
      16  
      17  /* { dg-final { scan-tree-dump-times "getTMCloneOrIrrevocable" 0 "tmmark" } } */