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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.2.2/] [gcc/] [testsuite/] [gfortran.dg/] [global_references_2.f90] - Diff between revs 149 and 154

Rev 149	Rev 154
`! { dg-do compile }`	`! { dg-do compile }`
`! This program tests the patch for PR25964. This is a`	`! This program tests the patch for PR25964. This is a`
`! regression that would not allow a common block and a statement`	`! regression that would not allow a common block and a statement`
`! to share the same name.`	`! to share the same name.`
`!`	`!`
`! Contributed by Paul Thomas`	`! Contributed by Paul Thomas`
`common /foo/ a, b, c`	`common /foo/ a, b, c`
`foo (x) = x + 1.0`	`foo (x) = x + 1.0`
`print *, foo (0.0)`	`print *, foo (0.0)`