Przeglądaj źródła

* initialise processaddress for darwin

git-svn-id: trunk@2485 -
Jonas Maebe 19 lat temu
rodzic
commit
1e47e5a2db
1 zmienionych plików z 1 dodań i 0 usunięć
  1. 1 0
      rtl/inc/lineinfo.pp

+ 1 - 0
rtl/inc/lineinfo.pp

@@ -861,6 +861,7 @@ var
    mh:MachoHeader;
    i: longint;
 begin
+  processaddress := 0;
   StabsFunctionRelative:=false;
   LoadMachO32PPC := false;
   blockread (f, mh, sizeof(mh));