* gcc-interface/utils.c (maybe_unconstrained_array): Declare TYPE local

[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gnat.dg / dispatch1_p.ads

package dispatch1_p is
   type I1 is interface;
   type DT_I1 is new I1 with null record;
end;