Преглед изворни кода

* initialise processaddress for darwin

git-svn-id: trunk@2485 -
Jonas Maebe пре 19 година
родитељ
комит
1e47e5a2db
1 измењених фајлова са 1 додато и 0 уклоњено
  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));