paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-22 05:29:26 +02:00
Code Issues Packages Projects Releases Wiki Activity

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

Browse Source
This commit is contained in:
florian 2023-12-03 11:33:58 +01:00
parent 60473c7ead
commit 1f91fe4b11
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/pexpr.pas
View File

@ -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