llvm-6502/test/FrontendAda/Support/var_offset.ads

10 lines
222 B
Ada
Raw Normal View History

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;