mirror of
https://github.com/autc04/Retro68.git
synced 2024-06-28 11:30:19 +00:00
13 lines
248 B
Ada
13 lines
248 B
Ada
with Varsize3_Pkg2;
|
|
with Varsize3_Pkg3;
|
|
|
|
package Varsize3_Pkg1 is
|
|
|
|
type Arr is array (Positive range 1 .. Varsize3_Pkg2.Last_Index) of Boolean;
|
|
|
|
package My_G is new Varsize3_Pkg3 (Arr);
|
|
|
|
type Object is new My_G.Object;
|
|
|
|
end Varsize3_Pkg1;
|