------- Comment #6 from danglin at gcc dot gnu dot org 2008-11-28 04:44 -------
(gdb) p debug_tree (decl)
<var_decl 7af331b8 testcom
type <record_type 7af79af8 BLK
size <integer_cst 7af775c0 constant 6400>
unit size <integer_cst 7af7ac40 constant 800>
align 64 symtab 0 alias set -1 canonical type 7af79af8
fields <field_decl 7af781e0 bprim type <array_type 7af797b8>
BLK file
/test/gnu/gcc/gcc/libgomp/testsuite/libgomp.fortran/pr25162.f line 9 col 0 size
<integer_cst 7af775c0 6400> unit size <integer_cst 7af7ac40 800>
align 64 offset_align 64
offset <integer_cst 7af2b2e0 constant 0>
bit offset <integer_cst 7af2b860 constant 0> context <record_type
7af79af8>>>
addressable public static ignored common tls-local-exec decl_3 BLK
defer-output file /test/gnu/gcc/gcc/libgomp/testsuite/libgomp.fortran/pr25162.f
line 10 col 0 size <integer_cst 7af775c0 6400> unit size <integer_cst 7af7ac40
800>
align 64 context <function_decl 7af7b400 test1> chain <function_decl
7af7b400 test1>>
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=38283
