* set file positions correctly in PeepHoleOptPass1

git-svn-id: trunk@25906 -
This commit is contained in:
florian 2013-11-01 19:01:31 +00:00
parent 4148637c8c
commit 80f8f66c6e

View File

@ -720,6 +720,7 @@ begin
case p.Typ Of
ait_instruction:
begin
current_filepos:=taicpu(p).fileinfo;
if InsContainsSegRef(taicpu(p)) then
begin
p := tai(p.next);