* tree-loop-distribution.c (struct partition): New field recording

[official-gcc.git] / gcc / testsuite / gfortran.dg / feed_1.f90

! { dg-do compile }
! { dg-options "-ffree-form" }
! Test acceptance of form feed character in free source.

implicit none
integer, volatile :: x

\f

x = 5

end