From 79c1381d198f5b4ae1b75210971a8ccea1049bad Mon Sep 17 00:00:00 2001
From: Jedidiah Barber <contact@jedbarber.id.au>
Date: Wed, 26 Jul 2023 16:43:15 +1200
Subject: File_Info now a tagged type for ease of use

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

(limited to 'example/read_example.adb')

diff --git a/example/read_example.adb b/example/read_example.adb
index 33b2d7a..719e7ec 100644
--- a/example/read_example.adb
+++ b/example/read_example.adb
@@ -52,7 +52,7 @@ begin
     TIO.New_Line;
 
     declare
-        Channel_Count : Natural := Libsndfile.Channels (My_Info);
+        Channel_Count : Natural := My_Info.Channels;
         Test_Frames   : Libsndfile.Count_Type := 5;
 
         My_Shorts   : Libsndfile.Short_Data   (1 .. Natural (Test_Frames) * Channel_Count);
-- 
cgit