Procházet zdrojové kódy

* give an internalerror when we try to change the type of an asmsymbol from
anything but none (= undefined) to local

git-svn-id: trunk@25266 -

Jonas Maebe před 12 roky
rodič
revize
da6d9cf3f3
1 změnil soubory, kde provedl 4 přidání a 0 odebrání
  1. 4 0
      compiler/aasmtai.pas

+ 4 - 0
compiler/aasmtai.pas

@@ -1288,6 +1288,10 @@ implementation
          typ:=ait_symbol;
          sym:=_sym;
          size:=siz;
+         { don't redefine global/external symbols as local, as code to access
+           such symbols is different on some platforms }
+         if not(sym.bind in [AB_NONE,AB_LOCAL]) then
+           internalerror(2013081601);
          sym.bind:=AB_LOCAL;
          is_global:=false;
       end;