Sign in
gnu
/
gcc
/
cfdff3eeb902958d3eefe60d5712d64e2367843f
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
pointer_remapping_8.f90
blob: 94fe6c553ef395706ebab33ea88b40db173fa207 [
file
] [
log
] [
blame
]
!
{
dg
-
do
compile
}
!
!
PR
54788
ICE on pointer
-
array element assignment
!
program bug
integer
,
pointer
::
a
(:)
integer
::
b
allocate
(
a
(
0
:
0
))
a
(
0
:
0
)
=>
b
!
{
dg
-
error
"Rank remapping target must be rank 1 or simply contiguous"
}
end