fcl-passrc: fixed hint of unimplemented

git-svn-id: trunk@37195 -

packages/fcl-passrc/src/pasresolveeval.pas

@@ -204,7 +204,7 @@ resourcestring
   sFoundCallCandidateX = 'Found call candidate %s';
   sSymbolXIsNotPortable = 'Symbol "%s" is not portable';
   sSymbolXIsExperimental = 'Symbol "%s" is experimental';
-  sSymbolXIsNotImplemented = 'Symbol "%s" is implemented';
+  sSymbolXIsNotImplemented = 'Symbol "%s" is not implemented';
   sSymbolXBelongsToALibrary = 'Symbol "%s" belongs to a library';
   sSymbolXIsDeprecated = 'Symbol "%s" is deprecated';
   sSymbolXIsDeprecatedY = 'Symbol "%s" is deprecated: %s';

packages/fcl-passrc/tests/tcresolver.pas

@@ -10053,7 +10053,7 @@ begin
   CheckResolverHint(mtWarning,nSymbolXBelongsToALibrary,'Symbol "TLibrary" belongs to a library');
   CheckResolverHint(mtWarning,nSymbolXIsNotPortable,'Symbol "TPlatform" is not portable');
   CheckResolverHint(mtWarning,nSymbolXIsExperimental,'Symbol "TExperimental" is experimental');
-  CheckResolverHint(mtWarning,nSymbolXIsNotImplemented,'Symbol "TUnimplemented" is implemented');
+  CheckResolverHint(mtWarning,nSymbolXIsNotImplemented,'Symbol "TUnimplemented" is not implemented');
   CheckResolverUnexpectedHints;
 end;