blob: 55d0eb21f7c4f0f61acfa04df80101cc217946d9 [file] [log] [blame]
package Var_Offset is
pragma Elaborate_Body;
type T (L : Natural) is record
Var_Len : String (1 .. L);
Space : Integer;
Small : Character;
Bad_Field : Character;
end record;
end;