blob: e05e73819e68cd64536c48ae69ca98412e73dc9e (
plain)
1
2
3
4
5
6
7
8
9
10
|
! { dg-do compile }
! { dg-options "-std=legacy" }
! PR fortran/102113 - parsing error in assigned goto
program p
assign 10 to i
goto i,(10,20 )
10 continue
20 continue
end
|