[Bug ada/70759] Ada rts fails to build with -mabi=ilp32

[schwab@linux-m68k.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=70759

--- Comment #1 from Andreas Schwab <schwab@linux-m68k.org> ---
Look like Pmode vs. ptr_mode mixup, probably due to internal_reference_types.

 <var_decl 0x3ffb7fa0bd0 ada__assertions__assertion_error
    type <reference_type 0x3ffb5bcd350
        type <record_type 0x3ffb5a548d8 exception sizes-gimplified asm_written
v
isited BLK
            size <integer_cst 0x3ffb5a116c8 constant visited 192>
            unit size <integer_cst 0x3ffb5a11698 constant visited 24>
            align 32 symtab -1246558336 alias set 10 canonical type
0x3ffb5a548d
8 fields <field_decl 0x3ffb5b00688 not_handled_by_others> context
<translation_u
nit_decl 0x3ffb5b20000 D.27> Ada size <integer_cst 0x3ffb5a116c8 192>
            pointer_to_this <pointer_type 0x3ffb5a55c88
ada__assertions__assert_
_T3b> reference_to_this <reference_type 0x3ffb5bcd2a8> chain <type_decl
0x3ffb5b
00f70 exception>>
        readonly unsigned SI
        size <integer_cst 0x3ffb5a10a68 constant 64>
        unit size <integer_cst 0x3ffb5a10a80 constant 8>
        align 32 symtab -1246557456 alias set -1 canonical type 0x3ffb5bcd350>
    readonly constant asm_written public static visited unsigned decl_1 SI file
a-assert.ads line 55 col 4 size <integer_cst 0x3ffb5a10a68 64> unit size
<integer_cst 0x3ffb5a10a80 8>
    align 32 context <translation_unit_decl 0x3ffb5b20000 D.27> initial
<nop_expr 0x3ffb5c0e880>
    renamed object <var_decl 0x3ffb7fa0b40 system__assertions__assert_failure
type <record_type 0x3ffb5a548d8 exception>
        addressable used public external BLK file s-assert.ads line 43 col 4
size <integer_cst 0x3ffb5a116c8 192> unit size <integer_cst 0x3ffb5a11698 24>
        align 32 context <translation_unit_decl 0x3ffb5b20000 D.27>
        (mem/c:BLK (symbol_ref:DI ("system__assertions__assert_failure") [flags
0xc0] <var_decl 0x3ffb7fa0b40 system__assertions__assert_failure>) [10
system__assertions__assert_failure+0 S24 A32])>
    (mem/u/f/c:SI (symbol_ref:DI ("ada__assertions__assertion_error") [flags
0x80] <var_decl 0x3ffb7fa0bd0 ada__assertions__assertion_error>) [11
ada__assertions__assertion_error+0 S8 A32])>