comparison gcc/testsuite/gfortran.dg/class_54.f90 @ 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 53718: [4.7/4.8 regression] [OOP] gfortran generates asm label twice in the same output file
4 !
5 ! Contributed by Adrian Prantl <adrian@llnl.gov>
6
7 module m
8 type t
9 end type
10 end module
11
12 subroutine sub1
13 use m
14 class(t), pointer :: a1
15 end subroutine
16
17 subroutine sub2
18 use m
19 class(t), pointer :: a2
20 end subroutine