Преглед на файлове

* 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