Sign in
gnu
/
gcc
/
cd2fd5facb5e1882d3f338ed456ae9536f7c0593
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
pr59910.f90
blob: 2b288e4ff6c35b299afd03510a6fe98484d69cb6 [
file
] [
log
] [
blame
]
!
{
dg
-
do
compile
}
!
PR fortran
/
59910
!
program main
implicit
none
type bar
integer
::
limit
(
1
)
end
type
type
(
bar
)
::
testsuite
data testsuite
/
bar
(
reshape
(
source
=[
10
],
shape
=[
1
]))
/
end