URL https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc2/] [gcc/] [testsuite/] [gfortran.dg/] [write_check.f90] - Diff between revs 302 and 384

Rev 302	Rev 384
`! { dg-do run }`	`! { dg-do run }`
`! { dg-shouldfail "Compile-time specifier checking" }`	`! { dg-shouldfail "Compile-time specifier checking" }`
`! Check keyword checking for specifiers`	`! Check keyword checking for specifiers`
`! PR fortran/29452`	`! PR fortran/29452`
`program test`	`program test`
`implicit none`	`implicit none`
`character(len=5) :: str`	`character(len=5) :: str`
`str = 'yes'`	`str = 'yes'`
`write(*,'(a)',advance=str) ''`	`write(*,'(a)',advance=str) ''`
`str = 'no'`	`str = 'no'`
`write(*,'(a)',advance=str) ''`	`write(*,'(a)',advance=str) ''`
`str = 'NOT'`	`str = 'NOT'`
`write(*,'(a)',advance=str) ''`	`write(*,'(a)',advance=str) ''`
`end program test`	`end program test`
`! { dg-output "At line 13 of file.*" }`	`! { dg-output "At line 13 of file.*" }`
`! { dg-output "Bad ADVANCE parameter in data transfer statement" }`	`! { dg-output "Bad ADVANCE parameter in data transfer statement" }`