This commit is contained in:
red-prig 2022-09-11 23:33:48 +03:00
parent 6605f98de4
commit 41a34ef55b
1 changed files with 6 additions and 2 deletions

View File

@ -1814,6 +1814,7 @@ const
Import:Boolean;
mss:Integer;
space_lib:TLIBRARY;
begin
Import:=(Info^.shndx=SHN_UNDEF);
@ -1844,13 +1845,16 @@ const
if (IInfo.lib=nil) then
begin
FWriteln('Unknow library from '+Info^.pName);
Exit;
space_lib:=Default(TLIBRARY);
space_lib.Import:=Import;
IInfo.lib:=@space_lib;
//Exit;
end;
if (IInfo.lib^.Import<>Import) and (mss=-1) then
begin
FWriteln('Wrong library ref:'+IInfo.lib^.strName+':'+BoolToStr(IInfo._md^.Import)+'<>'+BoolToStr(Import));
Exit;
//Exit;
end;
functName:=ps4libdoc.GetFunctName(IInfo.nid);