2011-02-09 Janus Weil <janus@gcc.gnu.org>
commitc6337549cc49694cebd36c1630838c7e406bc0f7
authorjanus <janus@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 9 Feb 2011 22:59:02 +0000 (9 22:59 +0000)
committerjanus <janus@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 9 Feb 2011 22:59:02 +0000 (9 22:59 +0000)
tree4dbcd292234b1adc3e966a8f6d085fca8d3f5686
parent2b0adbff36b720ae3b0faa9ac42f7895ecf601e1
2011-02-09  Janus Weil  <janus@gcc.gnu.org>

PR fortran/47352
* resolve.c (resolve_procedure_interface): If interface has a result
variable, copy the typespec and set result pointer to self.

2011-02-09  Janus Weil  <janus@gcc.gnu.org>

PR fortran/47352
* gfortran.dg/proc_decl_25.f90: New.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@169987 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/fortran/ChangeLog
gcc/fortran/resolve.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/proc_decl_25.f90 [new file with mode: 0644]