Sign in
chromium
/
chromiumos
/
third_party
/
gcc
/
b42cc22ad4b3cc4c4cd697052b8f1dd85df96d0a
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
host_assoc_blockdata_1.f90
blob: 7f24fecb0e00a9a1dcddc48dfc03ab739dda17c4 [
file
] [
log
] [
blame
]
!
{
dg
-
do
compile
}
!
PR
38672
-
this
used to ICE
.
MODULE globals
TYPE
::
type1
integer
::
x
END
TYPE type1
TYPE
(
type1
)
::
pdm_bps
END
module
globals
BLOCK DATA
use
globals
END
BLOCK DATA