Sign in
gnu
/
gcc
/
0b6b70a0733672600644c8df96942cda5bf86d3d
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
storage_size_6.f90
blob: 503829231cc03574a53f8512c21ae6fff81f59d3 [
file
] [
log
] [
blame
]
!
{
dg
-
do
compile
}
!
PR fortran
/
66043
!
!
Original
code
from
Gerhard
Steinmetz
!
<
gerhard dot steinmetz dot fortran at t
-
online dot de
>
program p
print
*,
storage_size
(
null
())
!
{
dg
-
error
"cannot be an actual"
}
end