public inbox for gcc-cvs@sourceware.org
help / color / mirror / Atom feed
* [gcc r14-2843] ada: Small refactor
@ 2023-07-28 7:30 Marc Poulhi?s
0 siblings, 0 replies; only message in thread
From: Marc Poulhi?s @ 2023-07-28 7:30 UTC (permalink / raw)
To: gcc-cvs
https://gcc.gnu.org/g:f30396a0e1887cc5d5bf712f4f45bc37c90a3c7c
commit r14-2843-gf30396a0e1887cc5d5bf712f4f45bc37c90a3c7c
Author: Viljar Indus <indus@adacore.com>
Date: Tue Jul 11 15:20:15 2023 +0300
ada: Small refactor
gcc/ada/
* exp_util.adb (Find_Optional_Prim_Op): use "No" instead of "= Empty"
Diff:
---
gcc/ada/exp_util.adb | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/gcc/ada/exp_util.adb b/gcc/ada/exp_util.adb
index 66e1acbf65e..9f843d6d71e 100644
--- a/gcc/ada/exp_util.adb
+++ b/gcc/ada/exp_util.adb
@@ -6291,8 +6291,9 @@ package body Exp_Util is
Typ := Underlying_Type (Typ);
- -- We cannot find the operation if there is no full view available.
- if Typ = Empty then
+ -- We cannot find the operation if there is no full view available
+
+ if No (Typ) then
return Empty;
end if;
^ permalink raw reply [flat|nested] only message in thread
only message in thread, other threads:[~2023-07-28 7:30 UTC | newest]
Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2023-07-28 7:30 [gcc r14-2843] ada: Small refactor Marc Poulhi?s
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).