瀏覽代碼

* check if labsym is assigned before testing if it's used globally

git-svn-id: trunk@15754 -
florian 15 年之前
父節點
當前提交
9365eb48c0
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      compiler/nflw.pas

+ 1 - 1
compiler/nflw.pas

@@ -1830,7 +1830,7 @@ implementation
 
 
         include(current_procinfo.flags,pi_has_label);
         include(current_procinfo.flags,pi_has_label);
 
 
-        if labsym.nonlocal then
+        if assigned(labsym) and labsym.nonlocal then        
           include(current_procinfo.flags,pi_has_interproclabel);
           include(current_procinfo.flags,pi_has_interproclabel);
 
 
         if assigned(left) then
         if assigned(left) then