gcc/testsuite/gfortran.dg/line_length_1.f

   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