Sign in
gnu
/
gcc
/
4a0fed0c0c7241562eaa5f1a4c916b689429ad86
/
.
/
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