* the symbol of the interface wrapper function needs to be considered as referenced as well

git-svn-id: trunk@43545 -

compiler/nobj.pas

@@ -548,6 +548,7 @@ implementation
                           MessagePos2(implprocdef.fileinfo,type_w_interface_lower_visibility,proc.fullprocname(false),implprocdef.fullprocname(false));
 {$endif}
                         result:=implprocdef;
+                        addsymref(result.procsym,result);
                         exit;
                       end;
                   end;