From 866bd03532013b163ec55d0814c4bf562b9c5cac Mon Sep 17 00:00:00 2001
From: Jedidiah Barber <contact@jedbarber.id.au>
Date: Thu, 8 May 2025 16:54:26 +1200
Subject: Constants marked constant, redundant with clauses removed

---
 example/info_list.adb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'example/info_list.adb')

diff --git a/example/info_list.adb b/example/info_list.adb
index 5dcdcf0..0605f96 100644
--- a/example/info_list.adb
+++ b/example/info_list.adb
@@ -30,7 +30,7 @@ procedure Info_List is
         return String
     renames Ada.Strings.Fixed."*";
 
-    My_Information : Libao.Info_Array := Libao.Driver_Info_List;
+    My_Information : constant Libao.Info_Array := Libao.Driver_Info_List;
 
 begin
 
-- 
cgit