diff --git a/rtl/inc/lineinfo.pp b/rtl/inc/lineinfo.pp index 6ba834c344..908820bde4 100644 --- a/rtl/inc/lineinfo.pp +++ b/rtl/inc/lineinfo.pp @@ -398,7 +398,7 @@ begin if peheader.pemagic<>$4550 then exit; { read section info } - for i:=1to peheader.NumberOfSections do + for i:=1 to peheader.NumberOfSections do begin blockread(f,coffsec,sizeof(tcoffsechdr)); if (coffsec.name[4]='b') and @@ -516,7 +516,7 @@ begin if peheader.pemagic<>$4550 then exit; { read section info } - for i:=1to peheader.NumberOfSections do + for i:=1 to peheader.NumberOfSections do begin blockread(f,coffsec,sizeof(tcoffsechdr)); if (coffsec.name[4]='b') and