diff options
author | Arnaud Charlet <charlet@adacore.com> | 2019-12-19 05:31:47 -0500 |
---|---|---|
committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2020-06-02 04:58:29 -0400 |
commit | 65f1ca2e3d8778cd3e756ae3fe100313f43d081b (patch) | |
tree | ca908d991a601161ab9f618e78a165b2802c4ca5 /gcc/ada/expander.adb | |
parent | 646204de717040064c18c189e29a32d0d33fd08b (diff) | |
download | gcc-65f1ca2e3d8778cd3e756ae3fe100313f43d081b.zip gcc-65f1ca2e3d8778cd3e756ae3fe100313f43d081b.tar.gz gcc-65f1ca2e3d8778cd3e756ae3fe100313f43d081b.tar.bz2 |
[Ada] Remove ASIS_Mode
2020-06-02 Arnaud Charlet <charlet@adacore.com>
gcc/ada/
* atree.ads, checks.adb, contracts.adb, debug.adb, einfo.ads,
exp_ch3.adb, exp_util.adb, expander.ads, expander.adb,
frontend.adb, gnat1drv.adb, itypes.adb, lib.ads, namet.ads,
opt.adb, opt.ads, par-prag.adb, repinfo.ads, sem_aggr.adb,
sem_aux.ads, sem_case.ads, sem_ch10.adb, sem_ch12.adb,
sem_ch13.adb, sem_ch3.adb, sem_ch4.adb, sem_ch6.adb,
sem_dim.adb, sem_elab.adb, sem_prag.adb, sem_prag.ads,
sem_res.adb, sem_type.adb, sem_util.adb, sinfo.ads, stand.ads,
tree_io.ads: Remove references to ASIS_Mode.
Diffstat (limited to 'gcc/ada/expander.adb')
-rw-r--r-- | gcc/ada/expander.adb | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/gcc/ada/expander.adb b/gcc/ada/expander.adb index 31af335..b8e86b8 100644 --- a/gcc/ada/expander.adb +++ b/gcc/ada/expander.adb @@ -545,10 +545,10 @@ package body Expander is procedure Expander_Mode_Restore is begin - -- Not active (has no effect) in ASIS and GNATprove modes (see comments + -- Not active (has no effect) in GNATprove mode (see comments -- in spec of Expander_Mode_Save_And_Set). - if ASIS_Mode or GNATprove_Mode then + if GNATprove_Mode then return; end if; @@ -572,10 +572,10 @@ package body Expander is procedure Expander_Mode_Save_And_Set (Status : Boolean) is begin - -- Not active (has no effect) in ASIS and GNATprove modes (see comments + -- Not active (has no effect) in GNATprove modes (see comments -- in spec of Expander_Mode_Save_And_Set). - if ASIS_Mode or GNATprove_Mode then + if GNATprove_Mode then return; end if; |