From 6068795883e8aacc8b0157e19610d34c0ab11ffa Mon Sep 17 00:00:00 2001 From: Piotr Trojanek Date: Tue, 19 Jan 2021 11:59:57 +0100 Subject: [PATCH] [Ada] Remove unused initial value in Read_Library_Info_From_Full gcc/ada/ * osint.adb (Read_Library_Info_From_Full): Cleanup unused initial value. --- gcc/ada/osint.adb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/gcc/ada/osint.adb b/gcc/ada/osint.adb index 85b631f..d47eaa5 100644 --- a/gcc/ada/osint.adb +++ b/gcc/ada/osint.adb @@ -2564,7 +2564,7 @@ package body Osint is -- Read data from the file declare - Actual_Len : Integer := 0; + Actual_Len : Integer; Lo : constant Text_Ptr := 0; -- Low bound for allocated text buffer -- 2.7.4