瀏覽代碼

Fix a potential access violation when exporting symbols on a Unix based system.

expunix.pas, texportlibunix:
  * generatelib: check whether hp2.sym is really assigned before accessing it

git-svn-id: branches/svenbarth/packages@29037 -
svenbarth 10 年之前
父節點
當前提交
0d3f89bdac
共有 1 個文件被更改,包括 1 次插入0 次删除
  1. 1 0
      compiler/expunix.pas

+ 1 - 0
compiler/expunix.pas

@@ -142,6 +142,7 @@ begin
   while assigned(hp2) do
   while assigned(hp2) do
    begin
    begin
      if (not hp2.is_var) and
      if (not hp2.is_var) and
+        assigned(hp2.sym) and
         (hp2.sym.typ=procsym) then
         (hp2.sym.typ=procsym) then
       begin
       begin
         { the manglednames can already be the same when the procedure
         { the manglednames can already be the same when the procedure