https://gcc.gnu.org/bugzilla/show_bug.cgi?id=97541
Bug ID: 97541
Summary: Ada failed to bootstrap: Error: file table slot 1 is
already occupied by a different file
Product: gcc
Version: 11.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: ada
Assignee: unassigned at gcc dot gnu.org
Reporter: hjl.tools at gmail dot com
Target Milestone: ---
Target: i386,x86-64
With --gdwarf-4 assembler on Linux/x86-64, I got
$ /export/users/hjl/build/gnu/tools-build/gcc/build-x86_64-linux/./gcc/xgcc
-B/export/users/hjl/build/gnu/tools-build/gcc/build-x86_64-linux/./gcc/
-B/usr/gcc-11.0.0-x86-64/x86_64-pc-linux-gnu/bin/
-B/usr/gcc-11.0.0-x86-64/x86_64-pc-linux-gnu/lib/ -isystem
/usr/gcc-11.0.0-x86-64/x86_64-pc-linux-gnu/include -isystem
/usr/gcc-11.0.0-x86-64/x86_64-pc-linux-gnu/sys-include -fchecking=1 -c -g -O2
-m32 -W -Wall -gnatpg -nostdinc -m32 a-stzunb.adb -c
/tmp/cc6QPugj.s: Assembler messages:
/tmp/cc6QPugj.s:42: Error: file table slot 1 is already occupied by a different
file (/tmp/cc6QPugj.s vs a-stzunb.adb)
Ada generates:
.file "a-stzunb.adb"
.text
.Ltext0:
.align 2
.p2align 4
.globl ada__strings__wide_wide_unbounded___size__2
.type ada__strings__wide_wide_unbounded___size__2, @function
ada__strings__wide_wide_unbounded___size__2:
.LFB5:
.cfi_startproc
movl $64, %eax
xorl %edx, %edx
ret
.cfi_endproc
.LFE5:
.size ada__strings__wide_wide_unbounded___size__2,
.-ada__strings__wid
e_wide_unbounded___size__2
.align 2
.p2align 4
.globl
ada__strings__wide_wide_unbounded__unbounded_wide_wide_stringDA_
_2
.type
ada__strings__wide_wide_unbounded__unbounded_wide_wide_stringDA_
_2, @function
ada__strings__wide_wide_unbounded__unbounded_wide_wide_stringDA__2:
.LFB12:
.cfi_startproc
movl 4(%esp), %eax
movl 4(%eax), %eax
#APP
# 82 "s-atocou.adb" 1 <<<<<<<< File 1
lock incl 4(%eax)
# 0 "" 2
#NO_APP
ret
.cfi_endproc
.LFE12:
.size
ada__strings__wide_wide_unbounded__unbounded_wide_wide_stringDA_
_2, .-ada__strings__wide_wide_unbounded__unbounded_wide_wide_stringDA__2
.align 2
.p2align 4
.globl ada__strings__wide_wide_unbounded__adjust__2
.type ada__strings__wide_wide_unbounded__adjust__2, @function
ada__strings__wide_wide_unbounded__adjust__2:
.LVL0:
.LFB47:
.file 1 "a-stzunb.adb" <<<< File 1 again
.loc 1 478 4 view -0
.cfi_startproc
.LBB706:
.LBB707:
.LBB708:
.file 2 "s-atocou.adb"
