[flang] Accept polymorphic component element in storage_size
[llvm-project.git] / flang / test / Preprocessing / include-comment.F90
blob5997a52292a5f1fe01dc75471edcc4935abf6699
1 ! RUN: %flang -I%S -E %s 2>&1 | FileCheck %s
2 ! CHECK-NOT: :3:
3 #include <empty.h> ! comment
4 ! CHECK-NOT: :5:
5 #include <empty.h> /* comment */
6 ! CHECK-NOT: :7:
7 #include <empty.h> !comment
8 ! CHECK: :9:20: portability: #include: extra stuff ignored after file name
9 #include <empty.h> comment
10 ! CHECK-NOT: :11:
11 #include "empty.h" ! comment
12 ! CHECK-NOT: :13:
13 #include "empty.h" /* comment */
14 ! CHECK-NOT: :15:
15 #include "empty.h" !comment
16 ! CHECK: :17:20: portability: #include: extra stuff ignored after file name
17 #include "empty.h" comment
18 end