paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-15 20:49:23 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixes breakage of r17766, should resolve #19598

Browse Source 
git-svn-id: trunk@17814 -
This commit is contained in:
florian 2011-06-23 21:30:40 +00:00
parent d530b4fce7
commit a6b2fcfe22
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
compiler/i386/popt386.pas
View File

@ -726,6 +726,7 @@ begin
taicpu(hp1).loadConst(0,taicpu(p).oper[0]^.val and taicpu(hp1).oper[0]^.val); taicpu(hp1).loadConst(0,taicpu(p).oper[0]^.val and taicpu(hp1).oper[0]^.val);
asml.remove(p); asml.remove(p);
p.free; p.free;
p:=hp1;
end end
else else
{change "and x, reg; jxx" to "test x, reg", if reg is deallocated before the {change "and x, reg; jxx" to "test x, reg", if reg is deallocated before the