Explorar o código

- disallow calling tai_symbol_end.Createname with a symbol name that isn't yet defined

git-svn-id: trunk@25210 -
nickysn %!s(int64=12) %!d(string=hai) anos
pai
achega
db541b59fa
Modificáronse 1 ficheiros con 3 adicións e 1 borrados
  1. 3 1
      compiler/aasmtai.pas

+ 3 - 1
compiler/aasmtai.pas

@@ -1371,7 +1371,9 @@ implementation
       begin
          inherited Create;
          typ:=ait_symbol_end;
-         sym:=current_asmdata.RefAsmSymbol(_name);
+         sym:=current_asmdata.GetAsmSymbol(_name);
+         if not assigned(sym) then
+           internalerror(2013080301);
       end;