{ %FAIL } program tgeneric101; {$mode objfpc} uses ugeneric99; type TTest1 = specialize TTestClass.TTest<LongInt>; begin end.