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

re PR fortran/41909 (ICE with "call foo" in "program foo") 

2009-11-06  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

	PR fortran/41909
	* gfortran.dg/recursive_check_15.f90: New test.

From-SVN: r153992
This commit is contained in:
Jerry DeLisle 2009-11-07 04:33:06 +00:00
parent bfdccf4284
commit c6bcb25b27
2 changed files with 17 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gcc/testsuite/ChangeLog
View File

@ -1,3 +1,8 @@
2009-11-06 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR fortran/41909
* gfortran.dg/recursive_check_15.f90: New test.
2009-11-06 Jakub Jelinek <jakub@redhat.com>
PR c++/41967

12
gcc/testsuite/gfortran.dg/recursive_check_15.f90 Normal file
View File

@ -0,0 +1,12 @@
! { dg-do compile }
! PR41909 ICE with "call foo" in "program foo"
program test ! { dg-error "Global name" }
implicit none
call test() ! { dg-error "" }
contains
subroutine one(a)
real, dimension(:,:), intent(inout), optional :: a
call two(a)
end subroutine one
end program test