index
:
toolchain_gcc
master
replicant-6.0
toolchain/gcc
about
summary
refs
log
tree
commit
diff
stats
log msg
author
committer
range
path:
root
/
gcc-4.9
/
gcc
/
testsuite
/
gfortran.dg
/
char_decl_2.f90
blob: ffce6b158e26e7532de365d8b84a03002e5c750a (
plain
)
1
2
3
4
! { dg-do run }
character
(
kind
=
kind
(
"a"
)) ::
u
if
(
kind
(
u
) /=
kind
(
"a"
))
call
abort
end