Sign in
gnu
/
gcc
/
fba228e259dd5112851527f2dbb62c5601100985
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
pr83149_a.f90
blob: 3f15198bfe9708dd9475e0a46a774081939cbbbc [
file
] [
log
] [
blame
]
!
Compiled
with
pr83149_b
.
f90
!
module
mod
character
(
8
)
string
contains
function
get_string
()
result
(
s
)
character
(
len_trim
(
string
))
s
s
=
string
end
function
end
module