blob: d6faa4b5c00ae9c4dae74b4b7c585ae44ff7d19b [file] [log] [blame] [edit]
! This test verifies that using `-x f95` does not cause the driver to assume
! this file is in fixed-form.
program main
print *, "Hello, World!"
end
! RUN: %flang -### -x f95 %s 2>&1 | FileCheck --check-prefix=PRINT-PHASES %s
! PRINT-PHASES-NOT: -ffixed-form
! RUN: %flang -Werror -fsyntax-only -x f95 %s 2>&1 | FileCheck --check-prefix=COMPILE --allow-empty %s
! COMPILE-NOT: error