generic_dispatch_p.adb « gnat.dg « testsuite « gcc - cbb-gcc-4.6.4 - compiler building blocks: cbb-gcc-4.6.4: including full support for the midipix targets

summary refs log tree commit diff

path: root/gcc/testsuite/gnat.dg/generic_dispatch_p.adb

blob: 7a4bbbd8a2b110a381c08a15d72f7371058785d7 (plain)

package body generic_dispatch_p is
   function Constructor (I : not null access Integer) return DT is
      R : DT; 
  begin
      return R;
   end Constructor;
end;