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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gfortran.dg/] [assign_1.f90] - Blame information for rev 302

Details | Compare with Previous | View Log


! { dg-do compile }
! Option passed to avoid excess errors from obsolete warning
! { dg-options "-w" }
      integer i(5)
      assign 1000 to i   ! { dg-error "scalar default INTEGER" }
 1000 continue
      end

Line No.	Rev	Author	Line
1	302	jeremybenn	`! { dg-do compile }`
2			`! Option passed to avoid excess errors from obsolete warning`
3			`! { dg-options "-w" }`
4			`integer i(5)`
5			`assign 1000 to i ! { dg-error "scalar default INTEGER" }`
6			`1000 continue`
7			`end`

Browse

Tools

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gfortran.dg/] [assign_1.f90] - Blame information for rev 302