E2553 クラス型制約を何度も指定することはできません（Delphi）

エラーと警告のメッセージ（Delphi）：インデックス への移動

これが発生するのは、ジェネリック型に対する型制約を何度も指定しようとした場合です。

 program E2553;
 
 {$APPTYPE CONSOLE}
 
 uses
   SysUtils;
 
 type
   TBaseClass = class
   end;
 
   TNewClass = class(TBaseClass)
   end;
 
   TTestClass<TC: TBaseClass, TNewClass> = class //E2553
 
   end;
 begin