pascalabcnet/TestSuite/units/u_interface3.pas

15 lines
288 B
ObjectPascal
Raw Permalink Normal View History

2017-05-25 11:37:16 +03:00
unit u_interface3;
type TClass<T> = class(IEnumerable<T>)
public function System.Collections.Generic.IEnumerable<T>.GetEnumerator: IEnumerator<T>;
begin
end;
public function System.Collections.IEnumerable.GetEnumerator: System.Collections.IEnumerator;
begin
end;
end;
begin
end.