comparison gcc/testsuite/gfortran.dg/class_42.f03 @ 111:04ced10e8804

gcc 7
author kono
date Fri, 27 Oct 2017 22:46:09 +0900
parents
children
comparison
equal deleted inserted replaced
68:561a7518be6b 111:04ced10e8804
1 ! { 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 <adrian@llnl.gov>
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