From a6b13d324fa2d83538e2c733906ced7b000209ac Mon Sep 17 00:00:00 2001 From: Arnaud Charlet Date: Thu, 12 Dec 2019 14:01:03 +0100 Subject: [Ada] Address potentially uninitialized variables and dead code 2020-06-02 Arnaud Charlet gcc/ada/ * bcheck.adb, binde.adb, bindo-diagnostics.adb, checks.adb, exp_aggr.adb, exp_ch3.adb, exp_ch4.adb, exp_ch7.adb, exp_ch9.adb, gnatname.adb, sem_case.adb, sem_ch13.adb, sem_ch5.adb, sem_prag.adb, sem_util.adb, uintp.adb, urealp.adb, xoscons.adb, xr_tabls.adb, xref_lib.adb: Initialize objects more explicitly and add corresponding assertions. Remove dead code. Also add a few Annotate pragmas to help static analysis. * libgnat/a-caldel.adb, libgnat/a-calend.adb, libgnat/a-ngcoty.adb, libgnat/a-ngelfu.adb, libgnat/a-ngrear.adb, libgnat/a-strfix.adb, libgnat/g-calend.adb, libgnat/g-catiio.adb, libgnat/g-comlin.adb, libgnat/g-debpoo.adb, libgnat/g-dirope.adb, libgnat/g-hesorg.adb, libgnat/g-pehage.adb, libgnat/g-socket.adb, libgnat/i-cobol.adb, libgnat/s-dwalin.adb, libgnat/s-dwalin.ads, libgnat/s-fatgen.adb, libgnat/s-gearop.adb, libgnat/s-genbig.adb, libgnat/s-imgrea.adb, libgnat/s-os_lib.adb, libgnat/s-rannum.adb, libgnat/s-regpat.adb, libgnat/s-trasym__dwarf.adb, libgnat/s-valrea.adb: Ditto. --- gcc/ada/uintp.adb | 1 + 1 file changed, 1 insertion(+) (limited to 'gcc/ada/uintp.adb') diff --git a/gcc/ada/uintp.adb b/gcc/ada/uintp.adb index 61e9f3d..bfdcb29 100644 --- a/gcc/ada/uintp.adb +++ b/gcc/ada/uintp.adb @@ -1294,6 +1294,7 @@ package body Uintp is Discard_Int : Int; pragma Warnings (Off, Discard_Int); begin + pragma Assert (D /= Int'(0)); UI_Div_Vector (Dividend (Dividend'Last - R_Length + 1 .. Dividend'Last), D, -- cgit v1.1