1 /* { dg-do compile } */
2 /* { dg-options "-fgnu-tm -fdump-tree-tmedge" } */
3 
4 int i;
5 extern void virgin () __attribute__((transaction_pure));
6 
foo()7 foo()
8 {
9 	__transaction_atomic {
10 	    virgin(i);
11 	}
12 }
13 
14 /* { dg-final { scan-tree-dump-times "readOnly" 1 "tmedge" } } */
15 /* { dg-final { cleanup-tree-dump "tmedge" } } */
16