OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

proc_ptr_comp_21.f90: Removed. 

2009-09-30  H.J. Lu  <hongjiu.lu@intel.com>

	* gfortran.dg/proc_ptr_comp_21.f90: Removed.

From-SVN: r152348
This commit is contained in:
H.J. Lu 2009-09-30 22:34:32 +00:00 committed by H.J. Lu
parent 916f964b5b
commit 0c1e4fb855
2 changed files with 4 additions and 28 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gcc/testsuite/ChangeLog
View File

@ -1,3 +1,7 @@
2009-09-30 H.J. Lu <hongjiu.lu@intel.com>
* gfortran.dg/proc_ptr_comp_21.f90: Removed.
2009-09-30 Uros Bizjak <ubizjak@gmail.com>
PR target/22093

28
gcc/testsuite/gfortran.dg/proc_ptr_comp_21.f90
View File

@ -1,28 +0,0 @@
! { dg-do compile }
!
! PR 41242: [4.5 Regression] PPC call rejected (related to user-defined assignment?)
!
! Original test case by Juergen Reuter <reuter@physik.uni-freiburg.de>
! Modified by Janus Weil <janus@gcc.gnu.org>
type :: nf_t
procedure(integer), nopass, pointer :: get_n_in
end type
interface assignment(=)
procedure op_assign
end interface
type(nf_t) :: prc_lib
prc_lib = "foobar"
print *, prc_lib%get_n_in()
contains
elemental subroutine op_assign (str, ch)
type(nf_t), intent(out) :: str
character(len=*), intent(in) :: ch
end subroutine
end