Lines Matching full:procedure

10   procedure() :: a
11   procedure(integer) :: b
12   procedure(foo) :: c
13   procedure(bar) :: d
14   !ERROR: 'missing' must be an abstract interface or a procedure with an explicit interface
15   procedure(missing) :: e
16   !ERROR: 'b' must be an abstract interface or a procedure with an explicit interface
17   procedure(b) :: f
18   procedure(c) :: g
20   !ERROR: 'h' must be an abstract interface or a procedure with an explicit interface
21   procedure(h) :: i
22   procedure(forward) :: j
23   !ERROR: 'bad1' must be an abstract interface or a procedure with an explicit interface
24   !ERROR: Procedure 'k1' may not be an array without an explicit interface
25   procedure(bad1) :: k1
26   !ERROR: 'bad2' must be an abstract interface or a procedure with an explicit interface
27   procedure(bad2) :: k2
28   !ERROR: 'bad3' must be an abstract interface or a procedure with an explicit interface
29   procedure(bad3) :: k3
71     !ERROR: 'proc' must be an abstract interface or a procedure with an explicit interface
72     !ERROR: Procedure component 'p1' must have NOPASS attribute or explicit interface
73     procedure(proc), deferred :: p1
87     !ERROR: Abstract procedure interface 'foo2' may not be referenced
89     !ERROR: Abstract procedure interface 'f' may not be referenced