Browse Source

pkgutil.pas, createimportlibfromexternals:
* findpackagewithsym: ignore other (weak) external symbols

git-svn-id: branches/svenbarth/packages@32582 -

svenbarth 9 years ago
parent
commit
291ca3ddb3
1 changed files with 6 additions and 0 deletions
  1. 6 0
      compiler/pkgutil.pas

+ 6 - 0
compiler/pkgutil.pas

@@ -578,6 +578,12 @@ implementation
                   result.sym:=tasmsymbol(tmodule(unitentry^.module).globalasmsyms.find(symname));
                   if assigned(result.sym) then
                     begin
+                      { completely ignore other external symbols }
+                      if result.sym.bind in [ab_external,ab_weak_external] then
+                        begin
+                          result.sym:=nil;
+                          continue;
+                        end;
                       { only accept global symbols of the used unit }
                       if result.sym.bind<>ab_global then
                         begin