Przeglądaj źródła

Avoid possible warning about uninitialized srsym variable

git-svn-id: trunk@42857 -
pierre 6 lat temu
rodzic
commit
d29a6de437
1 zmienionych plików z 2 dodań i 2 usunięć
  1. 2 2
      compiler/symtable.pas

+ 2 - 2
compiler/symtable.pas

@@ -4304,6 +4304,8 @@ implementation
         hashedid.id:=class_helper_prefix+s;
         stackitem:=symtablestack.stack;
         result:=false;
+        srsym:=nil;
+        srsymtable:=nil;
         founddefowner:=nil;
         while assigned(stackitem) do
           begin
@@ -4363,8 +4365,6 @@ implementation
             addsymref(srsym);
             exit;
           end;
-        srsym:=nil;
-        srsymtable:=nil;
       end;