Переглянути джерело

* tai_const.getcopy: Check that 'sym' is assigned before trying to call its method. Mantis #24574.

git-svn-id: trunk@24836 -
sergei 12 роки тому
батько
коміт
b9bbe8ba67
1 змінених файлів з 2 додано та 1 видалено
  1. 2 1
      compiler/aasmtai.pas

+ 2 - 1
compiler/aasmtai.pas

@@ -1693,7 +1693,8 @@ implementation
       begin
         getcopy:=inherited getcopy;
         { we need to increase the reference number }
-        sym.increfs;
+        if assigned(sym) then
+          sym.increfs;
         if assigned(endsym) then
           endsym.increfs;
       end;