Lines Matching full:procedure
18 procedure(s1), pass :: ab1
19 !ERROR: Type-bound procedure 'ab3' may not be both DEFERRED and NON_OVERRIDABLE
20 procedure(s1), deferred, non_overridable :: ab3
22 procedure, deferred, non_overridable :: ab4 => s1
26 procedure, non_overridable, nopass :: no1 => s1
33 procedure, nopass :: no1 => s1
37 procedure(s4), deferred :: am1
39 …-ABSTRACT extension of ABSTRACT derived type 'missing' lacks a binding for DEFERRED procedure 'am1'
44 procedure :: am1 => s7
67 !ERROR: Procedure bound to non-ABSTRACT derived type 'base' may not be DEFERRED
68 procedure(s2), deferred :: bb1
70 procedure, deferred :: bb2 => s2
74 !ERROR: A type-bound procedure binding may not have the same name as a parent component
75 procedure :: component => s3
79 procedure, nopass :: tbp => s1
83 !ERROR: A passed-argument type-bound procedure may not override a NOPASS procedure
84 procedure :: tbp => s5
88 procedure :: tbp => s6
92 !ERROR: A NOPASS type-bound procedure may not override a passed-argument procedure
93 procedure, nopass :: tbp => s1
122 module procedure mp
127 …binding of 'tbp' ('g') must be either an accessible module procedure or an external procedure with…
128 procedure,pass(x) :: tbp => g
141 !ERROR: Procedure binding 'proc' with no dummy arguments must have NOPASS attribute
142 procedure proc
146 !ERROR: Procedure binding 'proc' with no dummy arguments must have NOPASS attribute
147 procedure proc
157 procedure b
169 procedure b
182 …!ERROR: Passed-object dummy argument 'passarg' of procedure 'b' must be of type 't' but is 'INTEGE…
183 procedure, pass(passArg) :: b
195 …!ERROR: Passed-object dummy argument 'passarg' of procedure 'b' must be polymorphic because 't' is…
196 procedure, pass(passArg) :: b
209 procedure, pass(passArg) :: b
220 procedure(mysubr), pointer, nopass :: pp
222 procedure, nopass :: tbp => mysubr
229 !PORTABILITY: Base of NOPASS type-bound procedure reference should be scalar
231 !ERROR: Base of procedure component reference must be scalar
239 procedure, public :: tbp => sub1
243 !ERROR: A PRIVATE procedure may not override a PUBLIC procedure
244 procedure, private :: tbp => sub2
258 procedure :: tbp => sub1
269 !ERROR: A PRIVATE procedure may not override an accessible procedure
270 procedure, private :: tbp => sub2
281 procedure, nopass :: tbp => t1p
286 !ERROR: A PRIVATE procedure may not override a PUBLIC procedure
287 procedure, nopass :: tbp => t2p