From 866bd03532013b163ec55d0814c4bf562b9c5cac Mon Sep 17 00:00:00 2001 From: Jedidiah Barber Date: Thu, 8 May 2025 16:54:26 +1200 Subject: Constants marked constant, redundant with clauses removed --- example/format_options.adb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'example/format_options.adb') diff --git a/example/format_options.adb b/example/format_options.adb index 352d3d5..fe8c380 100644 --- a/example/format_options.adb +++ b/example/format_options.adb @@ -20,7 +20,7 @@ procedure Format_Options is My_Options : Libao.Option_List; - My_Format : Libao.Sample_Format := Libao.Create + My_Format : constant Libao.Sample_Format := Libao.Create (Bits => 16, Rate => 44100, Channels => 4, -- cgit