Selaa lähdekoodia

* fix output position of deprecated hint for certain cases where it was wrong, resolves #40534

florian 1 vuosi sitten
vanhempi
commit
1f91fe4b11
1 muutettua tiedostoa jossa 1 lisäystä ja 1 poistoa
  1. 1 1
      compiler/pexpr.pas

+ 1 - 1
compiler/pexpr.pas

@@ -3510,7 +3510,7 @@ implementation
                      not (sp_generic_para in srsym.symoptions) and
                      not (sp_generic_para in srsym.symoptions) and
                      (token in [_LT, _LSHARPBRACKET])
                      (token in [_LT, _LSHARPBRACKET])
                    ) then
                    ) then
-                 check_hints(srsym,srsym.symoptions,srsym.deprecatedmsg);
+                 check_hints(srsym,srsym.symoptions,srsym.deprecatedmsg,tokenpos);
 
 
                { if nothing found give error and return errorsym }
                { if nothing found give error and return errorsym }
                if not assigned(srsym) or
                if not assigned(srsym) or