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

re PR fortran/31972 (Internal Error occurs when TRANSFER contains hollerith argument) 

PR fortran/31972
* transfer_hollerith_1.f90: New test.

From-SVN: r125142
This commit is contained in:
Brooks Moses 2007-05-28 20:54:49 +00:00 committed by Brooks Moses
parent 3b45d6c489
commit 6ed345576f
2 changed files with 19 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 @@
2007-05-28 Brooks Moses <brooks.moses@codesourcery.com>
PR fortran/31972
* transfer_hollerith_1.f90: New test.
2007-05-28 Andrew Pinski <andrew_pinski@playstation.sony.com>
PR tree-opt/32100

14
gcc/testsuite/gfortran.dg/transfer_hollerith_1.f90 Normal file
View File

@ -0,0 +1,14 @@
! { dg-do compile }
! { dg-options "-O2" }
! PR 31972, ICE in transfer of Hollerith constant
integer, dimension(1) :: i
integer :: j
i = (/ transfer(4HSOLR, 0) /)
j = transfer(0, 4HSOLR) ! { dg-error "must not be HOLLERITH" }
end
! { dg-warning "Hollerith constant" "const" { target *-*-* } 6 }
! { dg-warning "Hollerith constant" "const" { target *-*-* } 8 }