1! Testcase for -ffixed-line-length-none 2! { dg-do compile } 3! { dg-options "-ffixed-line-length-none" } 4 program one 5 if (abs(aaaaaaaaaaaaaaaaaaaaaaaaaaaaaa).gt.999.d0.or.abs(bbbbbbbbbbbbbbbbbbbbbbbbbbbbbb).gt.999.d0.or.abs(cccccccccccccccccccc).gt.999.d0) THEN 6 endif 7 end program one 8