diff options
Diffstat (limited to 'example')
| -rw-r--r-- | example/format_options.adb | 2 | ||||
| -rw-r--r-- | example/info_list.adb | 2 |
2 files changed, 2 insertions, 2 deletions
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, 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 |