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