test/FrontendAda/Support/var_offset.ads

   1 package Var_Offset is
   2    pragma Elaborate_Body;
   3    type T (L : Natural) is record
   4       Var_Len   : String (1 .. L);
   5       Space     : Integer;
   6       Small     : Character;
   7       Bad_Field : Character;
   8    end record;
   9 end;