Codetools: Complete also a virtual/overridden method body with empty brackets. Issue #40799, patch by Domingo Galmés.

(cherry picked from commit d0c036aa81)
This commit is contained in:
Juha 2024-03-06 10:09:34 +02:00 committed by Maxim Ganetsky
parent d61851df1d
commit 258e8cb94e

View File

@ -8464,9 +8464,9 @@ begin
if InclProcCall then begin
ProcCode:=ExtractProcHead(ProcNode,[phpWithStart,phpAddClassname,
phpWithVarModifiers,phpWithParameterNames,
phpWithResultType,phpWithCallingSpecs]);
phpWithResultType,phpWithCallingSpecs,phpWithEmptyParamList]);
ProcCall:='inherited '+ExtractProcHead(ProcNode,[phpWithoutClassName,
phpWithParameterNames,phpWithoutParamTypes]);
phpWithParameterNames,phpWithoutParamTypes,phpWithEmptyParamList]);
for i:=1 to length(ProcCall)-1 do
if ProcCall[i]=';' then
ProcCall[i]:=',';