aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPiotr Trojanek <trojanek@adacore.com>2020-07-02 14:04:07 +0200
committerPierre-Marie de Rodat <derodat@adacore.com>2020-10-19 05:53:34 -0400
commit00bccdf048803a264b4707ac0d23f0bfa0c1edaf (patch)
tree04ae30cbb838f1cc5c7cb5ee65a1c6347b6c521f
parent5b80069c7e65a3ed60ee16deac4a450a9c32efa6 (diff)
downloadgcc-00bccdf048803a264b4707ac0d23f0bfa0c1edaf.zip
gcc-00bccdf048803a264b4707ac0d23f0bfa0c1edaf.tar.gz
gcc-00bccdf048803a264b4707ac0d23f0bfa0c1edaf.tar.bz2
[Ada] Simplify repeated calls with membership test
gcc/ada/ * inline.adb (Expand_Inlined_Call): Simplify repeated calls to Nkind.
-rw-r--r--gcc/ada/inline.adb4
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/inline.adb b/gcc/ada/inline.adb
index 7293cf2..f1c94cd 100644
--- a/gcc/ada/inline.adb
+++ b/gcc/ada/inline.adb
@@ -3728,8 +3728,8 @@ package body Inline is
return;
end if;
- if Nkind (Orig_Bod) = N_Defining_Identifier
- or else Nkind (Orig_Bod) = N_Defining_Operator_Symbol
+ if Nkind (Orig_Bod) in N_Defining_Identifier
+ | N_Defining_Operator_Symbol
then
-- Subprogram is renaming_as_body. Calls occurring after the renaming
-- can be replaced with calls to the renamed entity directly, because