Forráskód Böngészése

* 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 éve
szülő
commit
cc4169ef68
1 módosított fájl, 1 hozzáadás és 1 törlés
  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