Big change #1 for personality function references:
[llvm/avr.git] / test / FrontendAda / Support / element_copy.ads
blob52c6e49275efb6663814f0047cd6fc797ea8af99
1 package Element_Copy is
2 type SmallInt is range 1 .. 4;
3 type SmallStr is array (SmallInt range <>) of Character;
4 type VariableSizedField (D : SmallInt := 2) is record
5 S : SmallStr (1 .. D) := "Hi";
6 end record;
7 function F return VariableSizedField;
8 end;