Explorar el Código

* 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 hace 13 años
padre
commit
cc4169ef68
Se han modificado 1 ficheros con 1 adiciones y 1 borrados
  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