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/] [g77/] [12632.f] - Blame information for rev 302

Details | Compare with Previous | View Log


C { dg-do compile }
C { dg-options "-fbounds-check" }
       INTEGER I(1)
       I(2) = 0  ! { dg-error "out of bounds" "out of bounds" }
       END
 

Line No.	Rev	Author	Line
1	302	jeremybenn	`C { dg-do compile }`
2			`C { dg-options "-fbounds-check" }`
3			`INTEGER I(1)`
4			`I(2) = 0 ! { dg-error "out of bounds" "out of bounds" }`
5			`END`
6

Browse

Tools

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gfortran.dg/] [g77/] [12632.f] - Blame information for rev 302