Sign in
gnu
/
gcc
/
refs/heads/devel/c++-contracts
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
charlen_04.f90
blob: 97aa0ec583c8aa086c306ee7ad7e26739390eda4 [
file
] [
log
] [
blame
]
!
{
dg
-
do
compile
}
!
PR fortran
/
65173
program p
type t
character
(*),
allocatable
::
x
(*)
!
{
dg
-
error
"must have a deferred shape"
}
end
type
!
{
dg
-
error
"needs to be a constant specification"
""
{
target
"*-*-*"
}
.-
1
}
end