decl.c (elaborate_expression_1): Try harder to find out whether the expression is...

[platform/upstream/gcc.git] / gcc / testsuite / gnat.dg / itype.ads

package itype is
   generic
      type T is private;
   function G return not null access constant T;
end itype;