From f30396a0e1887cc5d5bf712f4f45bc37c90a3c7c Mon Sep 17 00:00:00 2001
From: Viljar Indus <indus@adacore.com>
Date: Tue, 11 Jul 2023 15:20:15 +0300
Subject: [PATCH] ada: Small refactor
gcc/ada/
* exp_util.adb (Find_Optional_Prim_Op): use "No" instead of "= Empty"
---
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 66e1acbf65ee..9f843d6d71e1 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;
--
GitLab