===================================================================
@@ -1,3 +1,11 @@
+2013-12-10 Tobias Burnus <burnus@net-b.de>
+
+ PR fortran/59428
+ PR fortran/58099
+ PR fortran/58676
+ PR fortran/41724
+ * gfortran.dg/proc_ptr_result_4.f90: Fix proc-ptr interface.
+
2013-12-09 Paolo Carlini <paolo.carlini@oracle.com>
PR c++/59435
===================================================================
@@ -8,7 +8,13 @@ contains
function f()
intrinsic :: sin
- procedure(sin), pointer :: f
+ abstract interface
+ pure real function sin_interf(x)
+ real, intent(in) :: x
+ end function sin_interf
+ end interface
+ ! We cannot use "sin" directly as it is ELEMENTAL
+ procedure(sin_interf), pointer :: f
f => sin
end function f
Tobias Burnus wrote: > PS: I have now committed the attached patch as Rev. 205791. Seemingly, I missed one test case. Committed the attached patch as obvious, Rev. 205838. Tobias