https://gcc.gnu.org/bugzilla/show_bug.cgi?id=118939
Bug ID: 118939
Summary: ada: executable segfaults on arm-linux-gnueabi when
assigning an access to controlled type
Product: gcc
Version: 14.2.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: ada
Assignee: unassigned at gcc dot gnu.org
Reporter: nicolas at debian dot org
CC: dkm at gcc dot gnu.org
Target Milestone: ---
Hello.
On arm-linux-gnueabi, with gcc (Debian 14.2.0-17), the following instructions
result in a segmentation fault.
All goes well with gcc (Debian 13.3.0-12).
cat > p.ads <<EOF
with Ada.Finalization;
package P is
type T is new Ada.Finalization.Controlled with null record;
type T_Access is access all T;
end P;
EOF
cat > runner.adb <<EOF
with P;
procedure Runner is
S : constant P.T_Access := new P.T;
begin
null;
end Runner;
EOF
arm-linux-gnueabi-gnatmake-14 runner.adb -fstack-check -g -O1
./runner
