Browse Source

* 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 12 years ago
parent
commit
da6d9cf3f3
1 changed files with 4 additions and 0 deletions
  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;