URL https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gfortran.dg/] [char_array_constructor_3.f90] - Blame information for rev 302

Details | Compare with Previous | View Log


! { dg-do compile }
! tests the fix for PR32156, in which the character length of the compound
! expression got lost.
!
! Contributed by Tobias Burnus 
!
write (*,'(2A3)') 'X'//(/"1","2"/)//'Y'
END

Line No.	Rev	Author	Line
1	302	jeremybenn	`! { dg-do compile }`
2			`! tests the fix for PR32156, in which the character length of the compound`
3			`! expression got lost.`
4			`!`
5			`! Contributed by Tobias Burnus`
6			`!`
7			`write (*,'(2A3)') 'X'//(/"1","2"/)//'Y'`
8			`END`

Browse

Tools

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gfortran.dg/] [char_array_constructor_3.f90] - Blame information for rev 302