1! { dg-do compile } 2! { dg-options "-fgnu-tm" } 3! { dg-require-effective-target fgnu_tm } 4program foo 5 real x 6end program foo 7