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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gfortran.dg/] [class_42.f03] - Blame information for rev 801

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


! { dg-do compile }
!
! PR 48291: [4.6/4.7 Regression] [OOP] internal compiler error, new_symbol(): Symbol name too long
!
! Contributed by Adrian Prantl 
 
module Overload_AnException_Impl
  type :: Overload_AnException_impl_t
  end type
contains
  subroutine ctor_impl(self)
    class(Overload_AnException_impl_t) :: self
  end subroutine
end module
 
! { dg-final { cleanup-modules "overload_anexception_impl" } }

Line No.	Rev	Author	Line
1	694	jeremybenn	`! { dg-do compile }`
2			`!`
3			`! PR 48291: [4.6/4.7 Regression] [OOP] internal compiler error, new_symbol(): Symbol name too long`
4			`!`
5			`! Contributed by Adrian Prantl`
6
7			`module Overload_AnException_Impl`
8			`type :: Overload_AnException_impl_t`
9			`end type`
10			`contains`
11			`subroutine ctor_impl(self)`
12			`class(Overload_AnException_impl_t) :: self`
13			`end subroutine`
14			`end module`
15
16			`! { dg-final { cleanup-modules "overload_anexception_impl" } }`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gfortran.dg/] [class_42.f03] - Blame information for rev 801