mirror of
https://github.com/llvm/llvm-project.git
synced 2025-04-26 00:36:06 +00:00
[flang][nfc] Add a regression test for #50993
https://bugs.llvm.org/show_bug.cgi?id=50993 was effectively fixed in https://reviews.llvm.org/D106727. This patch adds a regression test specifically for the use case reported in 50993. Differential Revision: https://reviews.llvm.org/D107260
This commit is contained in:
parent
245f2ee647
commit
ad2e830fe2
15
flang/test/Preprocessing/parse-preprocessed.F
Normal file
15
flang/test/Preprocessing/parse-preprocessed.F
Normal file
@ -0,0 +1,15 @@
|
||||
! Verify that the output from `-E` is valid fixed-form source. See
|
||||
! https://bugs.llvm.org/show_bug.cgi?id=50993.
|
||||
|
||||
! RUN: %flang_fc1 -E %s 2>&1 | %flang_fc1 -fsyntax-only -ffixed-form 2>&1 | FileCheck %s --allow-empty
|
||||
|
||||
! CHECK-NOT: error
|
||||
! CHECK-NOT: warning
|
||||
|
||||
! https://bugs.llvm.org/show_bug.cgi?id=51219
|
||||
! CHECK-NOT: Character in fixed-form label field must be a digit
|
||||
|
||||
PROGRAM HELLO
|
||||
write(*, *), "hello, world!"
|
||||
c Some irrelevant comment that's only valid in fixed-form
|
||||
END PROGRAM
|
Loading…
x
Reference in New Issue
Block a user