Sign in
llvm
/
llvm-test-suite
/
refs/heads/main
/
.
/
Fortran
/
gfortran
/
regression
/
pr95502.f90
blob: d40fd9a55080539ee80fe74ba72f23de05950167 [
file
] [
log
] [
blame
]
!
{
dg
-
do
compile
}
!
PR fortran
/
95502
-
ICE
in
gfc_check_do_variable
,
at fortran
/
parse
.
c
:
4446
program p
integer
,
pointer
::
z
nullify
(
z
%
kind
)
!
{
dg
-
error
"in variable definition context"
}
z
%
kind
=>
NULL
()
!
{
dg
-
error
"constant expression"
}
end