Sign in
gnu
/
gcc
/
refs/tags/basepoints/gcc-13
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
pr69419.f90
blob: 7329808611cb98e16eee2b0b97d8ca4e938f15bd [
file
] [
log
] [
blame
]
!
{
dg
-
do
compile
}
!
{
dg
-
options
"-fcoarray=lib"
}
!
PR fortran
/
69419
-
ICE on invalid coarray
in
common
blockdata b
real x
!
{
dg
-
error
"must be in COMMON"
}
common
/
c
/
x
[*]
!
{
dg
-
error
"cannot be a coarray"
}
data x
/
1.0
/
end