[Bug ada/17794] Bootstrap error building ada runtime

["danglin at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>]

------- Additional Comments From danglin at gcc dot gnu dot org  2004-10-02 15:37 -------
Breakpoint 2, expand_expr_addr_expr_1 (exp=0x40097b68, target=0x0,
    tmode=SImode, modifier=EXPAND_NORMAL) at ../../gcc/gcc/expr.c:6147
6147      gcc_assert (inner != exp);
(gdb) p inner
$1 = 0x4009cc60
(gdb) p exp
$2 = 0x40097b68
(gdb) p debug_tree (exp)
 <component_ref 0x40097b68
    type <record_type 0x4005dac8 ada__finalization__limited_controlled 
asm_written align-ok visited type_2 BLK
        size <integer_cst 0x4003c090 constant invariant 96>
        unit size <integer_cst 0x4003c108 constant invariant 12>
        align 32 symtab 1074100808 alias set 5
        fields <field_decl 0x4005f7f8 _parent type <record_type 0x4005dca8 
system__finalization_root__root_controlled>
            decl_3 BLK file s-finroo.ads line 52 size <integer_cst 0x4003c090 96> 
unit size <integer_cst 0x4003c108 12>
            align 32 offset_align 64
            offset <integer_cst 0x4000d060 constant invariant 0>
            bit offset <integer_cst 0x4000d858 constant invariant 0> context <
record_type 0x4005dac8 ada__finalization__limited_controlled> arguments <
integer_cst 0x4000d060 0>> Ada size <integer_cst 0x4003c090 96>
        pointer_to_this <pointer_type 0x4009f780> reference_to_this <
reference_type 0x4009f438> chain <type_decl 0x4005f870>>

    arg 0 <indirect_ref 0x4009cc60
        type <record_type 0x40052ac8 gnat__awk__session_type asm_written align-ok 
visited type_2 BLK
            size <integer_cst 0x4000d660 constant invariant 128>
            unit size <integer_cst 0x4000d678 constant invariant 16>
            align 32 symtab 1074182000 alias set 5 fields <field_decl 0x4006f168 
_parent> Ada size <integer_cst 0x4000d660 128>
            pointer_to_this <pointer_type 0x40083c30> reference_to_this <
reference_type 0x4007f2d0> chain <type_decl 0x4006f258>>

        arg 0 <parm_decl 0x40083708 _init type <reference_type 0x4007f2d0>
            readonly used unsigned decl_1 SI file g-awk.ads line 579
            size <integer_cst 0x4000d318 constant invariant 32>
            unit size <integer_cst 0x4000d048 constant invariant 4>
            align 32 context <function_decl 0x40083870 gnat__awk__session_typeIP> 
result <reference_type 0x4007f2d0> initial <reference_type 0x4007f2d0>
            (reg/v/f:SI 94 [ _init ]) arg-type <reference_type 0x4007f2d0> arg-
type-as-written <reference_type 0x4007f2d0>
            incoming-rtl (reg:SI 26 %r26 [ _init ]) chain <parm_decl 0x40083780 
P28s>>>
    arg 1 <field_decl 0x4006f168 _parent type <record_type 0x4005dac8 
ada__finalization__limited_controlled>
        decl_3 BLK file g-awk.ads line 579 size <integer_cst 0x4003c090 96> unit 
size <integer_cst 0x4003c108 12>
        align 32 offset_align 64 offset <integer_cst 0x4000d060 0> bit offset <
integer_cst 0x4000d858 0> context <record_type 0x40052ac8 
gnat__awk__session_type> arguments <integer_cst 0x4000d060 0>
        chain <field_decl 0x4006f1e0 data type <pointer_type 0x4005d780 
gnat__awk__session_data_access>
            unsigned nonaddressable SI file g-awk.ads line 580 size <integer_cst 
0x4000d318 32> unit size <integer_cst 0x4000d048 4>
            align 32 offset_align 64
            offset <integer_cst 0x4000d4f8 constant invariant 8> bit offset <
integer_cst 0x4000d318 32> context <record_type 0x40052ac8 
gnat__awk__session_type> arguments <integer_cst 0x4000d4f8 8>>>>
$3 = void
(gdb) p debug_tree (inner)
 <indirect_ref 0x4009cc60
    type <record_type 0x40052ac8 gnat__awk__session_type asm_written align-ok 
visited type_2 BLK
        size <integer_cst 0x4000d660 constant invariant 128>
        unit size <integer_cst 0x4000d678 constant invariant 16>
        align 32 symtab 1074182000 alias set 5
        fields <field_decl 0x4006f168 _parent type <record_type 0x4005dac8 
ada__finalization__limited_controlled>
            decl_3 BLK file g-awk.ads line 579
            size <integer_cst 0x4003c090 constant invariant 96>
            unit size <integer_cst 0x4003c108 constant invariant 12>
            align 32 offset_align 64
            offset <integer_cst 0x4000d060 constant invariant 0>
            bit offset <integer_cst 0x4000d858 constant invariant 0> context <
record_type 0x40052ac8 gnat__awk__session_type> arguments <integer_cst 0x4000d060 
0> chain <field_decl 0x4006f1e0 data>> Ada size <integer_cst 0x4000d660 128>
        pointer_to_this <pointer_type 0x40083c30> reference_to_this <
reference_type 0x4007f2d0> chain <type_decl 0x4006f258>>

    arg 0 <parm_decl 0x40083708 _init
        type <reference_type 0x4007f2d0 type <record_type 0x40052ac8 
gnat__awk__session_type>
            unsigned SI
            size <integer_cst 0x4000d318 constant invariant 32>
            unit size <integer_cst 0x4000d048 constant invariant 4>
            align 32 symtab 0 alias set 53>
        readonly used unsigned decl_1 SI file g-awk.ads line 579 size <
integer_cst 0x4000d318 32> unit size <integer_cst 0x4000d048 4>
        align 32 context <function_decl 0x40083870 gnat__awk__session_typeIP> 
result <reference_type 0x4007f2d0> initial <reference_type 0x4007f2d0>
        (reg/v/f:SI 94 [ _init ]) arg-type <reference_type 0x4007f2d0> arg-type-
as-written <reference_type 0x4007f2d0>
        incoming-rtl (reg:SI 26 %r26 [ _init ])
        chain <parm_decl 0x40083780 P28s type <enumeral_type 0x4006e000 boolean>
            readonly used unsigned QI file g-awk.ads line 579
            size <integer_cst 0x4000d0c0 constant invariant 8>
            unit size <integer_cst 0x4000d0d8 constant invariant 1>
            align 8 context <function_decl 0x40083870 gnat__awk__session_typeIP> 
result <integer_type 0x4000b3c0 integer> initial <integer_type 0x4000b3c0 
integer>
            (reg/v:SI 95 [ P28s ]) arg-type <integer_type 0x4000b3c0 integer> 
arg-type-as-written <integer_type 0x4000b3c0 integer>
            incoming-rtl (reg:SI 25 %r25 [ P28s ])>>>
$4 = void


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=17794