* utils.c (finish_record_type): Clear DECL_BIT_FIELD on sufficiently

[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gnat.dg / invariant_index.ads

package Invariant_Index is

   Name_Buffer : String (1 .. 100);
   Name_Len : Natural;

   procedure Proc (S : String);

end Invariant_Index;