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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gfortran.dg/] [common_13.f90] - Blame information for rev 708

Go to most recent revision | Details | Compare with Previous | View Log


! { dg-do compile }
!
! PR 50070: Segmentation fault at size_binop_loc in fold-const.c
!
! Contributed by Vittorio Zecca 
 
subroutine sub
  common n,z             ! { dg-error "must have constant character length" }
  integer :: n
  character(len=n) :: z
end

Line No.	Rev	Author	Line
1	694	jeremybenn	`! { dg-do compile }`
2			`!`
3			`! PR 50070: Segmentation fault at size_binop_loc in fold-const.c`
4			`!`
5			`! Contributed by Vittorio Zecca`
6
7			`subroutine sub`
8			`common n,z ! { dg-error "must have constant character length" }`
9			`integer :: n`
10			`character(len=n) :: z`
11			`end`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gfortran.dg/] [common_13.f90] - Blame information for rev 708