Lines Matching full:module
3 ! When a module subprogram has the MODULE prefix the following must match
4 ! with the corresponding separate module procedure interface body:
9 module m1
11 module subroutine s4(x)
14 module subroutine s5(x, y)
18 module subroutine s6(x, y)
22 module subroutine s7(x, y, z)
27 module subroutine s8(x, y, z)
32 module subroutine s9(x, y, z, w)
38 module subroutine s10(x, y, z, w)
46 module subroutine s4(x)
50 module subroutine s5(x, y)
56 module subroutine s6(x, y)
62 module subroutine s7(x, y, z)
69 module subroutine s8(x, y, z)
76 module subroutine s9(x, y, z, w)
84 module subroutine s10(x, y, z, w)
89 module m2
91 module subroutine s1(x, y)
95 module subroutine s2(x, y)
99 module subroutine s3(x, y)
103 module subroutine s4()
105 non_recursive module subroutine s5()
112 !ERROR: Module subprogram 's1' has 3 args but the corresponding interface body has 2
113 module subroutine s1(x, y, z)
118 module subroutine s2(x, z)
123 module subroutine s3(x, y)
129 !ERROR: Module subprogram 's4' has NON_RECURSIVE prefix but the corresponding interface body does not
130 non_recursive module subroutine s4()
132 !ERROR: Module subprogram 's5' does not have NON_RECURSIVE prefix but the corresponding interface body does
133 module subroutine s5()
137 module m2b
139 module subroutine s1()
141 module subroutine s2() bind(c, name="s2")
143 module subroutine s3() bind(c, name="s3")
145 module subroutine s4() bind(c, name=" s4")
147 module subroutine s5() bind(c)
149 module subroutine s6() bind(c)
151 module subroutine s7() bind(c, name="s7")
159 !ERROR: Module subprogram 's1' has a binding label but the corresponding interface body does not
160 !ERROR: Module subprogram 's1' and its corresponding interface body are not both BIND(C)
161 module subroutine s1() bind(c, name="s1")
163 !ERROR: Module subprogram 's2' does not have a binding label but the corresponding interface body does
164 !ERROR: Module subprogram 's2' and its corresponding interface body are not both BIND(C)
165 module subroutine s2()
167 !ERROR: Module subprogram 's3' has binding label 's3_xxx' but the corresponding interface body has 's3'
168 module subroutine s3() bind(c, name="s3" // suffix)
170 module subroutine s4() bind(c, name="s4 ")
172 module subroutine s5() bind(c, name=" s5")
174 !ERROR: Module subprogram 's6' has binding label 'not_s6' but the corresponding interface body has 's6'
175 module subroutine s6() bind(c, name="not_s6")
177 module procedure s7
182 module m3
184 module subroutine s1(x, y, z)
189 module subroutine s2(x, y)
198 module subroutine s1(x, y, z)
205 module subroutine s2(x, y)
214 module m4
225 module subroutine s1(x)
228 module subroutine s2(x)
236 module subroutine s1(x)
240 module subroutine s2(x)
246 module m5
248 module function f1()
251 module subroutine s2()
258 !ERROR: Module subroutine 'f1' was declared as a function in the corresponding interface body
259 module subroutine f1()
261 !ERROR: Module function 's2' was declared as a subroutine in the corresponding interface body
262 module function s2()
266 module m6
268 module function f1()
271 module function f2()
274 module function f3()
283 real module function f1()
286 integer module function f2()
289 module function f3()
295 module m7
297 module subroutine s1(x, *)
307 module subroutine s1(*, x)
312 module m8
314 pure elemental module subroutine s1
317 end module
322 module procedure s1
326 module m9
328 module subroutine sub1(s)
331 module subroutine sub2(s)
335 end module
339 module subroutine sub1(s)
342 module subroutine sub2(s)
348 module m10
350 module character(2) function f()
353 end module
357 module character(3) function f()
361 module m11
363 module subroutine s(x)
372 module subroutine s(x)