소스 검색

* 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;