diff --git a/compiler/symdef.pas b/compiler/symdef.pas index 477e8d516f..72b321972e 100644 --- a/compiler/symdef.pas +++ b/compiler/symdef.pas @@ -4434,7 +4434,7 @@ implementation objdef:=self; while assigned(objdef) do begin - result:=find_procdef_bytype(potype_destructor); + result:=objdef.find_procdef_bytype(potype_destructor); if assigned(result) then exit; objdef:=objdef.childof;