3 type Vector is array (Natural range <>) of Natural;
4 type Vector_Access is access Vector;
6 type Data_Line is record
7 Length : Vector (1 .. 1);
11 type Data_Block is array (1 .. 5) of Data_Line;
12 type Data_Block_Access is access Data_Block;
14 type Vector_Ptr is access Vector;
16 type Meta_Data is record
17 Vector_View : Vector_Ptr;
18 Block_View : Data_Block_Access;