tb0250.pp 195 B

12345678910111213141516171819202122
  1. { %FAIL }
  2. program tb0250;
  3. {$mode delphi}
  4. type
  5. TTest<T> = class
  6. class var
  7. fTest: TClass;
  8. procedure Test;
  9. end;
  10. procedure TTest<T>.Test;
  11. begin
  12. fTest.ToString;
  13. end;
  14. begin
  15. end.