Re: Question Exception with Ada.Containers.Generic_Constrained_Array_Sort

[awdorrin <awdorrin@gmail.com>]

I managed to find a way to get this to work, but I am really not sure I'm doing this the right way. :)

First, I changed from using Generic_Constrained_Array_Sort to the unconstrained version.

Second, I changed my declarations like this:

type Device_Array_Type is array( Device_Index_Type range <> ) of Device_Object_Type; // make this unconstrained

type DeviceListType is record
  Num_Devices : Device_Index_Type;
  DeviceList  : Device_Array_Type(Device_Index_Type); // limit range 1..128
end record;

Code appears to do what I want it to, but I'm really not sure this is the right solution.