fcl-passrc: generic function: inline specialize test

git-svn-id: trunk@46687 -

packages/fcl-passrc/tests/tcresolvegenerics.pas

@@ -2444,8 +2444,10 @@ begin
   'var',
   '  Ant: TAnt;',
   '  Bird: TBird<TObject>;',
+  '  BirdOfBird: TBird<TBird<TObject>>;',
   'begin',
   '  Ant.Func<TObject>(Bird);',
+  '  Ant.Func<TBird<TObject>>(BirdOfBird);',
   '']);
   ParseProgram;
 end;