aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPiotr Trojanek <trojanek@adacore.com>2023-03-07 09:02:23 +0100
committerMarc Poulhiès <poulhies@adacore.com>2023-05-25 09:44:17 +0200
commit8f7eeaa80e58af3885107d67679b2f8ca8dcb2f8 (patch)
treee4a0f808269d71427dd895f486a5763206bbe7c7
parent3da0e4ae25f15949f87e74aa96a03b47e51a9ff3 (diff)
downloadgcc-8f7eeaa80e58af3885107d67679b2f8ca8dcb2f8.zip
gcc-8f7eeaa80e58af3885107d67679b2f8ca8dcb2f8.tar.gz
gcc-8f7eeaa80e58af3885107d67679b2f8ca8dcb2f8.tar.bz2
ada: Remove unused initial value of a local variable
Cleanup related to improved handling of expression functions in GNATprove; semantics is unaffected. gcc/ada/ * sem_ch6.adb (Analyze_Return_Type): Remove unused initial value.
-rw-r--r--gcc/ada/sem_ch6.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/sem_ch6.adb b/gcc/ada/sem_ch6.adb
index 135d8ab..7c90747 100644
--- a/gcc/ada/sem_ch6.adb
+++ b/gcc/ada/sem_ch6.adb
@@ -2046,7 +2046,7 @@ package body Sem_Ch6 is
procedure Analyze_Return_Type (N : Node_Id) is
Designator : constant Entity_Id := Defining_Entity (N);
- Typ : Entity_Id := Empty;
+ Typ : Entity_Id;
begin
-- Normal case where result definition does not indicate an error