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

Subversion Repositories openrisc

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

Rev 302	Rev 384
`! { dg-do compile }`	`! { dg-do compile }`
`! { dg-options "-std=f95" }`	`! { dg-options "-std=f95" }`
`! PR34227 Initialized symbol in COMMON: Missing checks`	`! PR34227 Initialized symbol in COMMON: Missing checks`
`program main`	`program main`
`implicit none`	`implicit none`
`integer, parameter:: nmin = 2`	`integer, parameter:: nmin = 2`
`character(len=3) :: emname(nmin)`	`character(len=3) :: emname(nmin)`
`data emname/'bar','baz'/`	`data emname/'bar','baz'/`
`common/dd/emname ! { dg-error "can only be COMMON in BLOCK DATA" }`	`common/dd/emname ! { dg-error "can only be COMMON in BLOCK DATA" }`
`end program main`	`end program main`