1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
{ %FAIL } program tgenconstraint5; {$ifdef fpc} {$mode delphi} {$endif} uses ugenconstraints; type TTest1TClass = TTest1<TClass>; begin end.