blob: 4dc98a142324843efea6a21d6760186fe6bb635b [file] [log] [blame]
! { dg-do compile }
! { dg-options "-ffree-form" }
! Test acceptance of form feed character in free source.
implicit none
integer, volatile :: x
x = 5
end