xref: /llvm-project/flang/test/Parser/include.f (revision 4dfed691a9f846b1ff773e28b878404b78559890)
1! RUN: %flang_fc1 -E -fpreprocess-include-lines -I %S/Inputs %s 2>&1 | FileCheck %s
2      include 'include-file'
3      include "include-file"
4      include 1_'include-file'
5      include 1_"include-file"
6      i n c l u d e 'include-file'
7      INCLUDE 'include-file'
8      I N C L U D E 'include-file'
9include 'include-file'
10include "include-file"
11include 1_'include-file'
12include 1_"include-file"
13i n c l u d e 'include-file'
14INCLUDE 'include-file'
15I N C L U D E 'include-file'
16     0include 'include-file'
17      x = 2
18     include 'include-file'
19      print *, "
20     1include 'not-an-include'
21     2"
22cinclude 'not-an-include'
23*include 'not-an-include'
24!include 'not-an-include'
25c     include 'not-an-include'
26*     include 'not-an-include'
27!     include 'not-an-include'
28      end
29
30!CHECK:#line "{{.*[/\\]}}include-file" 1
31!CHECK:      x = 1
32!CHECK:#line "{{.*[/\\]}}include-file" 1
33!CHECK:      x = 1
34!CHECK:#line "{{.*[/\\]}}include-file" 1
35!CHECK:      x = 1
36!CHECK:#line "{{.*[/\\]}}include-file" 1
37!CHECK:      x = 1
38!CHECK:#line "{{.*[/\\]}}include-file" 1
39!CHECK:      x = 1
40!CHECK:#line "{{.*[/\\]}}include-file" 1
41!CHECK:      x = 1
42!CHECK:#line "{{.*[/\\]}}include-file" 1
43!CHECK:      x = 1
44!CHECK:#line "{{.*[/\\]}}include-file" 1
45!CHECK:      x = 1
46!CHECK:#line "{{.*[/\\]}}include-file" 1
47!CHECK:      x = 1
48!CHECK:#line "{{.*[/\\]}}include-file" 1
49!CHECK:      x = 1
50!CHECK:#line "{{.*[/\\]}}include-file" 1
51!CHECK:      x = 1
52!CHECK:#line "{{.*[/\\]}}include-file" 1
53!CHECK:      x = 1
54!CHECK:#line "{{.*[/\\]}}include-file" 1
55!CHECK:      x = 1
56!CHECK:#line "{{.*[/\\]}}include-file" 1
57!CHECK:      x = 1
58!CHECK:#line "{{.*[/\\]}}include-file" 1
59!CHECK:      x = 1
60!CHECK:#line "{{.*[/\\]}}include.f" 17
61!CHECK:      x = 2
62!CHECK:#line "{{.*[/\\]}}include-file" 1
63!CHECK:      x = 1
64!CHECK:#line "{{.*[/\\]}}include.f" 19
65!CHECK:      print *, "                                                        &
66!CHECK:     &include 'not-an-include'                                          &
67!CHECK:     &"
68!CHECK:      end
69