Sign in
gnu
/
gcc
/
2650b6f9147c0d855c2763610b8a4bff18f5b5e0
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
contiguous_6.f90
blob: b17c7ed8771cb0042154ab261d3f23f081c568ae [
file
] [
log
] [
blame
]
!
{
dg
-
do
compile
}
!
PR fortran
/
83742
!
Contributed
by
Gerhard
Steinmetz
<
gscfq at t
-
online dot de
>
program p
real
,
target
::
a
real
,
pointer
,
contiguous
::
b
=>
a
!
{
dg
-
error
"has the CONTIGUOUS attribute"
}
end