Corrected date in changelog
[official-gcc.git] / gcc / testsuite / gnat.dg / discr11.adb
blobceec4cefb477511762c5ac23219bc5e180fb03c9
1 -- { dg-do compile }
3 package body Discr11 is
4 function Create return DT_2 is
5 begin
6 return DT_2'(DT_1'(Create) with More => 1234);
7 end;
8 end Discr11;