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/] [assign_3.f90] - Diff between revs 302 and 384

Rev 302	Rev 384
`! { dg-do compile }`	`! { dg-do compile }`
`! Option passed to avoid excess errors from obsolete warning`	`! Option passed to avoid excess errors from obsolete warning`
`! { dg-options "-w" }`	`! { dg-options "-w" }`
`! PR18827`	`! PR18827`
`integer i,j`	`integer i,j`
`equivalence (i,j)`	`equivalence (i,j)`
`assign 1000 to i`	`assign 1000 to i`
`write (*, j) ! { dg-error "not been assigned a format label" }`	`write (*, j) ! { dg-error "not been assigned a format label" }`
`goto j ! { dg-error "not been assigned a target label" }`	`goto j ! { dg-error "not been assigned a target label" }`
`1000 continue`	`1000 continue`
`end`	`end`