fcl-passrc: implicit function specialization: compare generic template index not name

git-svn-id: https://svn.freepascal.org/svn/fpc/trunk@43161 3ad0048d-3df7-0310-abae-a5850022a9f2

1 files changed, 4 insertions, 4 deletions

diff --git a/packages/fcl-passrc/tests/tcresolvegenerics.pas b/packages/fcl-passrc/tests/tcresolvegenerics.pas
index 7157b081a4..499e1bca6d 100644
--- a/packages/fcl-passrc/tests/tcresolvegenerics.pas
+++ b/packages/fcl-passrc/tests/tcresolvegenerics.pas
@@ -1964,8 +1964,8 @@ begin
   'end;',
   'begin',
   '']);
-  CheckResolverException('Forward function not resolved "Fly"',
-    nForwardProcNotResolved);
+  CheckResolverException('Declaration of "Fly<B>" differs from previous declaration at afile.pp(2,23)',
+    nDeclOfXDiffersFromPrevAtY);
 end;
 
 procedure TTestResolveGenerics.TestGenProc_ForwardOverload;
@@ -2270,8 +2270,8 @@ begin
   'end;',
   'begin',
   '']);
-  CheckResolverException('identifier not found "TObject.Run<S>"',
-    nIdentifierNotFound);
+  CheckResolverException('Declaration of "TObject.Run<S>" differs from previous declaration at afile.pp(4,28)',
+    nDeclOfXDiffersFromPrevAtY);
 end;
 
 procedure TTestResolveGenerics.TestGenMethod_ImplConstraintFail;