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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gfortran.dg/] [namelist_blockdata.f] - Blame information for rev 694

Details | Compare with Previous | View Log


! { dg-do compile }
! Tests fix for PR21565 - object cannot be in namelist and block data.
      block data
      common /foo/ a
      namelist /foo_n/ a ! { dg-error "not allowed in BLOCK DATA" }
      data a /1.0/
      end

Line No.	Rev	Author	Line
1	694	jeremybenn	`! { dg-do compile }`
2			`! Tests fix for PR21565 - object cannot be in namelist and block data.`
3			`block data`
4			`common /foo/ a`
5			`namelist /foo_n/ a ! { dg-error "not allowed in BLOCK DATA" }`
6			`data a /1.0/`
7			`end`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gfortran.dg/] [namelist_blockdata.f] - Blame information for rev 694