equal11_interface.ads\gnat.dg\testsuite\gcc - delta/gcc.git - gcc.gnu.org: git/gcc.git

index : delta/gcc.git

gcc.gnu.org: git/gcc.git

summary refs log tree commit diff

path: root/gcc/testsuite/gnat.dg/equal11_interface.ads

blob: abc44159e814d273fef238043e80804e2f397dec (plain)

package Equal11_Interface is

  type My_Interface_Type is interface;

  procedure Put (R : in My_Interface_Type) is abstract;

end Equal11_Interface;