13 lines · plain
1! This test verifies that using `-x f95` does not cause the driver to assume2! this file is in fixed-form.3 4program main5 print *, "Hello, World!"6end7 8! RUN: %flang -### -x f95 %s 2>&1 | FileCheck --check-prefix=PRINT-PHASES %s9! PRINT-PHASES-NOT: -ffixed-form10 11! RUN: %flang -Werror -fsyntax-only -x f95 %s 2>&1 | FileCheck --check-prefix=COMPILE --allow-empty %s12! COMPILE-NOT: error13