Land the long talked about "type system rewrite" patch. This
[llvm/stm8.git] / test / FrontendAda / debug_var_size.ads
blobe8863cbddf94d73e049a4da5fbcbcb96be61f0e6
1 -- RUN: %llvmgcc -S -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;