Cross Reference: char_length_11.f90
xref
: /
haiku-buildtools
/
gcc
/
gcc
/
testsuite
/
gfortran.dg
/
char_length_11.f90
Home
History
Annotate
Annotate
Line#
Navigate
Raw
Download
only in
/haiku-buildtools/gcc/gcc/testsuite/gfortran.dg/
1
! { dg-do compile }
2
3
character
(
len
=*),
parameter
:: s =
"foo"
4
write
(*,*)
adjustr
(s(:))
5
end
6