gcc-4.9/gcc/testsuite/gnat.dg/specs/varsize_return_pkg2.adb


1
2
3
4
5
6
7

package body Varsize_Return_Pkg2 is
  function Get (X : T) return Data_T is
    Result : Data_T;
  begin
    return Result;
  end;
end Varsize_Return_Pkg2;