diff options
author | Robert Dewar <dewar@adacore.com> | 2007-10-15 15:53:48 +0200 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2007-10-15 15:53:48 +0200 |
commit | 67ce0d7e96fd6802815643dbfb8505fad5318e95 (patch) | |
tree | a52f2a80bd9bc0b3d34328c89d877fdc3113b84f /gcc/ada/osint.adb | |
parent | f3bc37238b942ce0e901d3bdc6c93a5b776a9a2b (diff) | |
download | gcc-67ce0d7e96fd6802815643dbfb8505fad5318e95.tar.gz |
s-taprop-solaris.adb, [...]: Minor reformatting.
2007-10-15 Robert Dewar <dewar@adacore.com>
* s-taprop-solaris.adb, s-taprop-vms.adb, s-taprop-mingw.adb,
s-taprop-vxworks.adb, s-taprop-posix.adb, a-calend-vms.adb,
a-calend.adb, a-nuflra.adb, a-tigeau.adb, a-wtgeau.adb,
checks.adb, bindgen.adb, eval_fat.adb, exp_fixd.adb, fmap.adb,
freeze.adb, g-awk.adb, g-calend.adb, g-diopit.adb, g-expect.adb,
gnatchop.adb, gnatlink.adb, g-spipat.adb, g-thread.adb, make.adb,
mdll.adb, mlib.adb, mlib-prj.adb, osint.adb, par-ch3.adb, prj.adb,
prj-makr.adb, sem_prag.adb, sem_type.adb, s-fatgen.adb, s-fileio.adb,
sinfo.ads, sinput-d.adb, s-taasde.adb, s-tasdeb.ads, s-tasren.adb,
s-tassta.adb, s-tpobop.adb, s-tposen.adb, stylesw.adb, types.ads,
uintp.adb, validsw.adb, makegpr.adb, a-rbtgso.adb, a-crbtgo.adb,
a-coorse.adb, a-convec.adb, a-coinve.adb, a-cohama.adb, a-ciorse.adb,
a-cihama.adb, a-cidlli.adb, a-chtgop.adb, a-cdlili.adb, a-cdlili.adb,
a-coormu.adb, a-ciormu.adb, a-cihase.adb, a-cohase.adb, a-ciorma.adb,
a-coorma.adb, a-ztgeau.adb, symbols-vms.adb, a-crdlli.adb,
a-calari.adb, a-calfor.adb, s-os_lib.adb, s-regpat.adb, a-ngrear.adb:
Minor reformatting.
Add Unreferenced and Warnings (Off) pragmas for cases of
variables modified calls where they are IN OUT or OUT parameters and
the resulting values are not subsequently referenced. In a few cases,
we also remove redundant code found by the new warnings.
* ug_words, vms_data.ads, usage.adb, sem_util.adb, sem_util.ads,
sem_warn.adb, sem_warn.ads, sem_res.adb, sem_ch7.adb, sem_ch8.adb,
sem_ch5.adb, opt.ads, lib-xref.adb, lib-xref.ads, exp_smem.adb,
sem_ch11.adb, exp_ch6.adb, einfo.ads, einfo.adb: implement a new
warning controlled by -gnatw.o that warns on cases of out parameter
values being ignored.
From-SVN: r129318
Diffstat (limited to 'gcc/ada/osint.adb')
-rw-r--r-- | gcc/ada/osint.adb | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/gcc/ada/osint.adb b/gcc/ada/osint.adb index ca42b44a918..eb9d23c207e 100644 --- a/gcc/ada/osint.adb +++ b/gcc/ada/osint.adb @@ -295,6 +295,7 @@ package body Osint is Ch : Character; Status : Boolean; + pragma Warnings (Off, Status); -- For the call to Close begin @@ -2042,6 +2043,7 @@ package body Osint is -- Allocated text buffer Status : Boolean; + pragma Warnings (Off, Status); -- For the calls to Close begin @@ -2174,6 +2176,7 @@ package body Osint is Actual_Len : Integer; Status : Boolean; + pragma Warnings (Off, Status); -- For the call to Close begin @@ -2811,6 +2814,7 @@ package body Osint is procedure Write_With_Check (A : Address; N : Integer) is Ignore : Boolean; + pragma Warnings (Off, Ignore); begin if N = Write (Output_FD, A, N) then |