blob: 34126882a5927933ae3d9c5ede0898afae7d630d [file] [log] [blame]
generic
type Component is private;
package G_Tables is
type Table (<>) is limited private;
function Create (L : Natural) return Table;
private
type Table is array (Positive range <>) of Component;
end G_Tables;