浏览代码

* don't raise an internalerror when the the binding type of a weak external
symbol is changed to something else (binding a weak symbol to a real
implementation in the current file is valid)

git-svn-id: trunk@20834 -

Jonas Maebe 13 年之前
父节点
当前提交
cc4169ef68
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      compiler/aasmdata.pas

+ 1 - 1
compiler/aasmdata.pas

@@ -404,7 +404,7 @@ implementation
          begin
            { Redefine is allowed, but the types must be the same. The redefine
              is needed for Darwin where the labels are first allocated }
-           if (hp.bind<>AB_EXTERNAL) then
+           if not(hp.bind in [AB_EXTERNAL,AB_WEAK_EXTERNAL]) then
              begin
                if (hp.bind<>_bind) and
                   (hp.typ<>_typ) then