2018-03-15 Steven G. Kargl <kargl@gcc.gnu.org>
[official-gcc.git] / gcc / testsuite / gnat.dg / discr36_pkg.adb
blob82f6f621ac65e537453bd22a3b011aaf5064d6cc
1 package body Discr36_Pkg is
3 function Func return T is
4 Ret : T;
5 pragma Warnings (Off, Ret);
6 begin
7 return Ret;
8 end;
10 end Discr36_Pkg;