Lines Matching full:function

2 ! Testing 15.6.2.2 point 4 (What function-name refers to depending on the
11   function f1()
17   end function
18   function f2(i)
25   end function
26   function f3(i)
33   end function
35   ! testing with function pointer results
36   function rf()
38   end function
39   function f4()
46   end function
47   function f5(x)
50       real function rfunc(x)
52       end function
60   end function
62 …!WARNING: The function name should not appear in RESULT; references to 'f6' inside the function wi…
63   function f6() result(f6)
64   end function
65 …!WARNING: The function name should not appear in RESULT; references to 'f7' inside the function wi…
66   function f7() result(f7)
72   end function
76 ! With RESULT, it refers to the function (recursive calls possible)
80   function f1() result(r)
85   end function
86   function f2(i) result(r)
92   end function
93   function f3(i) result(r)
99   end function
101   ! testing with function pointer results
102   function rf()
104   end function
105   function f4() result(r)
114   end function
115   function f5(x) result(r)
125   end function
128   function f6() result(r)
132   end function