* gimplify.c (gimplify_decl_expr): For a TYPE_DECL, also gimplify the

[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gnat.dg / concat1_pkg.adb

package body Concat1_Pkg is

  function Ident (I : Integer) return Integer is begin return I; end;

end Concat1_Pkg;