diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2018-05-28 08:56:08 +0000 |
|---|---|---|
| committer | Pierre-Marie de Rodat <pmderodat@gcc.gnu.org> | 2018-05-28 08:56:08 +0000 |
| commit | 72da915b16e6fcd36ae59b99faa4070f97ae59d9 (patch) | |
| tree | 1e40aeec5337b0badc559e183ea199a1a9f3b8b0 /gcc/ada/gcc-interface/decl.c | |
| parent | 184a6ba6e0ca03795058e2ab1f3c29d96601c560 (diff) | |
| download | gcc-72da915b16e6fcd36ae59b99faa4070f97ae59d9.zip gcc-72da915b16e6fcd36ae59b99faa4070f97ae59d9.tar.gz gcc-72da915b16e6fcd36ae59b99faa4070f97ae59d9.tar.bz2 | |
[Ada] Minor cleanup in repinfo unit
This removes the Truth_Andif_Expr and Truth_Orif_Expr codes for expressions
handled by the repinfo unit, since they are redundant with Truth_And_Expr
and Truth_Or_Expr respectively in this context. No functional changes.
2018-05-28 Eric Botcazou <ebotcazou@adacore.com>
gcc/ada/
* repinfo.ads (TCode): Adjust range.
(Truth_Andif_Expr): Remove.
(Truth_Orif_Expr): Likewise.
(Truth_And_Expr .. Dynamic_Val): Adjust value.
* repinfo.adb (Print_Expr): Remove handling of Truth_{And,Or}if_Expr.
(Rep_Value): Likewise.
* repinfo.h (Truth_Andif_Expr): Remove.
(Truth_Orif_Expr): Likewise.
(Truth_And_Expr .. Dynamic_Val): Adjust value.
* gcc-interface/decl.c (annotate_value) <TRUTH_ANDIF_EXPR>: Fall
through to TRUTH_AND_EXPR case.
<TRUTH_ORIF_EXPR>: Fall through to TRUTH_OR_EXPR case.
From-SVN: r260842
Diffstat (limited to 'gcc/ada/gcc-interface/decl.c')
| -rw-r--r-- | gcc/ada/gcc-interface/decl.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/gcc-interface/decl.c b/gcc/ada/gcc-interface/decl.c index 738211f..2fa9582 100644 --- a/gcc/ada/gcc-interface/decl.c +++ b/gcc/ada/gcc-interface/decl.c @@ -8132,9 +8132,9 @@ annotate_value (tree gnu_size) case MIN_EXPR: tcode = Min_Expr; break; case MAX_EXPR: tcode = Max_Expr; break; case ABS_EXPR: tcode = Abs_Expr; break; - case TRUTH_ANDIF_EXPR: tcode = Truth_Andif_Expr; break; - case TRUTH_ORIF_EXPR: tcode = Truth_Orif_Expr; break; + case TRUTH_ANDIF_EXPR: case TRUTH_AND_EXPR: tcode = Truth_And_Expr; break; + case TRUTH_ORIF_EXPR: case TRUTH_OR_EXPR: tcode = Truth_Or_Expr; break; case TRUTH_XOR_EXPR: tcode = Truth_Xor_Expr; break; case TRUTH_NOT_EXPR: tcode = Truth_Not_Expr; break; |