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

Rev 302	Rev 384
`! { dg-do compile }`	`! { dg-do compile }`
`! PR19589`	`! PR19589`
`! Logical objects/values with differing type kinds were being rejected in`	`! Logical objects/values with differing type kinds were being rejected in`
`! data statements.`	`! data statements.`
`program logical_data_1`	`program logical_data_1`
`logical(kind=4) :: a`	`logical(kind=4) :: a`
`logical(kind=8) :: b`	`logical(kind=8) :: b`
`data a, b /.true., .false./`	`data a, b /.true., .false./`
`end program`	`end program`