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

Subversion Repositories openrisc

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

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


! { dg-do compile }
!
! PR 46971: [4.6 Regression] [OOP] ICE on long class names
!
! Contributed by Andrew Benson 
 
module Molecular_Abundances_Structure
  type molecularAbundancesStructure
  end type
  class(molecularAbundancesStructure), pointer :: molecules
end module
 
! { dg-final { cleanup-modules "molecular_abundances_structure" } }

Line No.	Rev	Author	Line
1	694	jeremybenn	`! { dg-do compile }`
2			`!`
3			`! PR 46971: [4.6 Regression] [OOP] ICE on long class names`
4			`!`
5			`! Contributed by Andrew Benson`
6
7			`module Molecular_Abundances_Structure`
8			`type molecularAbundancesStructure`
9			`end type`
10			`class(molecularAbundancesStructure), pointer :: molecules`
11			`end module`
12
13			`! { dg-final { cleanup-modules "molecular_abundances_structure" } }`

Browse

Tools

Subversion Repositories openrisc

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