fix PR4963: folding insertvalue would sometimes turn a packed struct into
[llvm/avr.git] / test / FrontendAda / debug_var_size.ads
blobea966fbae0fe878df4886374144ecc6572b368a5
1 -- RUN: %llvmgcc -c -g %s
2 package Debug_Var_Size is
3 subtype Length_Type is Positive range 1 .. 64;
4 type T (Length : Length_Type := 1) is record
5 Varying_Length : String (1 .. Length);
6 Fixed_Length : Boolean;
7 end record;
8 end;